21122 lines
882 KiB
VB.net
21122 lines
882 KiB
VB.net
'' ------------------------------------------------------------------------------
|
|
'' <auto-generated>
|
|
'' Generated by Xsd2Code++. Version 5.0.0.47. www.xsd2code.com
|
|
'' <NameSpace>FCFCDD</NameSpace><Collection>List</Collection><codeType>VisualBasic</codeType><EnableDataBinding>False</EnableDataBinding><GenerateCloneMethod>False</GenerateCloneMethod><GenerateDataContracts>False</GenerateDataContracts><DataMemberNameArg>OnlyIfDifferent</DataMemberNameArg><DataMemberOnXmlIgnore>False</DataMemberOnXmlIgnore><CodeBaseTag>Net45</CodeBaseTag><InitializeFields>All</InitializeFields><GenerateUnusedComplexTypes>True</GenerateUnusedComplexTypes><GenerateUnusedSimpleTypes>True</GenerateUnusedSimpleTypes><GenerateXMLAttributes>True</GenerateXMLAttributes><OrderXMLAttrib>False</OrderXMLAttrib><EnableLazyLoading>False</EnableLazyLoading><VirtualProp>False</VirtualProp><PascalCase>False</PascalCase><AutomaticProperties>False</AutomaticProperties><PropNameSpecified>None</PropNameSpecified><PrivateFieldName>StartWithUnderscore</PrivateFieldName><PrivateFieldNamePrefix></PrivateFieldNamePrefix><EnableRestriction>False</EnableRestriction><RestrictionMaxLenght>False</RestrictionMaxLenght><RestrictionRegEx>False</RestrictionRegEx><RestrictionRange>False</RestrictionRange><ValidateProperty>False</ValidateProperty><ClassNamePrefix></ClassNamePrefix><ClassLevel>Public</ClassLevel><PartialClass>True</PartialClass><ClassesInSeparateFiles>False</ClassesInSeparateFiles><ClassesInSeparateFilesDir></ClassesInSeparateFilesDir><TrackingChangesEnable>False</TrackingChangesEnable><GenTrackingClasses>False</GenTrackingClasses><HidePrivateFieldInIDE>False</HidePrivateFieldInIDE><EnableSummaryComment>False</EnableSummaryComment><EnableAppInfoSettings>False</EnableAppInfoSettings><EnableExternalSchemasCache>False</EnableExternalSchemasCache><EnableDebug>False</EnableDebug><EnableWarn>True</EnableWarn><ExcludeImportedTypes>True</ExcludeImportedTypes><ExpandNesteadAttributeGroup>True</ExpandNesteadAttributeGroup><CleanupCode>False</CleanupCode><EnableXmlSerialization>True</EnableXmlSerialization><SerializeMethodName>Serialize</SerializeMethodName><DeserializeMethodName>Deserialize</DeserializeMethodName><SaveToFileMethodName>SaveToFile</SaveToFileMethodName><LoadFromFileMethodName>LoadFromFile</LoadFromFileMethodName><EnableEncoding>False</EnableEncoding><EnableXMLIndent>True</EnableXMLIndent><IndentChar>Indent2Space</IndentChar><NewLineAttr>False</NewLineAttr><OmitXML>False</OmitXML><Encoder>UTF8</Encoder><Serializer>XmlSerializer</Serializer><sspNullable>False</sspNullable><sspString>False</sspString><sspCollection>False</sspCollection><sspComplexType>False</sspComplexType><sspSimpleType>False</sspSimpleType><sspEnumType>False</sspEnumType><XmlSerializerEvent>False</XmlSerializerEvent><BaseClassName>EntityBase</BaseClassName><UseBaseClass>False</UseBaseClass><GenBaseClass>False</GenBaseClass><CustomUsings></CustomUsings><AttributesToExlude></AttributesToExlude>
|
|
'' </auto-generated>
|
|
'' ------------------------------------------------------------------------------
|
|
Imports System
|
|
Imports System.Diagnostics
|
|
Imports System.Xml.Serialization
|
|
Imports System.Collections
|
|
Imports System.Xml.Schema
|
|
Imports System.ComponentModel
|
|
Imports System.IO
|
|
Imports System.Text
|
|
Imports System.Xml
|
|
Imports System.Collections.Generic
|
|
|
|
Namespace FCFCDD
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True),
|
|
System.Xml.Serialization.XmlRootAttribute([Namespace]:="", IsNullable:=False)>
|
|
Partial Public Class FCFCDD
|
|
|
|
#Region "Private fields"
|
|
Private _metaData As FCFCDDMetaData
|
|
|
|
Private _header As FCFCDDHeader
|
|
|
|
Private _declarant As FCFCDDDeclarant
|
|
|
|
Private _representative As FCFCDDRepresentative
|
|
|
|
Private _principal As FCFCDDPrincipal
|
|
|
|
Private _contactPerson As FCFCDDContactPerson
|
|
|
|
Private _dutyDefermentApproval As List(Of FCFCDDDutyDefermentApproval)
|
|
|
|
Private _borderTransportMeans As FCFCDDBorderTransportMeans
|
|
|
|
Private _arrivalTransportMeans As FCFCDDArrivalTransportMeans
|
|
|
|
Private _previousAdministrativeReferences As FCFCDDPreviousAdministrativeReferences
|
|
|
|
Private _summaryDeclaration As FCFCDDSummaryDeclaration
|
|
|
|
Private _customsWarehouse As FCFCDDCustomsWarehouse
|
|
|
|
Private _inwardProcessing As FCFCDDInwardProcessing
|
|
|
|
Private _body As FCFCDDBody
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._body = New FCFCDDBody()
|
|
Me._inwardProcessing = New FCFCDDInwardProcessing()
|
|
Me._customsWarehouse = New FCFCDDCustomsWarehouse()
|
|
Me._summaryDeclaration = New FCFCDDSummaryDeclaration()
|
|
Me._previousAdministrativeReferences = New FCFCDDPreviousAdministrativeReferences()
|
|
Me._arrivalTransportMeans = New FCFCDDArrivalTransportMeans()
|
|
Me._borderTransportMeans = New FCFCDDBorderTransportMeans()
|
|
Me._dutyDefermentApproval = New List(Of FCFCDDDutyDefermentApproval)()
|
|
Me._contactPerson = New FCFCDDContactPerson()
|
|
Me._principal = New FCFCDDPrincipal()
|
|
Me._representative = New FCFCDDRepresentative()
|
|
Me._declarant = New FCFCDDDeclarant()
|
|
Me._header = New FCFCDDHeader()
|
|
Me._metaData = New FCFCDDMetaData()
|
|
End Sub
|
|
|
|
Public Property MetaData() As FCFCDDMetaData
|
|
Get
|
|
Return Me._metaData
|
|
End Get
|
|
Set
|
|
Me._metaData = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Header() As FCFCDDHeader
|
|
Get
|
|
Return Me._header
|
|
End Get
|
|
Set
|
|
Me._header = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Declarant() As FCFCDDDeclarant
|
|
Get
|
|
Return Me._declarant
|
|
End Get
|
|
Set
|
|
Me._declarant = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Representative() As FCFCDDRepresentative
|
|
Get
|
|
Return Me._representative
|
|
End Get
|
|
Set
|
|
Me._representative = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Principal() As FCFCDDPrincipal
|
|
Get
|
|
Return Me._principal
|
|
End Get
|
|
Set
|
|
Me._principal = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ContactPerson() As FCFCDDContactPerson
|
|
Get
|
|
Return Me._contactPerson
|
|
End Get
|
|
Set
|
|
Me._contactPerson = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("DutyDefermentApproval")>
|
|
Public Property DutyDefermentApproval() As List(Of FCFCDDDutyDefermentApproval)
|
|
Get
|
|
Return Me._dutyDefermentApproval
|
|
End Get
|
|
Set
|
|
Me._dutyDefermentApproval = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property BorderTransportMeans() As FCFCDDBorderTransportMeans
|
|
Get
|
|
Return Me._borderTransportMeans
|
|
End Get
|
|
Set
|
|
Me._borderTransportMeans = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ArrivalTransportMeans() As FCFCDDArrivalTransportMeans
|
|
Get
|
|
Return Me._arrivalTransportMeans
|
|
End Get
|
|
Set
|
|
Me._arrivalTransportMeans = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PreviousAdministrativeReferences() As FCFCDDPreviousAdministrativeReferences
|
|
Get
|
|
Return Me._previousAdministrativeReferences
|
|
End Get
|
|
Set
|
|
Me._previousAdministrativeReferences = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property SummaryDeclaration() As FCFCDDSummaryDeclaration
|
|
Get
|
|
Return Me._summaryDeclaration
|
|
End Get
|
|
Set
|
|
Me._summaryDeclaration = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CustomsWarehouse() As FCFCDDCustomsWarehouse
|
|
Get
|
|
Return Me._customsWarehouse
|
|
End Get
|
|
Set
|
|
Me._customsWarehouse = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property InwardProcessing() As FCFCDDInwardProcessing
|
|
Get
|
|
Return Me._inwardProcessing
|
|
End Get
|
|
Set
|
|
Me._inwardProcessing = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Body() As FCFCDDBody
|
|
Get
|
|
Return Me._body
|
|
End Get
|
|
Set
|
|
Me._body = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDD))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDD object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDD object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDD object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDD, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDD)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDD) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDD
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDD)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDD
|
|
Return CType(Serializer.Deserialize(s), FCFCDD)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDD object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDD object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDD object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDD, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDD)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDD) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDD
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDMetaData
|
|
|
|
#Region "Private fields"
|
|
Private _preparation As FCFCDDMetaDataPreparation
|
|
|
|
Private _interchangeControlReference As String
|
|
|
|
Private _messageReferenceNumber As String
|
|
|
|
Private _messageIdentifier As String
|
|
|
|
Private _messageGroup As FCFCDDMetaDataMessageGroup
|
|
|
|
Private _testIndicator As FCFCDDMetaDataTestIndicator
|
|
|
|
Private _messageType As FCFCDDMetaDataMessageType
|
|
|
|
Private _interchangeSender As FCFCDDMetaDataInterchangeSender
|
|
|
|
Private _interchangeRecipient As FCFCDDMetaDataInterchangeRecipient
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._interchangeRecipient = New FCFCDDMetaDataInterchangeRecipient()
|
|
Me._interchangeSender = New FCFCDDMetaDataInterchangeSender()
|
|
Me._preparation = New FCFCDDMetaDataPreparation()
|
|
End Sub
|
|
|
|
Public Property Preparation() As FCFCDDMetaDataPreparation
|
|
Get
|
|
Return Me._preparation
|
|
End Get
|
|
Set
|
|
Me._preparation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property InterchangeControlReference() As String
|
|
Get
|
|
Return Me._interchangeControlReference
|
|
End Get
|
|
Set
|
|
Me._interchangeControlReference = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property MessageReferenceNumber() As String
|
|
Get
|
|
Return Me._messageReferenceNumber
|
|
End Get
|
|
Set
|
|
Me._messageReferenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MessageIdentifier() As String
|
|
Get
|
|
Return Me._messageIdentifier
|
|
End Get
|
|
Set
|
|
Me._messageIdentifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property MessageGroup() As FCFCDDMetaDataMessageGroup
|
|
Get
|
|
Return Me._messageGroup
|
|
End Get
|
|
Set
|
|
Me._messageGroup = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property TestIndicator() As FCFCDDMetaDataTestIndicator
|
|
Get
|
|
Return Me._testIndicator
|
|
End Get
|
|
Set
|
|
Me._testIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property MessageType() As FCFCDDMetaDataMessageType
|
|
Get
|
|
Return Me._messageType
|
|
End Get
|
|
Set
|
|
Me._messageType = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property InterchangeSender() As FCFCDDMetaDataInterchangeSender
|
|
Get
|
|
Return Me._interchangeSender
|
|
End Get
|
|
Set
|
|
Me._interchangeSender = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property InterchangeRecipient() As FCFCDDMetaDataInterchangeRecipient
|
|
Get
|
|
Return Me._interchangeRecipient
|
|
End Get
|
|
Set
|
|
Me._interchangeRecipient = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDMetaData))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaData object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDMetaData object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaData object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaData, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaData)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaData) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDMetaData
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDMetaData)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDMetaData
|
|
Return CType(Serializer.Deserialize(s), FCFCDDMetaData)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaData object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDMetaData object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaData object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaData, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaData)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaData) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDMetaData
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDMetaDataPreparation
|
|
|
|
#Region "Private fields"
|
|
Private _date As Date
|
|
|
|
Private _time As Date
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="date")>
|
|
Public Property [Date]() As Date
|
|
Get
|
|
Return Me._date
|
|
End Get
|
|
Set
|
|
Me._date = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="time")>
|
|
Public Property Time() As Date
|
|
Get
|
|
Return Me._time
|
|
End Get
|
|
Set
|
|
Me._time = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDMetaDataPreparation))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataPreparation object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDMetaDataPreparation object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataPreparation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataPreparation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataPreparation)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataPreparation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDMetaDataPreparation
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDMetaDataPreparation)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDMetaDataPreparation
|
|
Return CType(Serializer.Deserialize(s), FCFCDDMetaDataPreparation)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataPreparation object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDMetaDataPreparation object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataPreparation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataPreparation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataPreparation)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataPreparation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDMetaDataPreparation
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDMetaDataMessageGroup
|
|
|
|
'''<remarks/>
|
|
ZBE
|
|
|
|
'''<remarks/>
|
|
ZBV
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDMetaDataTestIndicator
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlEnumAttribute("1")>
|
|
Item1
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDMetaDataMessageType
|
|
|
|
'''<remarks/>
|
|
FCFCDD
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDMetaDataInterchangeSender
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDMetaDataInterchangeSenderIdentification
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identification = New FCFCDDMetaDataInterchangeSenderIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDMetaDataInterchangeSenderIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDMetaDataInterchangeSender))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeSender object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDMetaDataInterchangeSender object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeSender object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeSender, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeSender)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeSender) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDMetaDataInterchangeSender
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDMetaDataInterchangeSender)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDMetaDataInterchangeSender
|
|
Return CType(Serializer.Deserialize(s), FCFCDDMetaDataInterchangeSender)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeSender object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDMetaDataInterchangeSender object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeSender object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeSender, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeSender)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeSender) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDMetaDataInterchangeSender
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDMetaDataInterchangeSenderIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private _subsidiaryNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SubsidiaryNumber() As String
|
|
Get
|
|
Return Me._subsidiaryNumber
|
|
End Get
|
|
Set
|
|
Me._subsidiaryNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDMetaDataInterchangeSenderIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeSenderIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDMetaDataInterchangeSenderIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeSenderIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeSenderIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeSenderIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeSenderIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDMetaDataInterchangeSenderIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDMetaDataInterchangeSenderIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDMetaDataInterchangeSenderIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDMetaDataInterchangeSenderIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeSenderIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDMetaDataInterchangeSenderIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeSenderIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeSenderIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeSenderIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeSenderIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDMetaDataInterchangeSenderIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDMetaDataInterchangeRecipient
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDMetaDataInterchangeRecipientIdentification
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identification = New FCFCDDMetaDataInterchangeRecipientIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDMetaDataInterchangeRecipientIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDMetaDataInterchangeRecipient))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeRecipient object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDMetaDataInterchangeRecipient object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeRecipient object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeRecipient, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeRecipient)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeRecipient) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDMetaDataInterchangeRecipient
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDMetaDataInterchangeRecipient)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDMetaDataInterchangeRecipient
|
|
Return CType(Serializer.Deserialize(s), FCFCDDMetaDataInterchangeRecipient)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeRecipient object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDMetaDataInterchangeRecipient object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeRecipient object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeRecipient, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeRecipient)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeRecipient) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDMetaDataInterchangeRecipient
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDMetaDataInterchangeRecipientIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDMetaDataInterchangeRecipientIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeRecipientIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDMetaDataInterchangeRecipientIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeRecipientIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeRecipientIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeRecipientIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDMetaDataInterchangeRecipientIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDMetaDataInterchangeRecipientIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDMetaDataInterchangeRecipientIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDMetaDataInterchangeRecipientIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDMetaDataInterchangeRecipientIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDMetaDataInterchangeRecipientIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDMetaDataInterchangeRecipientIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDMetaDataInterchangeRecipientIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeRecipientIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDMetaDataInterchangeRecipientIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDMetaDataInterchangeRecipientIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDMetaDataInterchangeRecipientIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDHeader
|
|
|
|
#Region "Private fields"
|
|
Private _messageVersion As String
|
|
|
|
Private _messageCreationDate As Date
|
|
|
|
Private _declaration As FCFCDDHeaderDeclaration
|
|
|
|
Private _localReferenceNumber As String
|
|
|
|
Private _prematureInputFlag As String
|
|
|
|
Private _goodsItemQuantity As String
|
|
|
|
Private _customsGoodsStatus As String
|
|
|
|
Private _declarantIsConsigneeFlag As String
|
|
|
|
Private _customsAuthorisation As FCFCDDHeaderCustomsAuthorisation
|
|
|
|
Private _inputTaxDeductionFlag As String
|
|
|
|
Private _goodsLocation As String
|
|
|
|
Private _departureCountry As String
|
|
|
|
Private _paymentMethod As FCFCDDHeaderPaymentMethod
|
|
|
|
Private _currencyCode As FCFCDDHeaderCurrencyCode
|
|
|
|
Private _additionalInformation As String
|
|
|
|
Private _taxNumber As String
|
|
|
|
Private _taxOffice As String
|
|
|
|
Private _representativeRelationshipFlag As String
|
|
|
|
Private _declarationPlace As String
|
|
|
|
Private _authorisationNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._customsAuthorisation = New FCFCDDHeaderCustomsAuthorisation()
|
|
Me._declaration = New FCFCDDHeaderDeclaration()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MessageVersion() As String
|
|
Get
|
|
Return Me._messageVersion
|
|
End Get
|
|
Set
|
|
Me._messageVersion = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="date")>
|
|
Public Property MessageCreationDate() As Date
|
|
Get
|
|
Return Me._messageCreationDate
|
|
End Get
|
|
Set
|
|
Me._messageCreationDate = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Declaration() As FCFCDDHeaderDeclaration
|
|
Get
|
|
Return Me._declaration
|
|
End Get
|
|
Set
|
|
Me._declaration = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property LocalReferenceNumber() As String
|
|
Get
|
|
Return Me._localReferenceNumber
|
|
End Get
|
|
Set
|
|
Me._localReferenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property PrematureInputFlag() As String
|
|
Get
|
|
Return Me._prematureInputFlag
|
|
End Get
|
|
Set
|
|
Me._prematureInputFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property GoodsItemQuantity() As String
|
|
Get
|
|
Return Me._goodsItemQuantity
|
|
End Get
|
|
Set
|
|
Me._goodsItemQuantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CustomsGoodsStatus() As String
|
|
Get
|
|
Return Me._customsGoodsStatus
|
|
End Get
|
|
Set
|
|
Me._customsGoodsStatus = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DeclarantIsConsigneeFlag() As String
|
|
Get
|
|
Return Me._declarantIsConsigneeFlag
|
|
End Get
|
|
Set
|
|
Me._declarantIsConsigneeFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CustomsAuthorisation() As FCFCDDHeaderCustomsAuthorisation
|
|
Get
|
|
Return Me._customsAuthorisation
|
|
End Get
|
|
Set
|
|
Me._customsAuthorisation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property InputTaxDeductionFlag() As String
|
|
Get
|
|
Return Me._inputTaxDeductionFlag
|
|
End Get
|
|
Set
|
|
Me._inputTaxDeductionFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property GoodsLocation() As String
|
|
Get
|
|
Return Me._goodsLocation
|
|
End Get
|
|
Set
|
|
Me._goodsLocation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DepartureCountry() As String
|
|
Get
|
|
Return Me._departureCountry
|
|
End Get
|
|
Set
|
|
Me._departureCountry = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PaymentMethod() As FCFCDDHeaderPaymentMethod
|
|
Get
|
|
Return Me._paymentMethod
|
|
End Get
|
|
Set
|
|
Me._paymentMethod = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CurrencyCode() As FCFCDDHeaderCurrencyCode
|
|
Get
|
|
Return Me._currencyCode
|
|
End Get
|
|
Set
|
|
Me._currencyCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AdditionalInformation() As String
|
|
Get
|
|
Return Me._additionalInformation
|
|
End Get
|
|
Set
|
|
Me._additionalInformation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property TaxNumber() As String
|
|
Get
|
|
Return Me._taxNumber
|
|
End Get
|
|
Set
|
|
Me._taxNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property TaxOffice() As String
|
|
Get
|
|
Return Me._taxOffice
|
|
End Get
|
|
Set
|
|
Me._taxOffice = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property RepresentativeRelationshipFlag() As String
|
|
Get
|
|
Return Me._representativeRelationshipFlag
|
|
End Get
|
|
Set
|
|
Me._representativeRelationshipFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DeclarationPlace() As String
|
|
Get
|
|
Return Me._declarationPlace
|
|
End Get
|
|
Set
|
|
Me._declarationPlace = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AuthorisationNumber() As String
|
|
Get
|
|
Return Me._authorisationNumber
|
|
End Get
|
|
Set
|
|
Me._authorisationNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDHeader))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDHeader object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDHeader object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDHeader object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDHeader, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDHeader)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDHeader) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDHeader
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDHeader)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDHeader
|
|
Return CType(Serializer.Deserialize(s), FCFCDDHeader)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDHeader object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDHeader object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDHeader object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDHeader, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDHeader)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDHeader) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDHeader
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDHeaderDeclaration
|
|
|
|
#Region "Private fields"
|
|
Private _kind As FCFCDDHeaderDeclarationKind
|
|
|
|
Private _type As FCFCDDHeaderDeclarationType
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Kind() As FCFCDDHeaderDeclarationKind
|
|
Get
|
|
Return Me._kind
|
|
End Get
|
|
Set
|
|
Me._kind = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Type() As FCFCDDHeaderDeclarationType
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDHeaderDeclaration))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDHeaderDeclaration object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDHeaderDeclaration object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDHeaderDeclaration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDHeaderDeclaration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDHeaderDeclaration)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDHeaderDeclaration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDHeaderDeclaration
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDHeaderDeclaration)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDHeaderDeclaration
|
|
Return CType(Serializer.Deserialize(s), FCFCDDHeaderDeclaration)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDHeaderDeclaration object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDHeaderDeclaration object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDHeaderDeclaration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDHeaderDeclaration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDHeaderDeclaration)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDHeaderDeclaration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDHeaderDeclaration
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDHeaderDeclarationKind
|
|
|
|
'''<remarks/>
|
|
A
|
|
|
|
'''<remarks/>
|
|
B
|
|
|
|
'''<remarks/>
|
|
D
|
|
|
|
'''<remarks/>
|
|
E
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDHeaderDeclarationType
|
|
|
|
'''<remarks/>
|
|
EZA
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDHeaderCustomsAuthorisation
|
|
|
|
#Region "Private fields"
|
|
Private _endUse As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property EndUse() As String
|
|
Get
|
|
Return Me._endUse
|
|
End Get
|
|
Set
|
|
Me._endUse = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDHeaderCustomsAuthorisation))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDHeaderCustomsAuthorisation object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDHeaderCustomsAuthorisation object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDHeaderCustomsAuthorisation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDHeaderCustomsAuthorisation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDHeaderCustomsAuthorisation)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDHeaderCustomsAuthorisation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDHeaderCustomsAuthorisation
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDHeaderCustomsAuthorisation)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDHeaderCustomsAuthorisation
|
|
Return CType(Serializer.Deserialize(s), FCFCDDHeaderCustomsAuthorisation)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDHeaderCustomsAuthorisation object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDHeaderCustomsAuthorisation object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDHeaderCustomsAuthorisation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDHeaderCustomsAuthorisation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDHeaderCustomsAuthorisation)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDHeaderCustomsAuthorisation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDHeaderCustomsAuthorisation
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDHeaderPaymentMethod
|
|
|
|
'''<remarks/>
|
|
A
|
|
|
|
'''<remarks/>
|
|
C
|
|
|
|
'''<remarks/>
|
|
D
|
|
|
|
'''<remarks/>
|
|
E
|
|
|
|
'''<remarks/>
|
|
F
|
|
|
|
'''<remarks/>
|
|
G
|
|
|
|
'''<remarks/>
|
|
Y
|
|
|
|
'''<remarks/>
|
|
Z
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDHeaderCurrencyCode
|
|
|
|
'''<remarks/>
|
|
EUR
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDDeclarant
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDDeclarantIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _address As FCFCDDDeclarantAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDDeclarantAddress()
|
|
Me._identification = New FCFCDDDeclarantIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDDeclarantIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDDeclarantAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDDeclarant))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDeclarant object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDDeclarant object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDeclarant object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDeclarant, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDeclarant)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDeclarant) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDDeclarant
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDDeclarant)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDDeclarant
|
|
Return CType(Serializer.Deserialize(s), FCFCDDDeclarant)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDeclarant object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDDeclarant object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDeclarant object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDeclarant, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDeclarant)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDeclarant) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDDeclarant
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDDeclarantIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private _subsidiaryNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SubsidiaryNumber() As String
|
|
Get
|
|
Return Me._subsidiaryNumber
|
|
End Get
|
|
Set
|
|
Me._subsidiaryNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDDeclarantIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDeclarantIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDDeclarantIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDeclarantIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDeclarantIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDeclarantIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDeclarantIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDDeclarantIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDDeclarantIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDDeclarantIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDDeclarantIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDeclarantIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDDeclarantIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDeclarantIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDeclarantIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDeclarantIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDeclarantIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDDeclarantIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDDeclarantAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDDeclarantAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDeclarantAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDDeclarantAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDeclarantAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDeclarantAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDeclarantAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDeclarantAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDDeclarantAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDDeclarantAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDDeclarantAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDDeclarantAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDeclarantAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDDeclarantAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDeclarantAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDeclarantAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDeclarantAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDeclarantAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDDeclarantAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDRepresentative
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDRepresentativeIdentification
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identification = New FCFCDDRepresentativeIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDRepresentativeIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDRepresentative))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDRepresentative object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDRepresentative object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDRepresentative object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDRepresentative, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDRepresentative)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDRepresentative) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDRepresentative
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDRepresentative)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDRepresentative
|
|
Return CType(Serializer.Deserialize(s), FCFCDDRepresentative)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDRepresentative object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDRepresentative object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDRepresentative object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDRepresentative, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDRepresentative)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDRepresentative) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDRepresentative
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDRepresentativeIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private _subsidiaryNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SubsidiaryNumber() As String
|
|
Get
|
|
Return Me._subsidiaryNumber
|
|
End Get
|
|
Set
|
|
Me._subsidiaryNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDRepresentativeIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDRepresentativeIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDRepresentativeIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDRepresentativeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDRepresentativeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDRepresentativeIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDRepresentativeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDRepresentativeIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDRepresentativeIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDRepresentativeIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDRepresentativeIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDRepresentativeIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDRepresentativeIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDRepresentativeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDRepresentativeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDRepresentativeIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDRepresentativeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDRepresentativeIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDPrincipal
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDPrincipalIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _address As FCFCDDPrincipalAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDPrincipalAddress()
|
|
Me._identification = New FCFCDDPrincipalIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDPrincipalIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDPrincipalAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDPrincipal))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPrincipal object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDPrincipal object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPrincipal object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPrincipal, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPrincipal)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPrincipal) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDPrincipal
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDPrincipal)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDPrincipal
|
|
Return CType(Serializer.Deserialize(s), FCFCDDPrincipal)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPrincipal object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDPrincipal object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPrincipal object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPrincipal, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPrincipal)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPrincipal) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDPrincipal
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDPrincipalIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private _subsidiaryNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SubsidiaryNumber() As String
|
|
Get
|
|
Return Me._subsidiaryNumber
|
|
End Get
|
|
Set
|
|
Me._subsidiaryNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDPrincipalIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPrincipalIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDPrincipalIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPrincipalIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPrincipalIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPrincipalIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPrincipalIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDPrincipalIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDPrincipalIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDPrincipalIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDPrincipalIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPrincipalIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDPrincipalIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPrincipalIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPrincipalIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPrincipalIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPrincipalIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDPrincipalIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDPrincipalAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDPrincipalAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPrincipalAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDPrincipalAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPrincipalAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPrincipalAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPrincipalAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPrincipalAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDPrincipalAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDPrincipalAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDPrincipalAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDPrincipalAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPrincipalAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDPrincipalAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPrincipalAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPrincipalAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPrincipalAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPrincipalAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDPrincipalAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDContactPerson
|
|
|
|
#Region "Private fields"
|
|
Private _name As String
|
|
|
|
Private _position As String
|
|
|
|
Private _phoneNumber As String
|
|
|
|
Private _mailAddress As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Position() As String
|
|
Get
|
|
Return Me._position
|
|
End Get
|
|
Set
|
|
Me._position = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property PhoneNumber() As String
|
|
Get
|
|
Return Me._phoneNumber
|
|
End Get
|
|
Set
|
|
Me._phoneNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MailAddress() As String
|
|
Get
|
|
Return Me._mailAddress
|
|
End Get
|
|
Set
|
|
Me._mailAddress = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDContactPerson))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDContactPerson object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDContactPerson object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDContactPerson object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDContactPerson, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDContactPerson)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDContactPerson) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDContactPerson
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDContactPerson)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDContactPerson
|
|
Return CType(Serializer.Deserialize(s), FCFCDDContactPerson)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDContactPerson object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDContactPerson object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDContactPerson object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDContactPerson, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDContactPerson)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDContactPerson) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDContactPerson
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDDutyDefermentApproval
|
|
|
|
#Region "Private fields"
|
|
Private _type As String
|
|
|
|
Private _applicationType As String
|
|
|
|
Private _accountPrefix As String
|
|
|
|
Private _accountNumber As String
|
|
|
|
Private _authorisationNumber As String
|
|
|
|
Private _dutyDefermentApplicant As FCFCDDDutyDefermentApprovalDutyDefermentApplicant
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._dutyDefermentApplicant = New FCFCDDDutyDefermentApprovalDutyDefermentApplicant()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ApplicationType() As String
|
|
Get
|
|
Return Me._applicationType
|
|
End Get
|
|
Set
|
|
Me._applicationType = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AccountPrefix() As String
|
|
Get
|
|
Return Me._accountPrefix
|
|
End Get
|
|
Set
|
|
Me._accountPrefix = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AccountNumber() As String
|
|
Get
|
|
Return Me._accountNumber
|
|
End Get
|
|
Set
|
|
Me._accountNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AuthorisationNumber() As String
|
|
Get
|
|
Return Me._authorisationNumber
|
|
End Get
|
|
Set
|
|
Me._authorisationNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property DutyDefermentApplicant() As FCFCDDDutyDefermentApprovalDutyDefermentApplicant
|
|
Get
|
|
Return Me._dutyDefermentApplicant
|
|
End Get
|
|
Set
|
|
Me._dutyDefermentApplicant = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDDutyDefermentApproval))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDutyDefermentApproval object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDDutyDefermentApproval object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDutyDefermentApproval object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDutyDefermentApproval, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDutyDefermentApproval)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDutyDefermentApproval) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDDutyDefermentApproval
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDDutyDefermentApproval)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDDutyDefermentApproval
|
|
Return CType(Serializer.Deserialize(s), FCFCDDDutyDefermentApproval)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDutyDefermentApproval object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDDutyDefermentApproval object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDutyDefermentApproval object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDutyDefermentApproval, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDutyDefermentApproval)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDutyDefermentApproval) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDDutyDefermentApproval
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDDutyDefermentApprovalDutyDefermentApplicant
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identification = New FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDDutyDefermentApprovalDutyDefermentApplicant))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDutyDefermentApprovalDutyDefermentApplicant object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDDutyDefermentApprovalDutyDefermentApplicant object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDutyDefermentApprovalDutyDefermentApplicant object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicant, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDutyDefermentApprovalDutyDefermentApplicant)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicant) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDDutyDefermentApprovalDutyDefermentApplicant
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDDutyDefermentApprovalDutyDefermentApplicant)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDDutyDefermentApprovalDutyDefermentApplicant
|
|
Return CType(Serializer.Deserialize(s), FCFCDDDutyDefermentApprovalDutyDefermentApplicant)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDutyDefermentApprovalDutyDefermentApplicant object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDDutyDefermentApprovalDutyDefermentApplicant object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDutyDefermentApprovalDutyDefermentApplicant object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicant, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDutyDefermentApprovalDutyDefermentApplicant)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicant) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDDutyDefermentApprovalDutyDefermentApplicant
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDDutyDefermentApprovalDutyDefermentApplicantIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBorderTransportMeans
|
|
|
|
#Region "Private fields"
|
|
Private _mode As String
|
|
|
|
Private _type As String
|
|
|
|
Private _information As String
|
|
|
|
Private _nationality As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Mode() As String
|
|
Get
|
|
Return Me._mode
|
|
End Get
|
|
Set
|
|
Me._mode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Information() As String
|
|
Get
|
|
Return Me._information
|
|
End Get
|
|
Set
|
|
Me._information = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Nationality() As String
|
|
Get
|
|
Return Me._nationality
|
|
End Get
|
|
Set
|
|
Me._nationality = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBorderTransportMeans))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBorderTransportMeans object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBorderTransportMeans object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBorderTransportMeans object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBorderTransportMeans, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBorderTransportMeans)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBorderTransportMeans) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBorderTransportMeans
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBorderTransportMeans)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBorderTransportMeans
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBorderTransportMeans)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBorderTransportMeans object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBorderTransportMeans object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBorderTransportMeans object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBorderTransportMeans, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBorderTransportMeans)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBorderTransportMeans) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBorderTransportMeans
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDArrivalTransportMeans
|
|
|
|
#Region "Private fields"
|
|
Private _identity As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Identity() As String
|
|
Get
|
|
Return Me._identity
|
|
End Get
|
|
Set
|
|
Me._identity = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDArrivalTransportMeans))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDArrivalTransportMeans object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDArrivalTransportMeans object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDArrivalTransportMeans object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDArrivalTransportMeans, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDArrivalTransportMeans)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDArrivalTransportMeans) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDArrivalTransportMeans
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDArrivalTransportMeans)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDArrivalTransportMeans
|
|
Return CType(Serializer.Deserialize(s), FCFCDDArrivalTransportMeans)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDArrivalTransportMeans object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDArrivalTransportMeans object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDArrivalTransportMeans object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDArrivalTransportMeans, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDArrivalTransportMeans)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDArrivalTransportMeans) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDArrivalTransportMeans
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDPreviousAdministrativeReferences
|
|
|
|
#Region "Private fields"
|
|
Private _type As String
|
|
|
|
Private _previousAdministrativeReference As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._previousAdministrativeReference = New FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PreviousAdministrativeReference() As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference
|
|
Get
|
|
Return Me._previousAdministrativeReference
|
|
End Get
|
|
Set
|
|
Me._previousAdministrativeReference = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDPreviousAdministrativeReferences))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPreviousAdministrativeReferences object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDPreviousAdministrativeReferences object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPreviousAdministrativeReferences object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPreviousAdministrativeReferences, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPreviousAdministrativeReferences)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPreviousAdministrativeReferences) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDPreviousAdministrativeReferences
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDPreviousAdministrativeReferences)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDPreviousAdministrativeReferences
|
|
Return CType(Serializer.Deserialize(s), FCFCDDPreviousAdministrativeReferences)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPreviousAdministrativeReferences object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDPreviousAdministrativeReferences object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPreviousAdministrativeReferences object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPreviousAdministrativeReferences, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPreviousAdministrativeReferences)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPreviousAdministrativeReferences) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDPreviousAdministrativeReferences
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference
|
|
Return CType(Serializer.Deserialize(s), FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDPreviousAdministrativeReferencesPreviousAdministrativeReference
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDSummaryDeclaration
|
|
|
|
#Region "Private fields"
|
|
Private _identificationIndicator As FCFCDDSummaryDeclarationIdentificationIndicator
|
|
|
|
Private _goodsItem As List(Of FCFCDDSummaryDeclarationGoodsItem)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._goodsItem = New List(Of FCFCDDSummaryDeclarationGoodsItem)()
|
|
End Sub
|
|
|
|
Public Property IdentificationIndicator() As FCFCDDSummaryDeclarationIdentificationIndicator
|
|
Get
|
|
Return Me._identificationIndicator
|
|
End Get
|
|
Set
|
|
Me._identificationIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("GoodsItem")>
|
|
Public Property GoodsItem() As List(Of FCFCDDSummaryDeclarationGoodsItem)
|
|
Get
|
|
Return Me._goodsItem
|
|
End Get
|
|
Set
|
|
Me._goodsItem = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDSummaryDeclaration))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclaration object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDSummaryDeclaration object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclaration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclaration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclaration)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclaration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDSummaryDeclaration
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDSummaryDeclaration)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDSummaryDeclaration
|
|
Return CType(Serializer.Deserialize(s), FCFCDDSummaryDeclaration)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclaration object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDSummaryDeclaration object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclaration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclaration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclaration)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclaration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDSummaryDeclaration
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDSummaryDeclarationIdentificationIndicator
|
|
|
|
'''<remarks/>
|
|
AWB
|
|
|
|
'''<remarks/>
|
|
REG
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDSummaryDeclarationGoodsItem
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As String
|
|
|
|
Private _identificationByKey As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey
|
|
|
|
Private _identificationByRegistration As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identificationByRegistration = New FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration()
|
|
Me._identificationByKey = New FCFCDDSummaryDeclarationGoodsItemIdentificationByKey()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property Quantity() As String
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property IdentificationByKey() As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey
|
|
Get
|
|
Return Me._identificationByKey
|
|
End Get
|
|
Set
|
|
Me._identificationByKey = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property IdentificationByRegistration() As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration
|
|
Get
|
|
Return Me._identificationByRegistration
|
|
End Get
|
|
Set
|
|
Me._identificationByRegistration = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDSummaryDeclarationGoodsItem))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItem object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDSummaryDeclarationGoodsItem object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItem)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDSummaryDeclarationGoodsItem
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDSummaryDeclarationGoodsItem)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDSummaryDeclarationGoodsItem
|
|
Return CType(Serializer.Deserialize(s), FCFCDDSummaryDeclarationGoodsItem)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItem object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDSummaryDeclarationGoodsItem object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItem)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDSummaryDeclarationGoodsItem
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDSummaryDeclarationGoodsItemIdentificationByKey
|
|
|
|
#Region "Private fields"
|
|
Private _kind As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyKind
|
|
|
|
Private _number As String
|
|
|
|
Private _custodian As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._custodian = New FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian()
|
|
End Sub
|
|
|
|
Public Property Kind() As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyKind
|
|
Get
|
|
Return Me._kind
|
|
End Get
|
|
Set
|
|
Me._kind = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Number() As String
|
|
Get
|
|
Return Me._number
|
|
End Get
|
|
Set
|
|
Me._number = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Custodian() As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian
|
|
Get
|
|
Return Me._custodian
|
|
End Get
|
|
Set
|
|
Me._custodian = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDSummaryDeclarationGoodsItemIdentificationByKey))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByKey object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDSummaryDeclarationGoodsItemIdentificationByKey object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByKey object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByKey)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDSummaryDeclarationGoodsItemIdentificationByKey)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey
|
|
Return CType(Serializer.Deserialize(s), FCFCDDSummaryDeclarationGoodsItemIdentificationByKey)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByKey object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDSummaryDeclarationGoodsItemIdentificationByKey object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByKey object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByKey)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKey
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyKind
|
|
|
|
'''<remarks/>
|
|
AWB
|
|
|
|
'''<remarks/>
|
|
ULD
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identification = New FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian
|
|
Return CType(Serializer.Deserialize(s), FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodian
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByKeyCustodianIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration
|
|
|
|
#Region "Private fields"
|
|
Private _referencedRegistrationNumber As String
|
|
|
|
Private _referencedSequenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferencedRegistrationNumber() As String
|
|
Get
|
|
Return Me._referencedRegistrationNumber
|
|
End Get
|
|
Set
|
|
Me._referencedRegistrationNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property ReferencedSequenceNumber() As String
|
|
Get
|
|
Return Me._referencedSequenceNumber
|
|
End Get
|
|
Set
|
|
Me._referencedSequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration
|
|
Return CType(Serializer.Deserialize(s), FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDSummaryDeclarationGoodsItemIdentificationByRegistration
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDCustomsWarehouse
|
|
|
|
#Region "Private fields"
|
|
Private _sequenceNumber As FCFCDDCustomsWarehouseSequenceNumber
|
|
|
|
Private _goodsItemQuantity As String
|
|
|
|
Private _customsAuthorisation As FCFCDDCustomsWarehouseCustomsAuthorisation
|
|
|
|
Private _localReferenceNumber As String
|
|
|
|
Private _goodsItem As List(Of FCFCDDCustomsWarehouseGoodsItem)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._goodsItem = New List(Of FCFCDDCustomsWarehouseGoodsItem)()
|
|
Me._customsAuthorisation = New FCFCDDCustomsWarehouseCustomsAuthorisation()
|
|
End Sub
|
|
|
|
Public Property SequenceNumber() As FCFCDDCustomsWarehouseSequenceNumber
|
|
Get
|
|
Return Me._sequenceNumber
|
|
End Get
|
|
Set
|
|
Me._sequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property GoodsItemQuantity() As String
|
|
Get
|
|
Return Me._goodsItemQuantity
|
|
End Get
|
|
Set
|
|
Me._goodsItemQuantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CustomsAuthorisation() As FCFCDDCustomsWarehouseCustomsAuthorisation
|
|
Get
|
|
Return Me._customsAuthorisation
|
|
End Get
|
|
Set
|
|
Me._customsAuthorisation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property LocalReferenceNumber() As String
|
|
Get
|
|
Return Me._localReferenceNumber
|
|
End Get
|
|
Set
|
|
Me._localReferenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("GoodsItem")>
|
|
Public Property GoodsItem() As List(Of FCFCDDCustomsWarehouseGoodsItem)
|
|
Get
|
|
Return Me._goodsItem
|
|
End Get
|
|
Set
|
|
Me._goodsItem = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDCustomsWarehouse))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouse object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDCustomsWarehouse object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouse object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouse, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouse)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouse) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDCustomsWarehouse
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDCustomsWarehouse)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDCustomsWarehouse
|
|
Return CType(Serializer.Deserialize(s), FCFCDDCustomsWarehouse)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouse object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDCustomsWarehouse object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouse object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouse, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouse)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouse) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDCustomsWarehouse
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDCustomsWarehouseSequenceNumber
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlEnumAttribute("1")>
|
|
Item1
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDCustomsWarehouseCustomsAuthorisation
|
|
|
|
#Region "Private fields"
|
|
Private _warehouseOwner As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property WarehouseOwner() As String
|
|
Get
|
|
Return Me._warehouseOwner
|
|
End Get
|
|
Set
|
|
Me._warehouseOwner = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDCustomsWarehouseCustomsAuthorisation))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseCustomsAuthorisation object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDCustomsWarehouseCustomsAuthorisation object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseCustomsAuthorisation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseCustomsAuthorisation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseCustomsAuthorisation)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseCustomsAuthorisation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDCustomsWarehouseCustomsAuthorisation
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDCustomsWarehouseCustomsAuthorisation)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDCustomsWarehouseCustomsAuthorisation
|
|
Return CType(Serializer.Deserialize(s), FCFCDDCustomsWarehouseCustomsAuthorisation)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseCustomsAuthorisation object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDCustomsWarehouseCustomsAuthorisation object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseCustomsAuthorisation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseCustomsAuthorisation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseCustomsAuthorisation)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseCustomsAuthorisation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDCustomsWarehouseCustomsAuthorisation
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDCustomsWarehouseGoodsItem
|
|
|
|
#Region "Private fields"
|
|
Private _sequenceNumber As String
|
|
|
|
Private _referencedRegistrationNumber As String
|
|
|
|
Private _referencedSequenceNumber As String
|
|
|
|
Private _accessViaAtlasFlag As String
|
|
|
|
Private _commodityCode As String
|
|
|
|
Private _usualProcessingFlag As String
|
|
|
|
Private _complement As String
|
|
|
|
Private _commercialAmount As FCFCDDCustomsWarehouseGoodsItemCommercialAmount
|
|
|
|
Private _debitAmount As FCFCDDCustomsWarehouseGoodsItemDebitAmount
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._debitAmount = New FCFCDDCustomsWarehouseGoodsItemDebitAmount()
|
|
Me._commercialAmount = New FCFCDDCustomsWarehouseGoodsItemCommercialAmount()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property SequenceNumber() As String
|
|
Get
|
|
Return Me._sequenceNumber
|
|
End Get
|
|
Set
|
|
Me._sequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferencedRegistrationNumber() As String
|
|
Get
|
|
Return Me._referencedRegistrationNumber
|
|
End Get
|
|
Set
|
|
Me._referencedRegistrationNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property ReferencedSequenceNumber() As String
|
|
Get
|
|
Return Me._referencedSequenceNumber
|
|
End Get
|
|
Set
|
|
Me._referencedSequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AccessViaAtlasFlag() As String
|
|
Get
|
|
Return Me._accessViaAtlasFlag
|
|
End Get
|
|
Set
|
|
Me._accessViaAtlasFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CommodityCode() As String
|
|
Get
|
|
Return Me._commodityCode
|
|
End Get
|
|
Set
|
|
Me._commodityCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property UsualProcessingFlag() As String
|
|
Get
|
|
Return Me._usualProcessingFlag
|
|
End Get
|
|
Set
|
|
Me._usualProcessingFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Complement() As String
|
|
Get
|
|
Return Me._complement
|
|
End Get
|
|
Set
|
|
Me._complement = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CommercialAmount() As FCFCDDCustomsWarehouseGoodsItemCommercialAmount
|
|
Get
|
|
Return Me._commercialAmount
|
|
End Get
|
|
Set
|
|
Me._commercialAmount = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property DebitAmount() As FCFCDDCustomsWarehouseGoodsItemDebitAmount
|
|
Get
|
|
Return Me._debitAmount
|
|
End Get
|
|
Set
|
|
Me._debitAmount = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDCustomsWarehouseGoodsItem))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseGoodsItem object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDCustomsWarehouseGoodsItem object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseGoodsItem)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDCustomsWarehouseGoodsItem
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDCustomsWarehouseGoodsItem)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDCustomsWarehouseGoodsItem
|
|
Return CType(Serializer.Deserialize(s), FCFCDDCustomsWarehouseGoodsItem)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseGoodsItem object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDCustomsWarehouseGoodsItem object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseGoodsItem)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDCustomsWarehouseGoodsItem
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDCustomsWarehouseGoodsItemCommercialAmount
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As Decimal
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Quantity() As Decimal
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDCustomsWarehouseGoodsItemCommercialAmount))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseGoodsItemCommercialAmount object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDCustomsWarehouseGoodsItemCommercialAmount object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseGoodsItemCommercialAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemCommercialAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseGoodsItemCommercialAmount)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemCommercialAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDCustomsWarehouseGoodsItemCommercialAmount
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDCustomsWarehouseGoodsItemCommercialAmount)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDCustomsWarehouseGoodsItemCommercialAmount
|
|
Return CType(Serializer.Deserialize(s), FCFCDDCustomsWarehouseGoodsItemCommercialAmount)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseGoodsItemCommercialAmount object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDCustomsWarehouseGoodsItemCommercialAmount object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseGoodsItemCommercialAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemCommercialAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseGoodsItemCommercialAmount)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemCommercialAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDCustomsWarehouseGoodsItemCommercialAmount
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDCustomsWarehouseGoodsItemDebitAmount
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As Decimal
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Quantity() As Decimal
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDCustomsWarehouseGoodsItemDebitAmount))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseGoodsItemDebitAmount object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDCustomsWarehouseGoodsItemDebitAmount object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseGoodsItemDebitAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemDebitAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseGoodsItemDebitAmount)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemDebitAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDCustomsWarehouseGoodsItemDebitAmount
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDCustomsWarehouseGoodsItemDebitAmount)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDCustomsWarehouseGoodsItemDebitAmount
|
|
Return CType(Serializer.Deserialize(s), FCFCDDCustomsWarehouseGoodsItemDebitAmount)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDCustomsWarehouseGoodsItemDebitAmount object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDCustomsWarehouseGoodsItemDebitAmount object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDCustomsWarehouseGoodsItemDebitAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemDebitAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDCustomsWarehouseGoodsItemDebitAmount)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDCustomsWarehouseGoodsItemDebitAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDCustomsWarehouseGoodsItemDebitAmount
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDInwardProcessing
|
|
|
|
#Region "Private fields"
|
|
Private _sequenceNumber As FCFCDDInwardProcessingSequenceNumber
|
|
|
|
Private _goodsItemQuantity As String
|
|
|
|
Private _customsAuthorisation As FCFCDDInwardProcessingCustomsAuthorisation
|
|
|
|
Private _simplifiedGrantAuthorisationFlag As String
|
|
|
|
Private _monitoringCustomsOffice As FCFCDDInwardProcessingMonitoringCustomsOffice
|
|
|
|
Private _goodsItem As List(Of FCFCDDInwardProcessingGoodsItem)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._goodsItem = New List(Of FCFCDDInwardProcessingGoodsItem)()
|
|
Me._monitoringCustomsOffice = New FCFCDDInwardProcessingMonitoringCustomsOffice()
|
|
Me._customsAuthorisation = New FCFCDDInwardProcessingCustomsAuthorisation()
|
|
End Sub
|
|
|
|
Public Property SequenceNumber() As FCFCDDInwardProcessingSequenceNumber
|
|
Get
|
|
Return Me._sequenceNumber
|
|
End Get
|
|
Set
|
|
Me._sequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property GoodsItemQuantity() As String
|
|
Get
|
|
Return Me._goodsItemQuantity
|
|
End Get
|
|
Set
|
|
Me._goodsItemQuantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CustomsAuthorisation() As FCFCDDInwardProcessingCustomsAuthorisation
|
|
Get
|
|
Return Me._customsAuthorisation
|
|
End Get
|
|
Set
|
|
Me._customsAuthorisation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SimplifiedGrantAuthorisationFlag() As String
|
|
Get
|
|
Return Me._simplifiedGrantAuthorisationFlag
|
|
End Get
|
|
Set
|
|
Me._simplifiedGrantAuthorisationFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property MonitoringCustomsOffice() As FCFCDDInwardProcessingMonitoringCustomsOffice
|
|
Get
|
|
Return Me._monitoringCustomsOffice
|
|
End Get
|
|
Set
|
|
Me._monitoringCustomsOffice = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("GoodsItem")>
|
|
Public Property GoodsItem() As List(Of FCFCDDInwardProcessingGoodsItem)
|
|
Get
|
|
Return Me._goodsItem
|
|
End Get
|
|
Set
|
|
Me._goodsItem = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDInwardProcessing))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessing object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDInwardProcessing object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessing object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessing, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessing)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessing) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDInwardProcessing
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDInwardProcessing)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDInwardProcessing
|
|
Return CType(Serializer.Deserialize(s), FCFCDDInwardProcessing)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessing object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDInwardProcessing object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessing object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessing, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessing)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessing) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDInwardProcessing
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDInwardProcessingSequenceNumber
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlEnumAttribute("1")>
|
|
Item1
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDInwardProcessingCustomsAuthorisation
|
|
|
|
#Region "Private fields"
|
|
Private _processingOwner As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ProcessingOwner() As String
|
|
Get
|
|
Return Me._processingOwner
|
|
End Get
|
|
Set
|
|
Me._processingOwner = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDInwardProcessingCustomsAuthorisation))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingCustomsAuthorisation object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDInwardProcessingCustomsAuthorisation object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingCustomsAuthorisation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingCustomsAuthorisation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingCustomsAuthorisation)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingCustomsAuthorisation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDInwardProcessingCustomsAuthorisation
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDInwardProcessingCustomsAuthorisation)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDInwardProcessingCustomsAuthorisation
|
|
Return CType(Serializer.Deserialize(s), FCFCDDInwardProcessingCustomsAuthorisation)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingCustomsAuthorisation object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDInwardProcessingCustomsAuthorisation object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingCustomsAuthorisation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingCustomsAuthorisation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingCustomsAuthorisation)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingCustomsAuthorisation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDInwardProcessingCustomsAuthorisation
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDInwardProcessingMonitoringCustomsOffice
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._identification = New FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDInwardProcessingMonitoringCustomsOffice))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingMonitoringCustomsOffice object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDInwardProcessingMonitoringCustomsOffice object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingMonitoringCustomsOffice object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOffice, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingMonitoringCustomsOffice)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOffice) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDInwardProcessingMonitoringCustomsOffice
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDInwardProcessingMonitoringCustomsOffice)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDInwardProcessingMonitoringCustomsOffice
|
|
Return CType(Serializer.Deserialize(s), FCFCDDInwardProcessingMonitoringCustomsOffice)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingMonitoringCustomsOffice object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDInwardProcessingMonitoringCustomsOffice object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingMonitoringCustomsOffice object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOffice, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingMonitoringCustomsOffice)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOffice) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDInwardProcessingMonitoringCustomsOffice
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDInwardProcessingMonitoringCustomsOfficeIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDInwardProcessingGoodsItem
|
|
|
|
#Region "Private fields"
|
|
Private _sequenceNumber As String
|
|
|
|
Private _referencedRegistrationNumber As String
|
|
|
|
Private _referencedSequenceNumber As String
|
|
|
|
Private _accessViaAtlasFlag As String
|
|
|
|
Private _goodsRelatedInformation As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property SequenceNumber() As String
|
|
Get
|
|
Return Me._sequenceNumber
|
|
End Get
|
|
Set
|
|
Me._sequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferencedRegistrationNumber() As String
|
|
Get
|
|
Return Me._referencedRegistrationNumber
|
|
End Get
|
|
Set
|
|
Me._referencedRegistrationNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property ReferencedSequenceNumber() As String
|
|
Get
|
|
Return Me._referencedSequenceNumber
|
|
End Get
|
|
Set
|
|
Me._referencedSequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AccessViaAtlasFlag() As String
|
|
Get
|
|
Return Me._accessViaAtlasFlag
|
|
End Get
|
|
Set
|
|
Me._accessViaAtlasFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property GoodsRelatedInformation() As String
|
|
Get
|
|
Return Me._goodsRelatedInformation
|
|
End Get
|
|
Set
|
|
Me._goodsRelatedInformation = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDInwardProcessingGoodsItem))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingGoodsItem object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDInwardProcessingGoodsItem object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingGoodsItem)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDInwardProcessingGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDInwardProcessingGoodsItem
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDInwardProcessingGoodsItem)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDInwardProcessingGoodsItem
|
|
Return CType(Serializer.Deserialize(s), FCFCDDInwardProcessingGoodsItem)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDInwardProcessingGoodsItem object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDInwardProcessingGoodsItem object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDInwardProcessingGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDInwardProcessingGoodsItem)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDInwardProcessingGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDInwardProcessingGoodsItem
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBody
|
|
|
|
#Region "Private fields"
|
|
Private _customsValueFlag As String
|
|
|
|
Private _consignor As FCFCDDBodyConsignor
|
|
|
|
Private _consignee As FCFCDDBodyConsignee
|
|
|
|
Private _acquirer As FCFCDDBodyAcquirer
|
|
|
|
Private _containers As FCFCDDBodyContainers
|
|
|
|
Private _deliveryTerms As FCFCDDBodyDeliveryTerms
|
|
|
|
Private _paymentTransaction As FCFCDDBodyPaymentTransaction
|
|
|
|
Private _foreignTradeStatistics As FCFCDDBodyForeignTradeStatistics
|
|
|
|
Private _customsValue As FCFCDDBodyCustomsValue
|
|
|
|
Private _document As List(Of FCFCDDBodyDocument)
|
|
|
|
Private _goodsItem As List(Of FCFCDDBodyGoodsItem)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._goodsItem = New List(Of FCFCDDBodyGoodsItem)()
|
|
Me._document = New List(Of FCFCDDBodyDocument)()
|
|
Me._customsValue = New FCFCDDBodyCustomsValue()
|
|
Me._foreignTradeStatistics = New FCFCDDBodyForeignTradeStatistics()
|
|
Me._paymentTransaction = New FCFCDDBodyPaymentTransaction()
|
|
Me._deliveryTerms = New FCFCDDBodyDeliveryTerms()
|
|
Me._containers = New FCFCDDBodyContainers()
|
|
Me._acquirer = New FCFCDDBodyAcquirer()
|
|
Me._consignee = New FCFCDDBodyConsignee()
|
|
Me._consignor = New FCFCDDBodyConsignor()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CustomsValueFlag() As String
|
|
Get
|
|
Return Me._customsValueFlag
|
|
End Get
|
|
Set
|
|
Me._customsValueFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Consignor() As FCFCDDBodyConsignor
|
|
Get
|
|
Return Me._consignor
|
|
End Get
|
|
Set
|
|
Me._consignor = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Consignee() As FCFCDDBodyConsignee
|
|
Get
|
|
Return Me._consignee
|
|
End Get
|
|
Set
|
|
Me._consignee = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Acquirer() As FCFCDDBodyAcquirer
|
|
Get
|
|
Return Me._acquirer
|
|
End Get
|
|
Set
|
|
Me._acquirer = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Containers() As FCFCDDBodyContainers
|
|
Get
|
|
Return Me._containers
|
|
End Get
|
|
Set
|
|
Me._containers = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property DeliveryTerms() As FCFCDDBodyDeliveryTerms
|
|
Get
|
|
Return Me._deliveryTerms
|
|
End Get
|
|
Set
|
|
Me._deliveryTerms = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PaymentTransaction() As FCFCDDBodyPaymentTransaction
|
|
Get
|
|
Return Me._paymentTransaction
|
|
End Get
|
|
Set
|
|
Me._paymentTransaction = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ForeignTradeStatistics() As FCFCDDBodyForeignTradeStatistics
|
|
Get
|
|
Return Me._foreignTradeStatistics
|
|
End Get
|
|
Set
|
|
Me._foreignTradeStatistics = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CustomsValue() As FCFCDDBodyCustomsValue
|
|
Get
|
|
Return Me._customsValue
|
|
End Get
|
|
Set
|
|
Me._customsValue = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Document")>
|
|
Public Property Document() As List(Of FCFCDDBodyDocument)
|
|
Get
|
|
Return Me._document
|
|
End Get
|
|
Set
|
|
Me._document = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("GoodsItem")>
|
|
Public Property GoodsItem() As List(Of FCFCDDBodyGoodsItem)
|
|
Get
|
|
Return Me._goodsItem
|
|
End Get
|
|
Set
|
|
Me._goodsItem = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBody))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBody object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBody object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBody object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBody, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBody)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBody) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBody
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBody)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBody
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBody)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBody object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBody object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBody object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBody, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBody)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBody) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBody
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyConsignor
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDBodyConsignorIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _address As FCFCDDBodyConsignorAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDBodyConsignorAddress()
|
|
Me._identification = New FCFCDDBodyConsignorIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDBodyConsignorIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDBodyConsignorAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyConsignor))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignor object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyConsignor object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignor object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignor, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignor)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignor) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyConsignor
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyConsignor)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyConsignor
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyConsignor)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignor object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyConsignor object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignor object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignor, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignor)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignor) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyConsignor
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyConsignorIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyConsignorIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignorIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyConsignorIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignorIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignorIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignorIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignorIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyConsignorIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyConsignorIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyConsignorIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyConsignorIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignorIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyConsignorIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignorIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignorIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignorIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignorIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyConsignorIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyConsignorAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyConsignorAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignorAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyConsignorAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignorAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignorAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignorAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignorAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyConsignorAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyConsignorAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyConsignorAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyConsignorAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignorAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyConsignorAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignorAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignorAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignorAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignorAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyConsignorAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyConsignee
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDBodyConsigneeIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _address As FCFCDDBodyConsigneeAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDBodyConsigneeAddress()
|
|
Me._identification = New FCFCDDBodyConsigneeIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDBodyConsigneeIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDBodyConsigneeAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyConsignee))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignee object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyConsignee object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignee object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignee, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignee)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsignee) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyConsignee
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyConsignee)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyConsignee
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyConsignee)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsignee object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyConsignee object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsignee object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignee, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsignee)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsignee) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyConsignee
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyConsigneeIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private _subsidiaryNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SubsidiaryNumber() As String
|
|
Get
|
|
Return Me._subsidiaryNumber
|
|
End Get
|
|
Set
|
|
Me._subsidiaryNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyConsigneeIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsigneeIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyConsigneeIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsigneeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsigneeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsigneeIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsigneeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyConsigneeIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyConsigneeIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyConsigneeIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyConsigneeIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsigneeIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyConsigneeIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsigneeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsigneeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsigneeIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsigneeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyConsigneeIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyConsigneeAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyConsigneeAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsigneeAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyConsigneeAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsigneeAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsigneeAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsigneeAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyConsigneeAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyConsigneeAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyConsigneeAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyConsigneeAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyConsigneeAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyConsigneeAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyConsigneeAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyConsigneeAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsigneeAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyConsigneeAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyConsigneeAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyConsigneeAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyAcquirer
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDBodyAcquirerIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _taxNumber As String
|
|
|
|
Private _address As FCFCDDBodyAcquirerAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDBodyAcquirerAddress()
|
|
Me._identification = New FCFCDDBodyAcquirerIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDBodyAcquirerIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property TaxNumber() As String
|
|
Get
|
|
Return Me._taxNumber
|
|
End Get
|
|
Set
|
|
Me._taxNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDBodyAcquirerAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyAcquirer))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyAcquirer object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyAcquirer object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyAcquirer object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyAcquirer, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyAcquirer)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyAcquirer) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyAcquirer
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyAcquirer)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyAcquirer
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyAcquirer)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyAcquirer object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyAcquirer object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyAcquirer object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyAcquirer, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyAcquirer)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyAcquirer) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyAcquirer
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyAcquirerIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private _subsidiaryNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SubsidiaryNumber() As String
|
|
Get
|
|
Return Me._subsidiaryNumber
|
|
End Get
|
|
Set
|
|
Me._subsidiaryNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyAcquirerIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyAcquirerIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyAcquirerIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyAcquirerIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyAcquirerIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyAcquirerIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyAcquirerIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyAcquirerIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyAcquirerIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyAcquirerIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyAcquirerIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyAcquirerIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyAcquirerIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyAcquirerIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyAcquirerIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyAcquirerIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyAcquirerIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyAcquirerIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyAcquirerAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyAcquirerAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyAcquirerAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyAcquirerAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyAcquirerAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyAcquirerAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyAcquirerAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyAcquirerAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyAcquirerAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyAcquirerAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyAcquirerAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyAcquirerAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyAcquirerAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyAcquirerAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyAcquirerAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyAcquirerAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyAcquirerAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyAcquirerAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyAcquirerAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyContainers
|
|
|
|
#Region "Private fields"
|
|
Private _containerFlag As String
|
|
|
|
Private _container As List(Of FCFCDDBodyContainersContainer)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._container = New List(Of FCFCDDBodyContainersContainer)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ContainerFlag() As String
|
|
Get
|
|
Return Me._containerFlag
|
|
End Get
|
|
Set
|
|
Me._containerFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Container")>
|
|
Public Property Container() As List(Of FCFCDDBodyContainersContainer)
|
|
Get
|
|
Return Me._container
|
|
End Get
|
|
Set
|
|
Me._container = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyContainers))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyContainers object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyContainers object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyContainers object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyContainers, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyContainers)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyContainers) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyContainers
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyContainers)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyContainers
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyContainers)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyContainers object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyContainers object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyContainers object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyContainers, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyContainers)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyContainers) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyContainers
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyContainersContainer
|
|
|
|
#Region "Private fields"
|
|
Private _identificationNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property IdentificationNumber() As String
|
|
Get
|
|
Return Me._identificationNumber
|
|
End Get
|
|
Set
|
|
Me._identificationNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyContainersContainer))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyContainersContainer object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyContainersContainer object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyContainersContainer object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyContainersContainer, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyContainersContainer)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyContainersContainer) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyContainersContainer
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyContainersContainer)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyContainersContainer
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyContainersContainer)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyContainersContainer object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyContainersContainer object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyContainersContainer object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyContainersContainer, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyContainersContainer)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyContainersContainer) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyContainersContainer
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyDeliveryTerms
|
|
|
|
#Region "Private fields"
|
|
Private _code As String
|
|
|
|
Private _description As String
|
|
|
|
Private _place As String
|
|
|
|
Private _key As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Code() As String
|
|
Get
|
|
Return Me._code
|
|
End Get
|
|
Set
|
|
Me._code = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Description() As String
|
|
Get
|
|
Return Me._description
|
|
End Get
|
|
Set
|
|
Me._description = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Place() As String
|
|
Get
|
|
Return Me._place
|
|
End Get
|
|
Set
|
|
Me._place = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Key() As String
|
|
Get
|
|
Return Me._key
|
|
End Get
|
|
Set
|
|
Me._key = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyDeliveryTerms))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyDeliveryTerms object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyDeliveryTerms object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyDeliveryTerms object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyDeliveryTerms, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyDeliveryTerms)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyDeliveryTerms) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyDeliveryTerms
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyDeliveryTerms)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyDeliveryTerms
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyDeliveryTerms)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyDeliveryTerms object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyDeliveryTerms object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyDeliveryTerms object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyDeliveryTerms, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyDeliveryTerms)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyDeliveryTerms) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyDeliveryTerms
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyPaymentTransaction
|
|
|
|
#Region "Private fields"
|
|
Private _amount As Decimal
|
|
|
|
Private _currencyCode As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Amount() As Decimal
|
|
Get
|
|
Return Me._amount
|
|
End Get
|
|
Set
|
|
Me._amount = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyCode() As String
|
|
Get
|
|
Return Me._currencyCode
|
|
End Get
|
|
Set
|
|
Me._currencyCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyPaymentTransaction))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyPaymentTransaction object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyPaymentTransaction object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyPaymentTransaction object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyPaymentTransaction, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyPaymentTransaction)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyPaymentTransaction) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyPaymentTransaction
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyPaymentTransaction)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyPaymentTransaction
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyPaymentTransaction)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyPaymentTransaction object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyPaymentTransaction object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyPaymentTransaction object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyPaymentTransaction, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyPaymentTransaction)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyPaymentTransaction) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyPaymentTransaction
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyForeignTradeStatistics
|
|
|
|
#Region "Private fields"
|
|
Private _goodsStatus As String
|
|
|
|
Private _transactionType As String
|
|
|
|
Private _destinationCountry As String
|
|
|
|
Private _destinationFederalState As String
|
|
|
|
Private _inlandTransportMode As String
|
|
|
|
Private _totalGrossMassMeasure As Decimal
|
|
|
|
Private _entryCustomsOffice As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._entryCustomsOffice = New FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property GoodsStatus() As String
|
|
Get
|
|
Return Me._goodsStatus
|
|
End Get
|
|
Set
|
|
Me._goodsStatus = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property TransactionType() As String
|
|
Get
|
|
Return Me._transactionType
|
|
End Get
|
|
Set
|
|
Me._transactionType = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DestinationCountry() As String
|
|
Get
|
|
Return Me._destinationCountry
|
|
End Get
|
|
Set
|
|
Me._destinationCountry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DestinationFederalState() As String
|
|
Get
|
|
Return Me._destinationFederalState
|
|
End Get
|
|
Set
|
|
Me._destinationFederalState = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property InlandTransportMode() As String
|
|
Get
|
|
Return Me._inlandTransportMode
|
|
End Get
|
|
Set
|
|
Me._inlandTransportMode = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property TotalGrossMassMeasure() As Decimal
|
|
Get
|
|
Return Me._totalGrossMassMeasure
|
|
End Get
|
|
Set
|
|
Me._totalGrossMassMeasure = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property EntryCustomsOffice() As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice
|
|
Get
|
|
Return Me._entryCustomsOffice
|
|
End Get
|
|
Set
|
|
Me._entryCustomsOffice = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyForeignTradeStatistics))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyForeignTradeStatistics object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyForeignTradeStatistics object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyForeignTradeStatistics object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyForeignTradeStatistics, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyForeignTradeStatistics)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyForeignTradeStatistics) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyForeignTradeStatistics
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyForeignTradeStatistics)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyForeignTradeStatistics
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyForeignTradeStatistics)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyForeignTradeStatistics object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyForeignTradeStatistics object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyForeignTradeStatistics object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyForeignTradeStatistics, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyForeignTradeStatistics)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyForeignTradeStatistics) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyForeignTradeStatistics
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyForeignTradeStatisticsEntryCustomsOffice
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValue
|
|
|
|
#Region "Private fields"
|
|
Private _formerDecisions As String
|
|
|
|
Private _vendor As FCFCDDBodyCustomsValueVendor
|
|
|
|
Private _vendee As FCFCDDBodyCustomsValueVendee
|
|
|
|
Private _affiliation As FCFCDDBodyCustomsValueAffiliation
|
|
|
|
Private _restrictionOrCondition As FCFCDDBodyCustomsValueRestrictionOrCondition
|
|
|
|
Private _licenseFee As FCFCDDBodyCustomsValueLicenseFee
|
|
|
|
Private _resale As FCFCDDBodyCustomsValueResale
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._resale = New FCFCDDBodyCustomsValueResale()
|
|
Me._licenseFee = New FCFCDDBodyCustomsValueLicenseFee()
|
|
Me._restrictionOrCondition = New FCFCDDBodyCustomsValueRestrictionOrCondition()
|
|
Me._affiliation = New FCFCDDBodyCustomsValueAffiliation()
|
|
Me._vendee = New FCFCDDBodyCustomsValueVendee()
|
|
Me._vendor = New FCFCDDBodyCustomsValueVendor()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property FormerDecisions() As String
|
|
Get
|
|
Return Me._formerDecisions
|
|
End Get
|
|
Set
|
|
Me._formerDecisions = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Vendor() As FCFCDDBodyCustomsValueVendor
|
|
Get
|
|
Return Me._vendor
|
|
End Get
|
|
Set
|
|
Me._vendor = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Vendee() As FCFCDDBodyCustomsValueVendee
|
|
Get
|
|
Return Me._vendee
|
|
End Get
|
|
Set
|
|
Me._vendee = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Affiliation() As FCFCDDBodyCustomsValueAffiliation
|
|
Get
|
|
Return Me._affiliation
|
|
End Get
|
|
Set
|
|
Me._affiliation = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property RestrictionOrCondition() As FCFCDDBodyCustomsValueRestrictionOrCondition
|
|
Get
|
|
Return Me._restrictionOrCondition
|
|
End Get
|
|
Set
|
|
Me._restrictionOrCondition = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property LicenseFee() As FCFCDDBodyCustomsValueLicenseFee
|
|
Get
|
|
Return Me._licenseFee
|
|
End Get
|
|
Set
|
|
Me._licenseFee = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Resale() As FCFCDDBodyCustomsValueResale
|
|
Get
|
|
Return Me._resale
|
|
End Get
|
|
Set
|
|
Me._resale = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValue))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValue object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValue object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValue object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValue, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValue)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValue) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValue
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValue)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValue
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValue)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValue object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValue object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValue object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValue, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValue)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValue) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValue
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueVendor
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDBodyCustomsValueVendorIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _address As FCFCDDBodyCustomsValueVendorAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDBodyCustomsValueVendorAddress()
|
|
Me._identification = New FCFCDDBodyCustomsValueVendorIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDBodyCustomsValueVendorIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDBodyCustomsValueVendorAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueVendor))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendor object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueVendor object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendor object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendor, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendor)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendor) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueVendor
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueVendor)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueVendor
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueVendor)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendor object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueVendor object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendor object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendor, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendor)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendor) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueVendor
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueVendorIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueVendorIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendorIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueVendorIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendorIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendorIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendorIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendorIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueVendorIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueVendorIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueVendorIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueVendorIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendorIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueVendorIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendorIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendorIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendorIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendorIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueVendorIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueVendorAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueVendorAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendorAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueVendorAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendorAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendorAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendorAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendorAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueVendorAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueVendorAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueVendorAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueVendorAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendorAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueVendorAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendorAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendorAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendorAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendorAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueVendorAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueVendee
|
|
|
|
#Region "Private fields"
|
|
Private _identification As FCFCDDBodyCustomsValueVendeeIdentification
|
|
|
|
Private _name As String
|
|
|
|
Private _address As FCFCDDBodyCustomsValueVendeeAddress
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._address = New FCFCDDBodyCustomsValueVendeeAddress()
|
|
Me._identification = New FCFCDDBodyCustomsValueVendeeIdentification()
|
|
End Sub
|
|
|
|
Public Property Identification() As FCFCDDBodyCustomsValueVendeeIdentification
|
|
Get
|
|
Return Me._identification
|
|
End Get
|
|
Set
|
|
Me._identification = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Name() As String
|
|
Get
|
|
Return Me._name
|
|
End Get
|
|
Set
|
|
Me._name = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Address() As FCFCDDBodyCustomsValueVendeeAddress
|
|
Get
|
|
Return Me._address
|
|
End Get
|
|
Set
|
|
Me._address = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueVendee))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendee object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueVendee object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendee object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendee, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendee)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendee) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueVendee
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueVendee)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueVendee
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueVendee)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendee object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueVendee object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendee object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendee, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendee)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendee) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueVendee
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueVendeeIdentification
|
|
|
|
#Region "Private fields"
|
|
Private _referenceNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueVendeeIdentification))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendeeIdentification object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueVendeeIdentification object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendeeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendeeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendeeIdentification)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendeeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueVendeeIdentification
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueVendeeIdentification)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueVendeeIdentification
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueVendeeIdentification)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendeeIdentification object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueVendeeIdentification object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendeeIdentification object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendeeIdentification, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendeeIdentification)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendeeIdentification) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueVendeeIdentification
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueVendeeAddress
|
|
|
|
#Region "Private fields"
|
|
Private _line As String
|
|
|
|
Private _country As String
|
|
|
|
Private _postcode As String
|
|
|
|
Private _city As String
|
|
|
|
Private _district As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Line() As String
|
|
Get
|
|
Return Me._line
|
|
End Get
|
|
Set
|
|
Me._line = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Country() As String
|
|
Get
|
|
Return Me._country
|
|
End Get
|
|
Set
|
|
Me._country = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Postcode() As String
|
|
Get
|
|
Return Me._postcode
|
|
End Get
|
|
Set
|
|
Me._postcode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property City() As String
|
|
Get
|
|
Return Me._city
|
|
End Get
|
|
Set
|
|
Me._city = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property District() As String
|
|
Get
|
|
Return Me._district
|
|
End Get
|
|
Set
|
|
Me._district = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueVendeeAddress))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendeeAddress object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueVendeeAddress object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendeeAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendeeAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendeeAddress)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueVendeeAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueVendeeAddress
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueVendeeAddress)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueVendeeAddress
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueVendeeAddress)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueVendeeAddress object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueVendeeAddress object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueVendeeAddress object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendeeAddress, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueVendeeAddress)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueVendeeAddress) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueVendeeAddress
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueAffiliation
|
|
|
|
#Region "Private fields"
|
|
Private _type As String
|
|
|
|
Private _description As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Description() As String
|
|
Get
|
|
Return Me._description
|
|
End Get
|
|
Set
|
|
Me._description = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueAffiliation))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueAffiliation object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueAffiliation object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueAffiliation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueAffiliation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueAffiliation)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueAffiliation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueAffiliation
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueAffiliation)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueAffiliation
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueAffiliation)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueAffiliation object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueAffiliation object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueAffiliation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueAffiliation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueAffiliation)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueAffiliation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueAffiliation
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueRestrictionOrCondition
|
|
|
|
#Region "Private fields"
|
|
Private _restrictionFlag As String
|
|
|
|
Private _conditionFlag As String
|
|
|
|
Private _description As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property RestrictionFlag() As String
|
|
Get
|
|
Return Me._restrictionFlag
|
|
End Get
|
|
Set
|
|
Me._restrictionFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ConditionFlag() As String
|
|
Get
|
|
Return Me._conditionFlag
|
|
End Get
|
|
Set
|
|
Me._conditionFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Description() As String
|
|
Get
|
|
Return Me._description
|
|
End Get
|
|
Set
|
|
Me._description = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueRestrictionOrCondition))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueRestrictionOrCondition object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueRestrictionOrCondition object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueRestrictionOrCondition object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueRestrictionOrCondition, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueRestrictionOrCondition)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueRestrictionOrCondition) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueRestrictionOrCondition
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueRestrictionOrCondition)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueRestrictionOrCondition
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueRestrictionOrCondition)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueRestrictionOrCondition object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueRestrictionOrCondition object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueRestrictionOrCondition object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueRestrictionOrCondition, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueRestrictionOrCondition)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueRestrictionOrCondition) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueRestrictionOrCondition
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueLicenseFee
|
|
|
|
#Region "Private fields"
|
|
Private _licenseFeeFlag As String
|
|
|
|
Private _description As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property LicenseFeeFlag() As String
|
|
Get
|
|
Return Me._licenseFeeFlag
|
|
End Get
|
|
Set
|
|
Me._licenseFeeFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Description() As String
|
|
Get
|
|
Return Me._description
|
|
End Get
|
|
Set
|
|
Me._description = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueLicenseFee))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueLicenseFee object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueLicenseFee object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueLicenseFee object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueLicenseFee, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueLicenseFee)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueLicenseFee) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueLicenseFee
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueLicenseFee)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueLicenseFee
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueLicenseFee)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueLicenseFee object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueLicenseFee object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueLicenseFee object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueLicenseFee, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueLicenseFee)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueLicenseFee) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueLicenseFee
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyCustomsValueResale
|
|
|
|
#Region "Private fields"
|
|
Private _resaleFlag As String
|
|
|
|
Private _description As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ResaleFlag() As String
|
|
Get
|
|
Return Me._resaleFlag
|
|
End Get
|
|
Set
|
|
Me._resaleFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Description() As String
|
|
Get
|
|
Return Me._description
|
|
End Get
|
|
Set
|
|
Me._description = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyCustomsValueResale))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueResale object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyCustomsValueResale object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueResale object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueResale, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueResale)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyCustomsValueResale) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyCustomsValueResale
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyCustomsValueResale)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyCustomsValueResale
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyCustomsValueResale)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyCustomsValueResale object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyCustomsValueResale object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyCustomsValueResale object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueResale, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyCustomsValueResale)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyCustomsValueResale) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyCustomsValueResale
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyDocument
|
|
|
|
#Region "Private fields"
|
|
Private _division As FCFCDDBodyDocumentDivision
|
|
|
|
Private _type As String
|
|
|
|
Private _referenceNumber As String
|
|
|
|
Private _issuingDate As Date
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Division() As FCFCDDBodyDocumentDivision
|
|
Get
|
|
Return Me._division
|
|
End Get
|
|
Set
|
|
Me._division = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="date")>
|
|
Public Property IssuingDate() As Date
|
|
Get
|
|
Return Me._issuingDate
|
|
End Get
|
|
Set
|
|
Me._issuingDate = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyDocument))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyDocument object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyDocument object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyDocument object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyDocument, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyDocument)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyDocument) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyDocument
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyDocument)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyDocument
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyDocument)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyDocument object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyDocument object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyDocument object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyDocument, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyDocument)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyDocument) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyDocument
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Public Enum FCFCDDBodyDocumentDivision
|
|
|
|
'''<remarks/>
|
|
<System.Xml.Serialization.XmlEnumAttribute("4")>
|
|
Item4
|
|
End Enum
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItem
|
|
|
|
#Region "Private fields"
|
|
Private _sequenceNumber As String
|
|
|
|
Private _procedure As FCFCDDBodyGoodsItemProcedure
|
|
|
|
Private _cessionManagementFlag As String
|
|
|
|
Private _goodsDescription As String
|
|
|
|
Private _invoiceAmount As Decimal
|
|
|
|
Private _netMassMeasure As Decimal
|
|
|
|
Private _originCountry As String
|
|
|
|
Private _supplementaryInformation As String
|
|
|
|
Private _condition As String
|
|
|
|
Private _tobaccoRevenueStampNumber As String
|
|
|
|
Private _commodityCode As FCFCDDBodyGoodsItemCommodityCode
|
|
|
|
Private _additionalProcedure As List(Of FCFCDDBodyGoodsItemAdditionalProcedure)
|
|
|
|
Private _supplementaryCodes As List(Of FCFCDDBodyGoodsItemSupplementaryCodes)
|
|
|
|
Private _package As FCFCDDBodyGoodsItemPackage
|
|
|
|
Private _foreignTradeStatistics As FCFCDDBodyGoodsItemForeignTradeStatistics
|
|
|
|
Private _customsValue As FCFCDDBodyGoodsItemCustomsValue
|
|
|
|
Private _assessment As FCFCDDBodyGoodsItemAssessment
|
|
|
|
Private _exciseDuty As List(Of FCFCDDBodyGoodsItemExciseDuty)
|
|
|
|
Private _preferentialTreatment As FCFCDDBodyGoodsItemPreferentialTreatment
|
|
|
|
Private _outwardProcessingReduction As List(Of FCFCDDBodyGoodsItemOutwardProcessingReduction)
|
|
|
|
Private _specialCase As List(Of FCFCDDBodyGoodsItemSpecialCase)
|
|
|
|
Private _document As List(Of FCFCDDBodyGoodsItemDocument)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._document = New List(Of FCFCDDBodyGoodsItemDocument)()
|
|
Me._specialCase = New List(Of FCFCDDBodyGoodsItemSpecialCase)()
|
|
Me._outwardProcessingReduction = New List(Of FCFCDDBodyGoodsItemOutwardProcessingReduction)()
|
|
Me._preferentialTreatment = New FCFCDDBodyGoodsItemPreferentialTreatment()
|
|
Me._exciseDuty = New List(Of FCFCDDBodyGoodsItemExciseDuty)()
|
|
Me._assessment = New FCFCDDBodyGoodsItemAssessment()
|
|
Me._customsValue = New FCFCDDBodyGoodsItemCustomsValue()
|
|
Me._foreignTradeStatistics = New FCFCDDBodyGoodsItemForeignTradeStatistics()
|
|
Me._package = New FCFCDDBodyGoodsItemPackage()
|
|
Me._supplementaryCodes = New List(Of FCFCDDBodyGoodsItemSupplementaryCodes)()
|
|
Me._additionalProcedure = New List(Of FCFCDDBodyGoodsItemAdditionalProcedure)()
|
|
Me._commodityCode = New FCFCDDBodyGoodsItemCommodityCode()
|
|
Me._procedure = New FCFCDDBodyGoodsItemProcedure()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property SequenceNumber() As String
|
|
Get
|
|
Return Me._sequenceNumber
|
|
End Get
|
|
Set
|
|
Me._sequenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Procedure() As FCFCDDBodyGoodsItemProcedure
|
|
Get
|
|
Return Me._procedure
|
|
End Get
|
|
Set
|
|
Me._procedure = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CessionManagementFlag() As String
|
|
Get
|
|
Return Me._cessionManagementFlag
|
|
End Get
|
|
Set
|
|
Me._cessionManagementFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property GoodsDescription() As String
|
|
Get
|
|
Return Me._goodsDescription
|
|
End Get
|
|
Set
|
|
Me._goodsDescription = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property InvoiceAmount() As Decimal
|
|
Get
|
|
Return Me._invoiceAmount
|
|
End Get
|
|
Set
|
|
Me._invoiceAmount = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property NetMassMeasure() As Decimal
|
|
Get
|
|
Return Me._netMassMeasure
|
|
End Get
|
|
Set
|
|
Me._netMassMeasure = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property OriginCountry() As String
|
|
Get
|
|
Return Me._originCountry
|
|
End Get
|
|
Set
|
|
Me._originCountry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property SupplementaryInformation() As String
|
|
Get
|
|
Return Me._supplementaryInformation
|
|
End Get
|
|
Set
|
|
Me._supplementaryInformation = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Condition() As String
|
|
Get
|
|
Return Me._condition
|
|
End Get
|
|
Set
|
|
Me._condition = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property TobaccoRevenueStampNumber() As String
|
|
Get
|
|
Return Me._tobaccoRevenueStampNumber
|
|
End Get
|
|
Set
|
|
Me._tobaccoRevenueStampNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CommodityCode() As FCFCDDBodyGoodsItemCommodityCode
|
|
Get
|
|
Return Me._commodityCode
|
|
End Get
|
|
Set
|
|
Me._commodityCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("AdditionalProcedure")>
|
|
Public Property AdditionalProcedure() As List(Of FCFCDDBodyGoodsItemAdditionalProcedure)
|
|
Get
|
|
Return Me._additionalProcedure
|
|
End Get
|
|
Set
|
|
Me._additionalProcedure = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("SupplementaryCodes")>
|
|
Public Property SupplementaryCodes() As List(Of FCFCDDBodyGoodsItemSupplementaryCodes)
|
|
Get
|
|
Return Me._supplementaryCodes
|
|
End Get
|
|
Set
|
|
Me._supplementaryCodes = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Package() As FCFCDDBodyGoodsItemPackage
|
|
Get
|
|
Return Me._package
|
|
End Get
|
|
Set
|
|
Me._package = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ForeignTradeStatistics() As FCFCDDBodyGoodsItemForeignTradeStatistics
|
|
Get
|
|
Return Me._foreignTradeStatistics
|
|
End Get
|
|
Set
|
|
Me._foreignTradeStatistics = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CustomsValue() As FCFCDDBodyGoodsItemCustomsValue
|
|
Get
|
|
Return Me._customsValue
|
|
End Get
|
|
Set
|
|
Me._customsValue = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Assessment() As FCFCDDBodyGoodsItemAssessment
|
|
Get
|
|
Return Me._assessment
|
|
End Get
|
|
Set
|
|
Me._assessment = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("ExciseDuty")>
|
|
Public Property ExciseDuty() As List(Of FCFCDDBodyGoodsItemExciseDuty)
|
|
Get
|
|
Return Me._exciseDuty
|
|
End Get
|
|
Set
|
|
Me._exciseDuty = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PreferentialTreatment() As FCFCDDBodyGoodsItemPreferentialTreatment
|
|
Get
|
|
Return Me._preferentialTreatment
|
|
End Get
|
|
Set
|
|
Me._preferentialTreatment = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("OutwardProcessingReduction")>
|
|
Public Property OutwardProcessingReduction() As List(Of FCFCDDBodyGoodsItemOutwardProcessingReduction)
|
|
Get
|
|
Return Me._outwardProcessingReduction
|
|
End Get
|
|
Set
|
|
Me._outwardProcessingReduction = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("SpecialCase")>
|
|
Public Property SpecialCase() As List(Of FCFCDDBodyGoodsItemSpecialCase)
|
|
Get
|
|
Return Me._specialCase
|
|
End Get
|
|
Set
|
|
Me._specialCase = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Document")>
|
|
Public Property Document() As List(Of FCFCDDBodyGoodsItemDocument)
|
|
Get
|
|
Return Me._document
|
|
End Get
|
|
Set
|
|
Me._document = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItem))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItem object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItem object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItem)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItem
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItem)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItem
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItem)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItem object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItem object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItem object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItem)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItem) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItem
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemProcedure
|
|
|
|
#Region "Private fields"
|
|
Private _requestedPreviousProcedure As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property RequestedPreviousProcedure() As String
|
|
Get
|
|
Return Me._requestedPreviousProcedure
|
|
End Get
|
|
Set
|
|
Me._requestedPreviousProcedure = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemProcedure))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemProcedure object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemProcedure object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemProcedure object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemProcedure, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemProcedure)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemProcedure) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemProcedure
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemProcedure)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemProcedure
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemProcedure)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemProcedure object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemProcedure object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemProcedure object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemProcedure, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemProcedure)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemProcedure) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemProcedure
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemCommodityCode
|
|
|
|
#Region "Private fields"
|
|
Private _commodityCode As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CommodityCode() As String
|
|
Get
|
|
Return Me._commodityCode
|
|
End Get
|
|
Set
|
|
Me._commodityCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemCommodityCode))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCommodityCode object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemCommodityCode object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCommodityCode object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCommodityCode, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCommodityCode)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCommodityCode) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemCommodityCode
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemCommodityCode)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemCommodityCode
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemCommodityCode)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCommodityCode object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemCommodityCode object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCommodityCode object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCommodityCode, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCommodityCode)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCommodityCode) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemCommodityCode
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemAdditionalProcedure
|
|
|
|
#Region "Private fields"
|
|
Private _code As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Code() As String
|
|
Get
|
|
Return Me._code
|
|
End Get
|
|
Set
|
|
Me._code = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemAdditionalProcedure))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAdditionalProcedure object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemAdditionalProcedure object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAdditionalProcedure object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAdditionalProcedure, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAdditionalProcedure)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAdditionalProcedure) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemAdditionalProcedure
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemAdditionalProcedure)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemAdditionalProcedure
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemAdditionalProcedure)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAdditionalProcedure object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemAdditionalProcedure object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAdditionalProcedure object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAdditionalProcedure, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAdditionalProcedure)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAdditionalProcedure) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemAdditionalProcedure
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemSupplementaryCodes
|
|
|
|
#Region "Private fields"
|
|
Private _code As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Code() As String
|
|
Get
|
|
Return Me._code
|
|
End Get
|
|
Set
|
|
Me._code = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemSupplementaryCodes))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemSupplementaryCodes object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemSupplementaryCodes object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemSupplementaryCodes object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemSupplementaryCodes, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemSupplementaryCodes)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemSupplementaryCodes) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemSupplementaryCodes
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemSupplementaryCodes)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemSupplementaryCodes
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemSupplementaryCodes)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemSupplementaryCodes object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemSupplementaryCodes object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemSupplementaryCodes object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemSupplementaryCodes, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemSupplementaryCodes)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemSupplementaryCodes) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemSupplementaryCodes
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemPackage
|
|
|
|
#Region "Private fields"
|
|
Private _kind As String
|
|
|
|
Private _quantity As String
|
|
|
|
Private _marksNumbers As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Kind() As String
|
|
Get
|
|
Return Me._kind
|
|
End Get
|
|
Set
|
|
Me._kind = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property Quantity() As String
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MarksNumbers() As String
|
|
Get
|
|
Return Me._marksNumbers
|
|
End Get
|
|
Set
|
|
Me._marksNumbers = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemPackage))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPackage object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemPackage object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPackage object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPackage, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPackage)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPackage) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemPackage
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemPackage)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemPackage
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemPackage)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPackage object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemPackage object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPackage object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPackage, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPackage)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPackage) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemPackage
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemForeignTradeStatistics
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As String
|
|
|
|
Private _grossMassMeasure As Decimal
|
|
|
|
Private _amount As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._amount = New FCFCDDBodyGoodsItemForeignTradeStatisticsAmount()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property Quantity() As String
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property GrossMassMeasure() As Decimal
|
|
Get
|
|
Return Me._grossMassMeasure
|
|
End Get
|
|
Set
|
|
Me._grossMassMeasure = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Amount() As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount
|
|
Get
|
|
Return Me._amount
|
|
End Get
|
|
Set
|
|
Me._amount = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemForeignTradeStatistics))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemForeignTradeStatistics object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemForeignTradeStatistics object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemForeignTradeStatistics object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatistics, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemForeignTradeStatistics)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatistics) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemForeignTradeStatistics
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemForeignTradeStatistics)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemForeignTradeStatistics
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemForeignTradeStatistics)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemForeignTradeStatistics object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemForeignTradeStatistics object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemForeignTradeStatistics object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatistics, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemForeignTradeStatistics)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatistics) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemForeignTradeStatistics
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemForeignTradeStatisticsAmount
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As Decimal
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Quantity() As Decimal
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemForeignTradeStatisticsAmount))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemForeignTradeStatisticsAmount object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemForeignTradeStatisticsAmount object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemForeignTradeStatisticsAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemForeignTradeStatisticsAmount)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemForeignTradeStatisticsAmount)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemForeignTradeStatisticsAmount)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemForeignTradeStatisticsAmount object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemForeignTradeStatisticsAmount object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemForeignTradeStatisticsAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemForeignTradeStatisticsAmount)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemForeignTradeStatisticsAmount
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemCustomsValue
|
|
|
|
#Region "Private fields"
|
|
Private _departureAirport As String
|
|
|
|
Private _destinationPlace As String
|
|
|
|
Private _additionDeductionDescription As String
|
|
|
|
Private _netPrice As FCFCDDBodyGoodsItemCustomsValueNetPrice
|
|
|
|
Private _indirectPayment As FCFCDDBodyGoodsItemCustomsValueIndirectPayment
|
|
|
|
Private _airFreightCosts As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts
|
|
|
|
Private _additionDeduction As List(Of FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._additionDeduction = New List(Of FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)()
|
|
Me._airFreightCosts = New FCFCDDBodyGoodsItemCustomsValueAirFreightCosts()
|
|
Me._indirectPayment = New FCFCDDBodyGoodsItemCustomsValueIndirectPayment()
|
|
Me._netPrice = New FCFCDDBodyGoodsItemCustomsValueNetPrice()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DepartureAirport() As String
|
|
Get
|
|
Return Me._departureAirport
|
|
End Get
|
|
Set
|
|
Me._departureAirport = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property DestinationPlace() As String
|
|
Get
|
|
Return Me._destinationPlace
|
|
End Get
|
|
Set
|
|
Me._destinationPlace = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AdditionDeductionDescription() As String
|
|
Get
|
|
Return Me._additionDeductionDescription
|
|
End Get
|
|
Set
|
|
Me._additionDeductionDescription = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property NetPrice() As FCFCDDBodyGoodsItemCustomsValueNetPrice
|
|
Get
|
|
Return Me._netPrice
|
|
End Get
|
|
Set
|
|
Me._netPrice = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property IndirectPayment() As FCFCDDBodyGoodsItemCustomsValueIndirectPayment
|
|
Get
|
|
Return Me._indirectPayment
|
|
End Get
|
|
Set
|
|
Me._indirectPayment = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property AirFreightCosts() As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts
|
|
Get
|
|
Return Me._airFreightCosts
|
|
End Get
|
|
Set
|
|
Me._airFreightCosts = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("AdditionDeduction")>
|
|
Public Property AdditionDeduction() As List(Of FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)
|
|
Get
|
|
Return Me._additionDeduction
|
|
End Get
|
|
Set
|
|
Me._additionDeduction = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemCustomsValue))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValue object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemCustomsValue object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValue object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValue, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValue)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValue) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemCustomsValue
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemCustomsValue)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemCustomsValue
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemCustomsValue)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValue object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemCustomsValue object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValue object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValue, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValue)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValue) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemCustomsValue
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemCustomsValueNetPrice
|
|
|
|
#Region "Private fields"
|
|
Private _value As Decimal
|
|
|
|
Private _currencyCode As String
|
|
|
|
Private _currencyRateAgreedFlag As String
|
|
|
|
Private _currencyRate As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyCode() As String
|
|
Get
|
|
Return Me._currencyCode
|
|
End Get
|
|
Set
|
|
Me._currencyCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyRateAgreedFlag() As String
|
|
Get
|
|
Return Me._currencyRateAgreedFlag
|
|
End Get
|
|
Set
|
|
Me._currencyRateAgreedFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CurrencyRate() As Decimal
|
|
Get
|
|
Return Me._currencyRate
|
|
End Get
|
|
Set
|
|
Me._currencyRate = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemCustomsValueNetPrice))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueNetPrice object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemCustomsValueNetPrice object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueNetPrice object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueNetPrice, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueNetPrice)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueNetPrice) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemCustomsValueNetPrice
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemCustomsValueNetPrice)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemCustomsValueNetPrice
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemCustomsValueNetPrice)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueNetPrice object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemCustomsValueNetPrice object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueNetPrice object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueNetPrice, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueNetPrice)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueNetPrice) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemCustomsValueNetPrice
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemCustomsValueIndirectPayment
|
|
|
|
#Region "Private fields"
|
|
Private _value As Decimal
|
|
|
|
Private _currencyCode As String
|
|
|
|
Private _currencyRateAgreedFlag As String
|
|
|
|
Private _currencyRate As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyCode() As String
|
|
Get
|
|
Return Me._currencyCode
|
|
End Get
|
|
Set
|
|
Me._currencyCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyRateAgreedFlag() As String
|
|
Get
|
|
Return Me._currencyRateAgreedFlag
|
|
End Get
|
|
Set
|
|
Me._currencyRateAgreedFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CurrencyRate() As Decimal
|
|
Get
|
|
Return Me._currencyRate
|
|
End Get
|
|
Set
|
|
Me._currencyRate = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemCustomsValueIndirectPayment))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueIndirectPayment object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemCustomsValueIndirectPayment object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueIndirectPayment object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueIndirectPayment, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueIndirectPayment)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueIndirectPayment) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemCustomsValueIndirectPayment
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemCustomsValueIndirectPayment)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemCustomsValueIndirectPayment
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemCustomsValueIndirectPayment)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueIndirectPayment object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemCustomsValueIndirectPayment object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueIndirectPayment object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueIndirectPayment, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueIndirectPayment)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueIndirectPayment) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemCustomsValueIndirectPayment
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemCustomsValueAirFreightCosts
|
|
|
|
#Region "Private fields"
|
|
Private _value As Decimal
|
|
|
|
Private _currencyCode As String
|
|
|
|
Private _currencyRateIATA As String
|
|
|
|
Private _currencyRateAgreedFlag As String
|
|
|
|
Private _currencyRate As Decimal
|
|
|
|
Private _currencyRateDate As Date
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyCode() As String
|
|
Get
|
|
Return Me._currencyCode
|
|
End Get
|
|
Set
|
|
Me._currencyCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyRateIATA() As String
|
|
Get
|
|
Return Me._currencyRateIATA
|
|
End Get
|
|
Set
|
|
Me._currencyRateIATA = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyRateAgreedFlag() As String
|
|
Get
|
|
Return Me._currencyRateAgreedFlag
|
|
End Get
|
|
Set
|
|
Me._currencyRateAgreedFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CurrencyRate() As Decimal
|
|
Get
|
|
Return Me._currencyRate
|
|
End Get
|
|
Set
|
|
Me._currencyRate = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="date")>
|
|
Public Property CurrencyRateDate() As Date
|
|
Get
|
|
Return Me._currencyRateDate
|
|
End Get
|
|
Set
|
|
Me._currencyRateDate = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemCustomsValueAirFreightCosts))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueAirFreightCosts object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemCustomsValueAirFreightCosts object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueAirFreightCosts object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueAirFreightCosts)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemCustomsValueAirFreightCosts)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemCustomsValueAirFreightCosts)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueAirFreightCosts object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemCustomsValueAirFreightCosts object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueAirFreightCosts object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueAirFreightCosts)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemCustomsValueAirFreightCosts
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemCustomsValueAdditionDeduction
|
|
|
|
#Region "Private fields"
|
|
Private _type As String
|
|
|
|
Private _value As Decimal
|
|
|
|
Private _currencyCode As String
|
|
|
|
Private _currencyRateIATA As String
|
|
|
|
Private _currencyRateAgreedFlag As String
|
|
|
|
Private _currencyRate As Decimal
|
|
|
|
Private _currencyRateDate As Date
|
|
|
|
Private _percentage As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyCode() As String
|
|
Get
|
|
Return Me._currencyCode
|
|
End Get
|
|
Set
|
|
Me._currencyCode = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyRateIATA() As String
|
|
Get
|
|
Return Me._currencyRateIATA
|
|
End Get
|
|
Set
|
|
Me._currencyRateIATA = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property CurrencyRateAgreedFlag() As String
|
|
Get
|
|
Return Me._currencyRateAgreedFlag
|
|
End Get
|
|
Set
|
|
Me._currencyRateAgreedFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property CurrencyRate() As Decimal
|
|
Get
|
|
Return Me._currencyRate
|
|
End Get
|
|
Set
|
|
Me._currencyRate = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="date")>
|
|
Public Property CurrencyRateDate() As Date
|
|
Get
|
|
Return Me._currencyRateDate
|
|
End Get
|
|
Set
|
|
Me._currencyRateDate = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Percentage() As Decimal
|
|
Get
|
|
Return Me._percentage
|
|
End Get
|
|
Set
|
|
Me._percentage = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemCustomsValueAdditionDeduction))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueAdditionDeduction object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemCustomsValueAdditionDeduction object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueAdditionDeduction object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemCustomsValueAdditionDeduction object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemCustomsValueAdditionDeduction object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemCustomsValueAdditionDeduction object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemCustomsValueAdditionDeduction)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemCustomsValueAdditionDeduction
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemAssessment
|
|
|
|
#Region "Private fields"
|
|
Private _customsValue As Decimal
|
|
|
|
Private _outwardProcessingFee As Decimal
|
|
|
|
Private _taxCosts As Decimal
|
|
|
|
Private _amount As List(Of FCFCDDBodyGoodsItemAssessmentAmount)
|
|
|
|
Private _specificRate As List(Of FCFCDDBodyGoodsItemAssessmentSpecificRate)
|
|
|
|
Private _contentInformation As List(Of FCFCDDBodyGoodsItemAssessmentContentInformation)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._contentInformation = New List(Of FCFCDDBodyGoodsItemAssessmentContentInformation)()
|
|
Me._specificRate = New List(Of FCFCDDBodyGoodsItemAssessmentSpecificRate)()
|
|
Me._amount = New List(Of FCFCDDBodyGoodsItemAssessmentAmount)()
|
|
End Sub
|
|
|
|
Public Property CustomsValue() As Decimal
|
|
Get
|
|
Return Me._customsValue
|
|
End Get
|
|
Set
|
|
Me._customsValue = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property OutwardProcessingFee() As Decimal
|
|
Get
|
|
Return Me._outwardProcessingFee
|
|
End Get
|
|
Set
|
|
Me._outwardProcessingFee = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property TaxCosts() As Decimal
|
|
Get
|
|
Return Me._taxCosts
|
|
End Get
|
|
Set
|
|
Me._taxCosts = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Amount")>
|
|
Public Property Amount() As List(Of FCFCDDBodyGoodsItemAssessmentAmount)
|
|
Get
|
|
Return Me._amount
|
|
End Get
|
|
Set
|
|
Me._amount = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("SpecificRate")>
|
|
Public Property SpecificRate() As List(Of FCFCDDBodyGoodsItemAssessmentSpecificRate)
|
|
Get
|
|
Return Me._specificRate
|
|
End Get
|
|
Set
|
|
Me._specificRate = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("ContentInformation")>
|
|
Public Property ContentInformation() As List(Of FCFCDDBodyGoodsItemAssessmentContentInformation)
|
|
Get
|
|
Return Me._contentInformation
|
|
End Get
|
|
Set
|
|
Me._contentInformation = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemAssessment))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessment object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemAssessment object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessment object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessment, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessment)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessment) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemAssessment
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemAssessment)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemAssessment
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemAssessment)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessment object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemAssessment object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessment object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessment, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessment)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessment) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemAssessment
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemAssessmentAmount
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As Decimal
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Quantity() As Decimal
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemAssessmentAmount))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessmentAmount object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemAssessmentAmount object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessmentAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessmentAmount)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemAssessmentAmount
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemAssessmentAmount)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemAssessmentAmount
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemAssessmentAmount)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessmentAmount object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemAssessmentAmount object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessmentAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessmentAmount)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemAssessmentAmount
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemAssessmentSpecificRate
|
|
|
|
#Region "Private fields"
|
|
Private _type As String
|
|
|
|
Private _value As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemAssessmentSpecificRate))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessmentSpecificRate object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemAssessmentSpecificRate object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessmentSpecificRate object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentSpecificRate, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessmentSpecificRate)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentSpecificRate) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemAssessmentSpecificRate
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemAssessmentSpecificRate)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemAssessmentSpecificRate
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemAssessmentSpecificRate)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessmentSpecificRate object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemAssessmentSpecificRate object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessmentSpecificRate object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentSpecificRate, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessmentSpecificRate)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentSpecificRate) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemAssessmentSpecificRate
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemAssessmentContentInformation
|
|
|
|
#Region "Private fields"
|
|
Private _type As String
|
|
|
|
Private _degreePercentage As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Degree-Percentage")>
|
|
Public Property DegreePercentage() As Decimal
|
|
Get
|
|
Return Me._degreePercentage
|
|
End Get
|
|
Set
|
|
Me._degreePercentage = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemAssessmentContentInformation))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessmentContentInformation object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemAssessmentContentInformation object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessmentContentInformation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentContentInformation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessmentContentInformation)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentContentInformation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemAssessmentContentInformation
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemAssessmentContentInformation)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemAssessmentContentInformation
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemAssessmentContentInformation)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemAssessmentContentInformation object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemAssessmentContentInformation object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemAssessmentContentInformation object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentContentInformation, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemAssessmentContentInformation)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemAssessmentContentInformation) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemAssessmentContentInformation
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemExciseDuty
|
|
|
|
#Region "Private fields"
|
|
Private _code As String
|
|
|
|
Private _degreePercentage As Decimal
|
|
|
|
Private _value As Decimal
|
|
|
|
Private _amount As FCFCDDBodyGoodsItemExciseDutyAmount
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._amount = New FCFCDDBodyGoodsItemExciseDutyAmount()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Code() As String
|
|
Get
|
|
Return Me._code
|
|
End Get
|
|
Set
|
|
Me._code = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Degree-Percentage")>
|
|
Public Property DegreePercentage() As Decimal
|
|
Get
|
|
Return Me._degreePercentage
|
|
End Get
|
|
Set
|
|
Me._degreePercentage = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Amount() As FCFCDDBodyGoodsItemExciseDutyAmount
|
|
Get
|
|
Return Me._amount
|
|
End Get
|
|
Set
|
|
Me._amount = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemExciseDuty))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemExciseDuty object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemExciseDuty object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemExciseDuty object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemExciseDuty, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemExciseDuty)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemExciseDuty) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemExciseDuty
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemExciseDuty)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemExciseDuty
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemExciseDuty)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemExciseDuty object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemExciseDuty object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemExciseDuty object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemExciseDuty, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemExciseDuty)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemExciseDuty) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemExciseDuty
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemExciseDutyAmount
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As Decimal
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Quantity() As Decimal
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemExciseDutyAmount))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemExciseDutyAmount object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemExciseDutyAmount object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemExciseDutyAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemExciseDutyAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemExciseDutyAmount)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemExciseDutyAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemExciseDutyAmount
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemExciseDutyAmount)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemExciseDutyAmount
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemExciseDutyAmount)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemExciseDutyAmount object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemExciseDutyAmount object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemExciseDutyAmount object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemExciseDutyAmount, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemExciseDutyAmount)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemExciseDutyAmount) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemExciseDutyAmount
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemPreferentialTreatment
|
|
|
|
#Region "Private fields"
|
|
Private _requestedPreferentialTreatment As String
|
|
|
|
Private _declaration As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._declaration = New FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property RequestedPreferentialTreatment() As String
|
|
Get
|
|
Return Me._requestedPreferentialTreatment
|
|
End Get
|
|
Set
|
|
Me._requestedPreferentialTreatment = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Declaration() As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration
|
|
Get
|
|
Return Me._declaration
|
|
End Get
|
|
Set
|
|
Me._declaration = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemPreferentialTreatment))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatment object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemPreferentialTreatment object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatment object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatment, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatment)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatment) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemPreferentialTreatment
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemPreferentialTreatment)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemPreferentialTreatment
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemPreferentialTreatment)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatment object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemPreferentialTreatment object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatment object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatment, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatment)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatment) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemPreferentialTreatment
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration
|
|
|
|
#Region "Private fields"
|
|
Private _contingent As List(Of FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)
|
|
|
|
Private _preferentialTreatmentQuantity As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._preferentialTreatmentQuantity = New FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity()
|
|
Me._contingent = New List(Of FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("Contingent")>
|
|
Public Property Contingent() As List(Of FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)
|
|
Get
|
|
Return Me._contingent
|
|
End Get
|
|
Set
|
|
Me._contingent = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PreferentialTreatmentQuantity() As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity
|
|
Get
|
|
Return Me._preferentialTreatmentQuantity
|
|
End Get
|
|
Set
|
|
Me._preferentialTreatmentQuantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclaration
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent
|
|
|
|
#Region "Private fields"
|
|
Private _contingentNumber As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ContingentNumber() As String
|
|
Get
|
|
Return Me._contingentNumber
|
|
End Get
|
|
Set
|
|
Me._contingentNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationContingent
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As String
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="integer")>
|
|
Public Property Quantity() As String
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemPreferentialTreatmentDeclarationPreferentialTreatmentQuantity
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemOutwardProcessingReduction
|
|
|
|
#Region "Private fields"
|
|
Private _group As String
|
|
|
|
Private _amount As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Group() As String
|
|
Get
|
|
Return Me._group
|
|
End Get
|
|
Set
|
|
Me._group = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Amount() As Decimal
|
|
Get
|
|
Return Me._amount
|
|
End Get
|
|
Set
|
|
Me._amount = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemOutwardProcessingReduction))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemOutwardProcessingReduction object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemOutwardProcessingReduction object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemOutwardProcessingReduction object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemOutwardProcessingReduction, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemOutwardProcessingReduction)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemOutwardProcessingReduction) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemOutwardProcessingReduction
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemOutwardProcessingReduction)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemOutwardProcessingReduction
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemOutwardProcessingReduction)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemOutwardProcessingReduction object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemOutwardProcessingReduction object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemOutwardProcessingReduction object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemOutwardProcessingReduction, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemOutwardProcessingReduction)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemOutwardProcessingReduction) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemOutwardProcessingReduction
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemSpecialCase
|
|
|
|
#Region "Private fields"
|
|
Private _group As String
|
|
|
|
Private _applicationType As String
|
|
|
|
Private _rateOrAmountOrFactor As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Group() As String
|
|
Get
|
|
Return Me._group
|
|
End Get
|
|
Set
|
|
Me._group = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ApplicationType() As String
|
|
Get
|
|
Return Me._applicationType
|
|
End Get
|
|
Set
|
|
Me._applicationType = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property RateOrAmountOrFactor() As Decimal
|
|
Get
|
|
Return Me._rateOrAmountOrFactor
|
|
End Get
|
|
Set
|
|
Me._rateOrAmountOrFactor = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemSpecialCase))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemSpecialCase object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemSpecialCase object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemSpecialCase object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemSpecialCase, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemSpecialCase)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemSpecialCase) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemSpecialCase
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemSpecialCase)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemSpecialCase
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemSpecialCase)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemSpecialCase object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemSpecialCase object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemSpecialCase object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemSpecialCase, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemSpecialCase)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemSpecialCase) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemSpecialCase
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemDocument
|
|
|
|
#Region "Private fields"
|
|
Private _division As String
|
|
|
|
Private _type As String
|
|
|
|
Private _referenceNumber As String
|
|
|
|
Private _issuingDate As Date
|
|
|
|
Private _atHandFlag As String
|
|
|
|
Private _writeOff As FCFCDDBodyGoodsItemDocumentWriteOff
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._writeOff = New FCFCDDBodyGoodsItemDocumentWriteOff()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Division() As String
|
|
Get
|
|
Return Me._division
|
|
End Get
|
|
Set
|
|
Me._division = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Type() As String
|
|
Get
|
|
Return Me._type
|
|
End Get
|
|
Set
|
|
Me._type = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property ReferenceNumber() As String
|
|
Get
|
|
Return Me._referenceNumber
|
|
End Get
|
|
Set
|
|
Me._referenceNumber = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="date")>
|
|
Public Property IssuingDate() As Date
|
|
Get
|
|
Return Me._issuingDate
|
|
End Get
|
|
Set
|
|
Me._issuingDate = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property AtHandFlag() As String
|
|
Get
|
|
Return Me._atHandFlag
|
|
End Get
|
|
Set
|
|
Me._atHandFlag = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property WriteOff() As FCFCDDBodyGoodsItemDocumentWriteOff
|
|
Get
|
|
Return Me._writeOff
|
|
End Get
|
|
Set
|
|
Me._writeOff = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemDocument))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemDocument object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemDocument object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemDocument object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemDocument, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemDocument)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemDocument) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemDocument
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemDocument)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemDocument
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemDocument)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemDocument object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemDocument object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemDocument object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemDocument, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemDocument)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemDocument) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemDocument
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True)>
|
|
Partial Public Class FCFCDDBodyGoodsItemDocumentWriteOff
|
|
|
|
#Region "Private fields"
|
|
Private _quantity As Decimal
|
|
|
|
Private _measurementUnit As String
|
|
|
|
Private _qualifier As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Quantity() As Decimal
|
|
Get
|
|
Return Me._quantity
|
|
End Get
|
|
Set
|
|
Me._quantity = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property MeasurementUnit() As String
|
|
Get
|
|
Return Me._measurementUnit
|
|
End Get
|
|
Set
|
|
Me._measurementUnit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")>
|
|
Public Property Qualifier() As String
|
|
Get
|
|
Return Me._qualifier
|
|
End Get
|
|
Set
|
|
Me._qualifier = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(FCFCDDBodyGoodsItemDocumentWriteOff))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemDocumentWriteOff object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an FCFCDDBodyGoodsItemDocumentWriteOff object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemDocumentWriteOff object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemDocumentWriteOff, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemDocumentWriteOff)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As FCFCDDBodyGoodsItemDocumentWriteOff) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As FCFCDDBodyGoodsItemDocumentWriteOff
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), FCFCDDBodyGoodsItemDocumentWriteOff)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As FCFCDDBodyGoodsItemDocumentWriteOff
|
|
Return CType(Serializer.Deserialize(s), FCFCDDBodyGoodsItemDocumentWriteOff)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current FCFCDDBodyGoodsItemDocumentWriteOff object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an FCFCDDBodyGoodsItemDocumentWriteOff object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output FCFCDDBodyGoodsItemDocumentWriteOff object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemDocumentWriteOff, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, FCFCDDBodyGoodsItemDocumentWriteOff)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As FCFCDDBodyGoodsItemDocumentWriteOff) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As FCFCDDBodyGoodsItemDocumentWriteOff
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlRootAttribute([Namespace]:="", IsNullable:=True)>
|
|
Partial Public Class [decimal]
|
|
|
|
#Region "Private fields"
|
|
Private _anyAttr As List(Of System.Xml.XmlAttribute)
|
|
|
|
Private _value As Decimal
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._anyAttr = New List(Of System.Xml.XmlAttribute)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlAnyAttributeAttribute()>
|
|
Public Property AnyAttr() As List(Of System.Xml.XmlAttribute)
|
|
Get
|
|
Return Me._anyAttr
|
|
End Get
|
|
Set
|
|
Me._anyAttr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlTextAttribute()>
|
|
Public Property Value() As Decimal
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType([decimal]))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current decimal object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an decimal object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output decimal object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As [decimal], ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, [decimal])
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As [decimal]) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As [decimal]
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), [decimal])
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As [decimal]
|
|
Return CType(Serializer.Deserialize(s), [decimal])
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current decimal object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an decimal object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output decimal object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As [decimal], ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, [decimal])
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As [decimal]) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As [decimal]
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlRootAttribute([Namespace]:="", IsNullable:=True)>
|
|
Partial Public Class [integer]
|
|
|
|
#Region "Private fields"
|
|
Private _anyAttr As List(Of System.Xml.XmlAttribute)
|
|
|
|
Private _value As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._anyAttr = New List(Of System.Xml.XmlAttribute)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlAnyAttributeAttribute()>
|
|
Public Property AnyAttr() As List(Of System.Xml.XmlAttribute)
|
|
Get
|
|
Return Me._anyAttr
|
|
End Get
|
|
Set
|
|
Me._anyAttr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlTextAttribute(DataType:="integer")>
|
|
Public Property Value() As String
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType([integer]))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current integer object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an integer object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output integer object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As [integer], ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, [integer])
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As [integer]) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As [integer]
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), [integer])
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As [integer]
|
|
Return CType(Serializer.Deserialize(s), [integer])
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current integer object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an integer object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output integer object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As [integer], ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, [integer])
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As [integer]) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As [integer]
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlRootAttribute([Namespace]:="", IsNullable:=True)>
|
|
Partial Public Class token
|
|
|
|
#Region "Private fields"
|
|
Private _anyAttr As List(Of System.Xml.XmlAttribute)
|
|
|
|
Private _value As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._anyAttr = New List(Of System.Xml.XmlAttribute)()
|
|
End Sub
|
|
|
|
<System.Xml.Serialization.XmlAnyAttributeAttribute()>
|
|
Public Property AnyAttr() As List(Of System.Xml.XmlAttribute)
|
|
Get
|
|
Return Me._anyAttr
|
|
End Get
|
|
Set
|
|
Me._anyAttr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlTextAttribute(DataType:="token")>
|
|
Public Property Value() As String
|
|
Get
|
|
Return Me._value
|
|
End Get
|
|
Set
|
|
Me._value = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(token))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current token object into an XML string
|
|
''' </summary>
|
|
''' <returns>string XML value</returns>
|
|
Public Overridable Function Serialize() As String
|
|
Dim streamReader As System.IO.StreamReader = Nothing
|
|
Dim memoryStream As System.IO.MemoryStream = Nothing
|
|
Try
|
|
memoryStream = New System.IO.MemoryStream()
|
|
Dim xmlWriterSettings As System.Xml.XmlWriterSettings = New System.Xml.XmlWriterSettings()
|
|
xmlWriterSettings.Indent = True
|
|
xmlWriterSettings.IndentChars = " "
|
|
Dim xmlWriter As System.Xml.XmlWriter = XmlWriter.Create(memoryStream, xmlWriterSettings)
|
|
Serializer.Serialize(xmlWriter, Me)
|
|
memoryStream.Seek(0, SeekOrigin.Begin)
|
|
streamReader = New System.IO.StreamReader(memoryStream)
|
|
Return streamReader.ReadToEnd
|
|
Finally
|
|
If (Not (streamReader) Is Nothing) Then
|
|
streamReader.Dispose()
|
|
End If
|
|
If (Not (memoryStream) Is Nothing) Then
|
|
memoryStream.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
''' <summary>
|
|
''' Deserializes workflow markup into an token object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output token object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As token, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, token)
|
|
Try
|
|
obj = Deserialize(input)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String, ByRef obj As token) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return Deserialize(input, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal input As String) As token
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), token)
|
|
Finally
|
|
If (Not (stringReader) Is Nothing) Then
|
|
stringReader.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function Deserialize(ByVal s As System.IO.Stream) As token
|
|
Return CType(Serializer.Deserialize(s), token)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current token object into file
|
|
''' </summary>
|
|
''' <param name="fileName">full path of outupt xml file</param>
|
|
''' <param name="exception">output Exception value if failed</param>
|
|
''' <returns>true if can serialize and save into file; otherwise, false</returns>
|
|
Public Overridable Overloads Function SaveToFile(ByVal fileName As String, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
Try
|
|
SaveToFile(fileName)
|
|
Return True
|
|
Catch e As System.Exception
|
|
exception = e
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overridable Overloads Sub SaveToFile(ByVal fileName As String)
|
|
Dim streamWriter As System.IO.StreamWriter = Nothing
|
|
Try
|
|
Dim xmlString As String = Serialize()
|
|
Dim xmlFile As System.IO.FileInfo = New System.IO.FileInfo(fileName)
|
|
streamWriter = xmlFile.CreateText
|
|
streamWriter.WriteLine(xmlString)
|
|
streamWriter.Close()
|
|
Finally
|
|
If (Not (streamWriter) Is Nothing) Then
|
|
streamWriter.Dispose()
|
|
End If
|
|
End Try
|
|
End Sub
|
|
|
|
''' <summary>
|
|
''' Deserializes xml markup from file into an token object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output token object</param>
|
|
''' <param name="exception">output Exception value if deserialize failed</param>
|
|
''' <returns>true if this Serializer can deserialize the object; otherwise, false</returns>
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As token, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, token)
|
|
Try
|
|
obj = LoadFromFile(fileName)
|
|
Return True
|
|
Catch ex As System.Exception
|
|
exception = ex
|
|
Return False
|
|
End Try
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String, ByRef obj As token) As Boolean
|
|
Dim exception As System.Exception = Nothing
|
|
Return LoadFromFile(fileName, obj, exception)
|
|
End Function
|
|
|
|
Public Overloads Shared Function LoadFromFile(ByVal fileName As String) As token
|
|
Dim file As System.IO.FileStream = Nothing
|
|
Dim sr As System.IO.StreamReader = Nothing
|
|
Try
|
|
file = New System.IO.FileStream(fileName, FileMode.Open, FileAccess.Read)
|
|
sr = New System.IO.StreamReader(file)
|
|
Dim xmlString As String = sr.ReadToEnd
|
|
sr.Close()
|
|
file.Close()
|
|
Return Deserialize(xmlString)
|
|
Finally
|
|
If (Not (file) Is Nothing) Then
|
|
file.Dispose()
|
|
End If
|
|
If (Not (sr) Is Nothing) Then
|
|
sr.Dispose()
|
|
End If
|
|
End Try
|
|
End Function
|
|
End Class
|
|
End Namespace
|