5411 lines
183 KiB
VB.net
5411 lines
183 KiB
VB.net
'' ------------------------------------------------------------------------------
|
|
'' <auto-generated>
|
|
'' Generated by Xsd2Code++. Version 5.0.0.47. www.xsd2code.com
|
|
'' <NameSpace>vifDec</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 vifDec
|
|
|
|
<System.CodeDom.Compiler.GeneratedCodeAttribute("System.Xml", "4.7.3056.0"),
|
|
System.SerializableAttribute(),
|
|
System.Diagnostics.DebuggerStepThroughAttribute(),
|
|
System.ComponentModel.DesignerCategoryAttribute("code"),
|
|
System.Xml.Serialization.XmlRootAttribute("interfaceData", [Namespace]:="", IsNullable:=True)>
|
|
Partial Public Class InterfaceDataType
|
|
|
|
#Region "Private fields"
|
|
Private _interfaceType As String
|
|
|
|
Private _vifDec As List(Of vifDec)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._vifDec = New List(Of vifDec)()
|
|
End Sub
|
|
|
|
Public Property interfaceType() As String
|
|
Get
|
|
Return Me._interfaceType
|
|
End Get
|
|
Set
|
|
Me._interfaceType = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDec")>
|
|
Public Property vifDec() As List(Of vifDec)
|
|
Get
|
|
Return Me._vifDec
|
|
End Get
|
|
Set
|
|
Me._vifDec = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(InterfaceDataType))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current InterfaceDataType 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 InterfaceDataType object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output InterfaceDataType 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 InterfaceDataType, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, InterfaceDataType)
|
|
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 InterfaceDataType) 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 InterfaceDataType
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), InterfaceDataType)
|
|
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 InterfaceDataType
|
|
Return CType(Serializer.Deserialize(s), InterfaceDataType)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current InterfaceDataType 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 InterfaceDataType object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output InterfaceDataType 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 InterfaceDataType, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, InterfaceDataType)
|
|
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 InterfaceDataType) 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 InterfaceDataType
|
|
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")>
|
|
Partial Public Class vifDec
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _transferStatus As String
|
|
|
|
Private _dec_ProzessArt As String
|
|
|
|
Private _dec_Anmelde_ID As System.Nullable(Of Integer)
|
|
|
|
Private _dec_Template_ID As System.Nullable(Of Integer)
|
|
|
|
Private _dec_CreateDate As System.Nullable(Of Date)
|
|
|
|
Private _dec_CreatePersonalID As String
|
|
|
|
Private _dec_PreDec_IND As System.Nullable(Of Boolean)
|
|
|
|
Private _dec_TotNet As System.Nullable(Of Double)
|
|
|
|
Private _dec_TotNetSplit_IND As System.Nullable(Of Boolean)
|
|
|
|
Private _refs_LRN As String
|
|
|
|
Private _refs_CRN As String
|
|
|
|
Private _refs_CSRN As String
|
|
|
|
Private _refs_ERN As String
|
|
|
|
Private _refs_FRN As String
|
|
|
|
Private _refs_Stat As String
|
|
|
|
Private _hea_DecTy As String
|
|
|
|
Private _hea_TotItem As System.Nullable(Of Integer)
|
|
|
|
Private _hea_TotPack As System.Nullable(Of Integer)
|
|
|
|
Private _hea_TotGross As System.Nullable(Of Double)
|
|
|
|
Private _hea_DepLNG As String
|
|
|
|
Private _hea_DestLNG As String
|
|
|
|
Private _hea_PayTy As String
|
|
|
|
Private _hea_DefPayRef As String
|
|
|
|
Private _hea_PerPayRef As String
|
|
|
|
Private _hea_PayMet As String
|
|
|
|
Private _hea_AExpRef As System.Nullable(Of Boolean)
|
|
|
|
Private _hea_Fin As String
|
|
|
|
Private _hea_Simp As System.Nullable(Of Boolean)
|
|
|
|
Private _hea_IssD As System.Nullable(Of Date)
|
|
|
|
Private _hea_AuthID As String
|
|
|
|
Private _hea_TransDat As System.Nullable(Of Boolean)
|
|
|
|
Private _hea_WoffD As System.Nullable(Of Date)
|
|
|
|
Private _hea_DecDT As System.Nullable(Of Date)
|
|
|
|
Private _hea_DecPlc As String
|
|
|
|
Private _hea_AccDT As System.Nullable(Of Date)
|
|
|
|
Private _hea_SecInd As String
|
|
|
|
Private _hea_ComRef As String
|
|
|
|
Private _hea_ProArrDT As System.Nullable(Of Date)
|
|
|
|
Private _hea_PlaDepDT As System.Nullable(Of Date)
|
|
|
|
Private _locs_TradCtry As String
|
|
|
|
Private _locs_Disp As String
|
|
|
|
Private _locs_Dest As String
|
|
|
|
Private _locs_GdsLocCd As String
|
|
|
|
Private _locs_GdsLoc As String
|
|
|
|
Private _locs_GdsLocAuth As String
|
|
|
|
Private _locs_LoadPlcCd As String
|
|
|
|
Private _locs_LoadPlc As String
|
|
|
|
Private _locs_CustPlc As String
|
|
|
|
Private _locs_ArrLocCd As String
|
|
|
|
Private _locs_ArrLoc As String
|
|
|
|
Private _locs_ArrLocAuth As String
|
|
|
|
Private _locs_WarTy As String
|
|
|
|
Private _locs_WarCtry As String
|
|
|
|
Private _locs_War As String
|
|
|
|
Private _transp_InMo As String
|
|
|
|
Private _transp_BordMo As String
|
|
|
|
Private _transp_DepTy As String
|
|
|
|
Private _transp_DepIdnt As String
|
|
|
|
Private _transp_DepNat As String
|
|
|
|
Private _transp_CrossTy As String
|
|
|
|
Private _transp_CrossIdnt As String
|
|
|
|
Private _transp_CrossIdntNat As String
|
|
|
|
Private _transp_ContInd As System.Nullable(Of Boolean)
|
|
|
|
Private _valData_TermDelCd As String
|
|
|
|
Private _valData_TermDelPlc As String
|
|
|
|
Private _valData_TermDelSit As String
|
|
|
|
Private _valData_InvCurr As String
|
|
|
|
Private _valData_ExRa As System.Nullable(Of Double)
|
|
|
|
Private _valData_InvVal As System.Nullable(Of Double)
|
|
|
|
Private _valData_TransacCd As String
|
|
|
|
Private _conorTra_Na As String
|
|
|
|
Private _conorTra_Strt As String
|
|
|
|
Private _conorTra_Pst As String
|
|
|
|
Private _conorTra_Cty As String
|
|
|
|
Private _conorTra_Ctry As String
|
|
|
|
Private _conorTra_TIN As String
|
|
|
|
Private _conorTra_UIDCtry As String
|
|
|
|
Private _conorTra_UID As String
|
|
|
|
Private _coneeTra_Na As String
|
|
|
|
Private _coneeTra_Strt As String
|
|
|
|
Private _coneeTra_Pst As String
|
|
|
|
Private _coneeTra_Cty As String
|
|
|
|
Private _coneeTra_Ctry As String
|
|
|
|
Private _coneeTra_TIN As String
|
|
|
|
Private _coneeTra_UIDCtry As String
|
|
|
|
Private _coneeTra_UID As String
|
|
|
|
Private _expTra_Na As String
|
|
|
|
Private _expTra_Strt As String
|
|
|
|
Private _expTra_Pst As String
|
|
|
|
Private _expTra_Cty As String
|
|
|
|
Private _expTra_Ctry As String
|
|
|
|
Private _expTra_TIN As String
|
|
|
|
Private _expTra_UIDCtry As String
|
|
|
|
Private _expTra_UID As String
|
|
|
|
Private _declarant_Na As String
|
|
|
|
Private _declarant_Strt As String
|
|
|
|
Private _declarant_Pst As String
|
|
|
|
Private _declarant_Cty As String
|
|
|
|
Private _declarant_Ctry As String
|
|
|
|
Private _declarant_TIN As String
|
|
|
|
Private _declarant_UIDCtry As String
|
|
|
|
Private _declarant_UID As String
|
|
|
|
Private _declarant_DecRep As System.Nullable(Of Byte)
|
|
|
|
Private _represent_RIN As String
|
|
|
|
Private _represent_Na As String
|
|
|
|
Private _entryCO_Ref As String
|
|
|
|
Private _exitCO_Ref As String
|
|
|
|
Private _survCO_Ref As String
|
|
|
|
Private _destCO_Ref As String
|
|
|
|
Private _presCO_Ref As String
|
|
|
|
Private _msgType As String
|
|
|
|
Private _dec_Lager_ID As String
|
|
|
|
Private _dec_Lag_IND As System.Nullable(Of Boolean)
|
|
|
|
Private _dec_FillPackList_IND As System.Nullable(Of Boolean)
|
|
|
|
Private _dec_Memo As String
|
|
|
|
Private _depCO_Ref As String
|
|
|
|
Private _ctlrRslt_ResCd As String
|
|
|
|
Private _ctrlRslt_DLimit As System.Nullable(Of Date)
|
|
|
|
Private _carrTra_Na As String
|
|
|
|
Private _carrTra_Strt As String
|
|
|
|
Private _carrTra_Pst As String
|
|
|
|
Private _carrTra_Cty As String
|
|
|
|
Private _carrTra_Ctry As String
|
|
|
|
Private _carrTra_TIN As String
|
|
|
|
Private _vifDecAdjust As List(Of vifDecAdjust)
|
|
|
|
Private _vifDecItem As List(Of vifDecItem)
|
|
|
|
Private _vifDecGrteeRef As List(Of vifDecGrteeRef)
|
|
|
|
Private _vifDecTotDuties As List(Of vifDecTotDuties)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._vifDecTotDuties = New List(Of vifDecTotDuties)()
|
|
Me._vifDecGrteeRef = New List(Of vifDecGrteeRef)()
|
|
Me._vifDecItem = New List(Of vifDecItem)()
|
|
Me._vifDecAdjust = New List(Of vifDecAdjust)()
|
|
End Sub
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property TransferStatus() As String
|
|
Get
|
|
Return Me._transferStatus
|
|
End Get
|
|
Set
|
|
Me._transferStatus = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_ProzessArt() As String
|
|
Get
|
|
Return Me._dec_ProzessArt
|
|
End Get
|
|
Set
|
|
Me._dec_ProzessArt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_Anmelde_ID() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._dec_Anmelde_ID
|
|
End Get
|
|
Set
|
|
Me._dec_Anmelde_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_Template_ID() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._dec_Template_ID
|
|
End Get
|
|
Set
|
|
Me._dec_Template_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_CreateDate() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._dec_CreateDate
|
|
End Get
|
|
Set
|
|
Me._dec_CreateDate = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_CreatePersonalID() As String
|
|
Get
|
|
Return Me._dec_CreatePersonalID
|
|
End Get
|
|
Set
|
|
Me._dec_CreatePersonalID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_PreDec_IND() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._dec_PreDec_IND
|
|
End Get
|
|
Set
|
|
Me._dec_PreDec_IND = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_TotNet() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._dec_TotNet
|
|
End Get
|
|
Set
|
|
Me._dec_TotNet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_TotNetSplit_IND() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._dec_TotNetSplit_IND
|
|
End Get
|
|
Set
|
|
Me._dec_TotNetSplit_IND = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Refs_LRN() As String
|
|
Get
|
|
Return Me._refs_LRN
|
|
End Get
|
|
Set
|
|
Me._refs_LRN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Refs_CRN() As String
|
|
Get
|
|
Return Me._refs_CRN
|
|
End Get
|
|
Set
|
|
Me._refs_CRN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Refs_CSRN() As String
|
|
Get
|
|
Return Me._refs_CSRN
|
|
End Get
|
|
Set
|
|
Me._refs_CSRN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Refs_ERN() As String
|
|
Get
|
|
Return Me._refs_ERN
|
|
End Get
|
|
Set
|
|
Me._refs_ERN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Refs_FRN() As String
|
|
Get
|
|
Return Me._refs_FRN
|
|
End Get
|
|
Set
|
|
Me._refs_FRN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Refs_Stat() As String
|
|
Get
|
|
Return Me._refs_Stat
|
|
End Get
|
|
Set
|
|
Me._refs_Stat = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_DecTy() As String
|
|
Get
|
|
Return Me._hea_DecTy
|
|
End Get
|
|
Set
|
|
Me._hea_DecTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_TotItem() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._hea_TotItem
|
|
End Get
|
|
Set
|
|
Me._hea_TotItem = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_TotPack() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._hea_TotPack
|
|
End Get
|
|
Set
|
|
Me._hea_TotPack = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_TotGross() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._hea_TotGross
|
|
End Get
|
|
Set
|
|
Me._hea_TotGross = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_DepLNG() As String
|
|
Get
|
|
Return Me._hea_DepLNG
|
|
End Get
|
|
Set
|
|
Me._hea_DepLNG = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_DestLNG() As String
|
|
Get
|
|
Return Me._hea_DestLNG
|
|
End Get
|
|
Set
|
|
Me._hea_DestLNG = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_PayTy() As String
|
|
Get
|
|
Return Me._hea_PayTy
|
|
End Get
|
|
Set
|
|
Me._hea_PayTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_DefPayRef() As String
|
|
Get
|
|
Return Me._hea_DefPayRef
|
|
End Get
|
|
Set
|
|
Me._hea_DefPayRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_PerPayRef() As String
|
|
Get
|
|
Return Me._hea_PerPayRef
|
|
End Get
|
|
Set
|
|
Me._hea_PerPayRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_PayMet() As String
|
|
Get
|
|
Return Me._hea_PayMet
|
|
End Get
|
|
Set
|
|
Me._hea_PayMet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_AExpRef() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._hea_AExpRef
|
|
End Get
|
|
Set
|
|
Me._hea_AExpRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_Fin() As String
|
|
Get
|
|
Return Me._hea_Fin
|
|
End Get
|
|
Set
|
|
Me._hea_Fin = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_Simp() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._hea_Simp
|
|
End Get
|
|
Set
|
|
Me._hea_Simp = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_IssD() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._hea_IssD
|
|
End Get
|
|
Set
|
|
Me._hea_IssD = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_AuthID() As String
|
|
Get
|
|
Return Me._hea_AuthID
|
|
End Get
|
|
Set
|
|
Me._hea_AuthID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_TransDat() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._hea_TransDat
|
|
End Get
|
|
Set
|
|
Me._hea_TransDat = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_WoffD() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._hea_WoffD
|
|
End Get
|
|
Set
|
|
Me._hea_WoffD = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_DecDT() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._hea_DecDT
|
|
End Get
|
|
Set
|
|
Me._hea_DecDT = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_DecPlc() As String
|
|
Get
|
|
Return Me._hea_DecPlc
|
|
End Get
|
|
Set
|
|
Me._hea_DecPlc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_AccDT() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._hea_AccDT
|
|
End Get
|
|
Set
|
|
Me._hea_AccDT = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_SecInd() As String
|
|
Get
|
|
Return Me._hea_SecInd
|
|
End Get
|
|
Set
|
|
Me._hea_SecInd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_ComRef() As String
|
|
Get
|
|
Return Me._hea_ComRef
|
|
End Get
|
|
Set
|
|
Me._hea_ComRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_ProArrDT() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._hea_ProArrDT
|
|
End Get
|
|
Set
|
|
Me._hea_ProArrDT = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Hea_PlaDepDT() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._hea_PlaDepDT
|
|
End Get
|
|
Set
|
|
Me._hea_PlaDepDT = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_TradCtry() As String
|
|
Get
|
|
Return Me._locs_TradCtry
|
|
End Get
|
|
Set
|
|
Me._locs_TradCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_Disp() As String
|
|
Get
|
|
Return Me._locs_Disp
|
|
End Get
|
|
Set
|
|
Me._locs_Disp = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_Dest() As String
|
|
Get
|
|
Return Me._locs_Dest
|
|
End Get
|
|
Set
|
|
Me._locs_Dest = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_GdsLocCd() As String
|
|
Get
|
|
Return Me._locs_GdsLocCd
|
|
End Get
|
|
Set
|
|
Me._locs_GdsLocCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_GdsLoc() As String
|
|
Get
|
|
Return Me._locs_GdsLoc
|
|
End Get
|
|
Set
|
|
Me._locs_GdsLoc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_GdsLocAuth() As String
|
|
Get
|
|
Return Me._locs_GdsLocAuth
|
|
End Get
|
|
Set
|
|
Me._locs_GdsLocAuth = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_LoadPlcCd() As String
|
|
Get
|
|
Return Me._locs_LoadPlcCd
|
|
End Get
|
|
Set
|
|
Me._locs_LoadPlcCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_LoadPlc() As String
|
|
Get
|
|
Return Me._locs_LoadPlc
|
|
End Get
|
|
Set
|
|
Me._locs_LoadPlc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_CustPlc() As String
|
|
Get
|
|
Return Me._locs_CustPlc
|
|
End Get
|
|
Set
|
|
Me._locs_CustPlc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_ArrLocCd() As String
|
|
Get
|
|
Return Me._locs_ArrLocCd
|
|
End Get
|
|
Set
|
|
Me._locs_ArrLocCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_ArrLoc() As String
|
|
Get
|
|
Return Me._locs_ArrLoc
|
|
End Get
|
|
Set
|
|
Me._locs_ArrLoc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_ArrLocAuth() As String
|
|
Get
|
|
Return Me._locs_ArrLocAuth
|
|
End Get
|
|
Set
|
|
Me._locs_ArrLocAuth = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_WarTy() As String
|
|
Get
|
|
Return Me._locs_WarTy
|
|
End Get
|
|
Set
|
|
Me._locs_WarTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_WarCtry() As String
|
|
Get
|
|
Return Me._locs_WarCtry
|
|
End Get
|
|
Set
|
|
Me._locs_WarCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Locs_War() As String
|
|
Get
|
|
Return Me._locs_War
|
|
End Get
|
|
Set
|
|
Me._locs_War = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_InMo() As String
|
|
Get
|
|
Return Me._transp_InMo
|
|
End Get
|
|
Set
|
|
Me._transp_InMo = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_BordMo() As String
|
|
Get
|
|
Return Me._transp_BordMo
|
|
End Get
|
|
Set
|
|
Me._transp_BordMo = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_DepTy() As String
|
|
Get
|
|
Return Me._transp_DepTy
|
|
End Get
|
|
Set
|
|
Me._transp_DepTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_DepIdnt() As String
|
|
Get
|
|
Return Me._transp_DepIdnt
|
|
End Get
|
|
Set
|
|
Me._transp_DepIdnt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_DepNat() As String
|
|
Get
|
|
Return Me._transp_DepNat
|
|
End Get
|
|
Set
|
|
Me._transp_DepNat = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_CrossTy() As String
|
|
Get
|
|
Return Me._transp_CrossTy
|
|
End Get
|
|
Set
|
|
Me._transp_CrossTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_CrossIdnt() As String
|
|
Get
|
|
Return Me._transp_CrossIdnt
|
|
End Get
|
|
Set
|
|
Me._transp_CrossIdnt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_CrossIdntNat() As String
|
|
Get
|
|
Return Me._transp_CrossIdntNat
|
|
End Get
|
|
Set
|
|
Me._transp_CrossIdntNat = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Transp_ContInd() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._transp_ContInd
|
|
End Get
|
|
Set
|
|
Me._transp_ContInd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_TermDelCd() As String
|
|
Get
|
|
Return Me._valData_TermDelCd
|
|
End Get
|
|
Set
|
|
Me._valData_TermDelCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_TermDelPlc() As String
|
|
Get
|
|
Return Me._valData_TermDelPlc
|
|
End Get
|
|
Set
|
|
Me._valData_TermDelPlc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_TermDelSit() As String
|
|
Get
|
|
Return Me._valData_TermDelSit
|
|
End Get
|
|
Set
|
|
Me._valData_TermDelSit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_InvCurr() As String
|
|
Get
|
|
Return Me._valData_InvCurr
|
|
End Get
|
|
Set
|
|
Me._valData_InvCurr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_ExRa() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._valData_ExRa
|
|
End Get
|
|
Set
|
|
Me._valData_ExRa = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_InvVal() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._valData_InvVal
|
|
End Get
|
|
Set
|
|
Me._valData_InvVal = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ValData_TransacCd() As String
|
|
Get
|
|
Return Me._valData_TransacCd
|
|
End Get
|
|
Set
|
|
Me._valData_TransacCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_Na() As String
|
|
Get
|
|
Return Me._conorTra_Na
|
|
End Get
|
|
Set
|
|
Me._conorTra_Na = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_Strt() As String
|
|
Get
|
|
Return Me._conorTra_Strt
|
|
End Get
|
|
Set
|
|
Me._conorTra_Strt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_Pst() As String
|
|
Get
|
|
Return Me._conorTra_Pst
|
|
End Get
|
|
Set
|
|
Me._conorTra_Pst = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_Cty() As String
|
|
Get
|
|
Return Me._conorTra_Cty
|
|
End Get
|
|
Set
|
|
Me._conorTra_Cty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_Ctry() As String
|
|
Get
|
|
Return Me._conorTra_Ctry
|
|
End Get
|
|
Set
|
|
Me._conorTra_Ctry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_TIN() As String
|
|
Get
|
|
Return Me._conorTra_TIN
|
|
End Get
|
|
Set
|
|
Me._conorTra_TIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_UIDCtry() As String
|
|
Get
|
|
Return Me._conorTra_UIDCtry
|
|
End Get
|
|
Set
|
|
Me._conorTra_UIDCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConorTra_UID() As String
|
|
Get
|
|
Return Me._conorTra_UID
|
|
End Get
|
|
Set
|
|
Me._conorTra_UID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_Na() As String
|
|
Get
|
|
Return Me._coneeTra_Na
|
|
End Get
|
|
Set
|
|
Me._coneeTra_Na = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_Strt() As String
|
|
Get
|
|
Return Me._coneeTra_Strt
|
|
End Get
|
|
Set
|
|
Me._coneeTra_Strt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_Pst() As String
|
|
Get
|
|
Return Me._coneeTra_Pst
|
|
End Get
|
|
Set
|
|
Me._coneeTra_Pst = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_Cty() As String
|
|
Get
|
|
Return Me._coneeTra_Cty
|
|
End Get
|
|
Set
|
|
Me._coneeTra_Cty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_Ctry() As String
|
|
Get
|
|
Return Me._coneeTra_Ctry
|
|
End Get
|
|
Set
|
|
Me._coneeTra_Ctry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_TIN() As String
|
|
Get
|
|
Return Me._coneeTra_TIN
|
|
End Get
|
|
Set
|
|
Me._coneeTra_TIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_UIDCtry() As String
|
|
Get
|
|
Return Me._coneeTra_UIDCtry
|
|
End Get
|
|
Set
|
|
Me._coneeTra_UIDCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ConeeTra_UID() As String
|
|
Get
|
|
Return Me._coneeTra_UID
|
|
End Get
|
|
Set
|
|
Me._coneeTra_UID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_Na() As String
|
|
Get
|
|
Return Me._expTra_Na
|
|
End Get
|
|
Set
|
|
Me._expTra_Na = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_Strt() As String
|
|
Get
|
|
Return Me._expTra_Strt
|
|
End Get
|
|
Set
|
|
Me._expTra_Strt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_Pst() As String
|
|
Get
|
|
Return Me._expTra_Pst
|
|
End Get
|
|
Set
|
|
Me._expTra_Pst = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_Cty() As String
|
|
Get
|
|
Return Me._expTra_Cty
|
|
End Get
|
|
Set
|
|
Me._expTra_Cty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_Ctry() As String
|
|
Get
|
|
Return Me._expTra_Ctry
|
|
End Get
|
|
Set
|
|
Me._expTra_Ctry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_TIN() As String
|
|
Get
|
|
Return Me._expTra_TIN
|
|
End Get
|
|
Set
|
|
Me._expTra_TIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_UIDCtry() As String
|
|
Get
|
|
Return Me._expTra_UIDCtry
|
|
End Get
|
|
Set
|
|
Me._expTra_UIDCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExpTra_UID() As String
|
|
Get
|
|
Return Me._expTra_UID
|
|
End Get
|
|
Set
|
|
Me._expTra_UID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_Na() As String
|
|
Get
|
|
Return Me._declarant_Na
|
|
End Get
|
|
Set
|
|
Me._declarant_Na = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_Strt() As String
|
|
Get
|
|
Return Me._declarant_Strt
|
|
End Get
|
|
Set
|
|
Me._declarant_Strt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_Pst() As String
|
|
Get
|
|
Return Me._declarant_Pst
|
|
End Get
|
|
Set
|
|
Me._declarant_Pst = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_Cty() As String
|
|
Get
|
|
Return Me._declarant_Cty
|
|
End Get
|
|
Set
|
|
Me._declarant_Cty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_Ctry() As String
|
|
Get
|
|
Return Me._declarant_Ctry
|
|
End Get
|
|
Set
|
|
Me._declarant_Ctry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_TIN() As String
|
|
Get
|
|
Return Me._declarant_TIN
|
|
End Get
|
|
Set
|
|
Me._declarant_TIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_UIDCtry() As String
|
|
Get
|
|
Return Me._declarant_UIDCtry
|
|
End Get
|
|
Set
|
|
Me._declarant_UIDCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_UID() As String
|
|
Get
|
|
Return Me._declarant_UID
|
|
End Get
|
|
Set
|
|
Me._declarant_UID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Declarant_DecRep() As System.Nullable(Of Byte)
|
|
Get
|
|
Return Me._declarant_DecRep
|
|
End Get
|
|
Set
|
|
Me._declarant_DecRep = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Represent_RIN() As String
|
|
Get
|
|
Return Me._represent_RIN
|
|
End Get
|
|
Set
|
|
Me._represent_RIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Represent_Na() As String
|
|
Get
|
|
Return Me._represent_Na
|
|
End Get
|
|
Set
|
|
Me._represent_Na = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property EntryCO_Ref() As String
|
|
Get
|
|
Return Me._entryCO_Ref
|
|
End Get
|
|
Set
|
|
Me._entryCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExitCO_Ref() As String
|
|
Get
|
|
Return Me._exitCO_Ref
|
|
End Get
|
|
Set
|
|
Me._exitCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property SurvCO_Ref() As String
|
|
Get
|
|
Return Me._survCO_Ref
|
|
End Get
|
|
Set
|
|
Me._survCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DestCO_Ref() As String
|
|
Get
|
|
Return Me._destCO_Ref
|
|
End Get
|
|
Set
|
|
Me._destCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property PresCO_Ref() As String
|
|
Get
|
|
Return Me._presCO_Ref
|
|
End Get
|
|
Set
|
|
Me._presCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property MsgType() As String
|
|
Get
|
|
Return Me._msgType
|
|
End Get
|
|
Set
|
|
Me._msgType = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_Lager_ID() As String
|
|
Get
|
|
Return Me._dec_Lager_ID
|
|
End Get
|
|
Set
|
|
Me._dec_Lager_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_Lag_IND() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._dec_Lag_IND
|
|
End Get
|
|
Set
|
|
Me._dec_Lag_IND = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_FillPackList_IND() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._dec_FillPackList_IND
|
|
End Get
|
|
Set
|
|
Me._dec_FillPackList_IND = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property dec_Memo() As String
|
|
Get
|
|
Return Me._dec_Memo
|
|
End Get
|
|
Set
|
|
Me._dec_Memo = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DepCO_Ref() As String
|
|
Get
|
|
Return Me._depCO_Ref
|
|
End Get
|
|
Set
|
|
Me._depCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CtlrRslt_ResCd() As String
|
|
Get
|
|
Return Me._ctlrRslt_ResCd
|
|
End Get
|
|
Set
|
|
Me._ctlrRslt_ResCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CtrlRslt_DLimit() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._ctrlRslt_DLimit
|
|
End Get
|
|
Set
|
|
Me._ctrlRslt_DLimit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CarrTra_Na() As String
|
|
Get
|
|
Return Me._carrTra_Na
|
|
End Get
|
|
Set
|
|
Me._carrTra_Na = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CarrTra_Strt() As String
|
|
Get
|
|
Return Me._carrTra_Strt
|
|
End Get
|
|
Set
|
|
Me._carrTra_Strt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CarrTra_Pst() As String
|
|
Get
|
|
Return Me._carrTra_Pst
|
|
End Get
|
|
Set
|
|
Me._carrTra_Pst = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CarrTra_Cty() As String
|
|
Get
|
|
Return Me._carrTra_Cty
|
|
End Get
|
|
Set
|
|
Me._carrTra_Cty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CarrTra_Ctry() As String
|
|
Get
|
|
Return Me._carrTra_Ctry
|
|
End Get
|
|
Set
|
|
Me._carrTra_Ctry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property CarrTra_TIN() As String
|
|
Get
|
|
Return Me._carrTra_TIN
|
|
End Get
|
|
Set
|
|
Me._carrTra_TIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecAdjust")>
|
|
Public Property vifDecAdjust() As List(Of vifDecAdjust)
|
|
Get
|
|
Return Me._vifDecAdjust
|
|
End Get
|
|
Set
|
|
Me._vifDecAdjust = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecItem")>
|
|
Public Property vifDecItem() As List(Of vifDecItem)
|
|
Get
|
|
Return Me._vifDecItem
|
|
End Get
|
|
Set
|
|
Me._vifDecItem = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecGrteeRef")>
|
|
Public Property vifDecGrteeRef() As List(Of vifDecGrteeRef)
|
|
Get
|
|
Return Me._vifDecGrteeRef
|
|
End Get
|
|
Set
|
|
Me._vifDecGrteeRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecTotDuties")>
|
|
Public Property vifDecTotDuties() As List(Of vifDecTotDuties)
|
|
Get
|
|
Return Me._vifDecTotDuties
|
|
End Get
|
|
Set
|
|
Me._vifDecTotDuties = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDec))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDec 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 vifDec object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDec 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 vifDec, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDec)
|
|
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 vifDec) 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 vifDec
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDec)
|
|
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 vifDec
|
|
Return CType(Serializer.Deserialize(s), vifDec)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDec 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 vifDec object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDec 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 vifDec, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDec)
|
|
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 vifDec) 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 vifDec
|
|
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")>
|
|
Partial Public Class vifDecAdjust
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _adjust_ID As Integer
|
|
|
|
Private _adjust_AdjTy As String
|
|
|
|
Private _adjust_Curr As String
|
|
|
|
Private _adjust_ExRa As System.Nullable(Of Double)
|
|
|
|
Private _adjust_Val As System.Nullable(Of Double)
|
|
|
|
Private _adjust_Perc As System.Nullable(Of Double)
|
|
|
|
Private _adjust_SplitCd As String
|
|
|
|
Private _adjust_ValTy As String
|
|
|
|
Private _adjust_InvCon As String
|
|
|
|
Private _adjust_InvConD As System.Nullable(Of Date)
|
|
|
|
Private _telo_ValEur As System.Nullable(Of Double)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Adjust_ID() As Integer
|
|
Get
|
|
Return Me._adjust_ID
|
|
End Get
|
|
Set
|
|
Me._adjust_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_AdjTy() As String
|
|
Get
|
|
Return Me._adjust_AdjTy
|
|
End Get
|
|
Set
|
|
Me._adjust_AdjTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_Curr() As String
|
|
Get
|
|
Return Me._adjust_Curr
|
|
End Get
|
|
Set
|
|
Me._adjust_Curr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_ExRa() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._adjust_ExRa
|
|
End Get
|
|
Set
|
|
Me._adjust_ExRa = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_Val() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._adjust_Val
|
|
End Get
|
|
Set
|
|
Me._adjust_Val = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_Perc() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._adjust_Perc
|
|
End Get
|
|
Set
|
|
Me._adjust_Perc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_SplitCd() As String
|
|
Get
|
|
Return Me._adjust_SplitCd
|
|
End Get
|
|
Set
|
|
Me._adjust_SplitCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_ValTy() As String
|
|
Get
|
|
Return Me._adjust_ValTy
|
|
End Get
|
|
Set
|
|
Me._adjust_ValTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_InvCon() As String
|
|
Get
|
|
Return Me._adjust_InvCon
|
|
End Get
|
|
Set
|
|
Me._adjust_InvCon = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Adjust_InvConD() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._adjust_InvConD
|
|
End Get
|
|
Set
|
|
Me._adjust_InvConD = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Telo_ValEur() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._telo_ValEur
|
|
End Get
|
|
Set
|
|
Me._telo_ValEur = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecAdjust))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecAdjust 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 vifDecAdjust object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecAdjust 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 vifDecAdjust, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecAdjust)
|
|
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 vifDecAdjust) 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 vifDecAdjust
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecAdjust)
|
|
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 vifDecAdjust
|
|
Return CType(Serializer.Deserialize(s), vifDecAdjust)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecAdjust 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 vifDecAdjust object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecAdjust 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 vifDecAdjust, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecAdjust)
|
|
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 vifDecAdjust) 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 vifDecAdjust
|
|
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")>
|
|
Partial Public Class vifDecTotDuties
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _totDuties_ID As Integer
|
|
|
|
Private _ty As String
|
|
|
|
Private _amnt As System.Nullable(Of Double)
|
|
|
|
Private _tyInd As String
|
|
|
|
Private _erstelldatum As System.Nullable(Of Date)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property TotDuties_ID() As Integer
|
|
Get
|
|
Return Me._totDuties_ID
|
|
End Get
|
|
Set
|
|
Me._totDuties_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Ty() As String
|
|
Get
|
|
Return Me._ty
|
|
End Get
|
|
Set
|
|
Me._ty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Amnt() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._amnt
|
|
End Get
|
|
Set
|
|
Me._amnt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property TyInd() As String
|
|
Get
|
|
Return Me._tyInd
|
|
End Get
|
|
Set
|
|
Me._tyInd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Erstelldatum() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._erstelldatum
|
|
End Get
|
|
Set
|
|
Me._erstelldatum = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecTotDuties))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecTotDuties 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 vifDecTotDuties object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecTotDuties 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 vifDecTotDuties, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecTotDuties)
|
|
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 vifDecTotDuties) 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 vifDecTotDuties
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecTotDuties)
|
|
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 vifDecTotDuties
|
|
Return CType(Serializer.Deserialize(s), vifDecTotDuties)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecTotDuties 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 vifDecTotDuties object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecTotDuties 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 vifDecTotDuties, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecTotDuties)
|
|
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 vifDecTotDuties) 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 vifDecTotDuties
|
|
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")>
|
|
Partial Public Class vifDecGrteeRef
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _grteeRef_ID As Integer
|
|
|
|
Private _grtee_GTy As String
|
|
|
|
Private _gRN As String
|
|
|
|
Private _oGR As String
|
|
|
|
Private _acc As String
|
|
|
|
Private _gTIN As String
|
|
|
|
Private _gVal As System.Nullable(Of Double)
|
|
|
|
Private _curr As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property GrteeRef_ID() As Integer
|
|
Get
|
|
Return Me._grteeRef_ID
|
|
End Get
|
|
Set
|
|
Me._grteeRef_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Grtee_GTy() As String
|
|
Get
|
|
Return Me._grtee_GTy
|
|
End Get
|
|
Set
|
|
Me._grtee_GTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property GRN() As String
|
|
Get
|
|
Return Me._gRN
|
|
End Get
|
|
Set
|
|
Me._gRN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property OGR() As String
|
|
Get
|
|
Return Me._oGR
|
|
End Get
|
|
Set
|
|
Me._oGR = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Acc() As String
|
|
Get
|
|
Return Me._acc
|
|
End Get
|
|
Set
|
|
Me._acc = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property GTIN() As String
|
|
Get
|
|
Return Me._gTIN
|
|
End Get
|
|
Set
|
|
Me._gTIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property GVal() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._gVal
|
|
End Get
|
|
Set
|
|
Me._gVal = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Curr() As String
|
|
Get
|
|
Return Me._curr
|
|
End Get
|
|
Set
|
|
Me._curr = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecGrteeRef))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecGrteeRef 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 vifDecGrteeRef object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecGrteeRef 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 vifDecGrteeRef, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecGrteeRef)
|
|
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 vifDecGrteeRef) 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 vifDecGrteeRef
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecGrteeRef)
|
|
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 vifDecGrteeRef
|
|
Return CType(Serializer.Deserialize(s), vifDecGrteeRef)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecGrteeRef 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 vifDecGrteeRef object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecGrteeRef 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 vifDecGrteeRef, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecGrteeRef)
|
|
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 vifDecGrteeRef) 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 vifDecGrteeRef
|
|
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")>
|
|
Partial Public Class vifDecDutyCalc
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _dutyCalc_ID As Integer
|
|
|
|
Private _ty As String
|
|
|
|
Private _baseD As System.Nullable(Of Date)
|
|
|
|
Private _curr As String
|
|
|
|
Private _unit As String
|
|
|
|
Private _base As System.Nullable(Of Double)
|
|
|
|
Private _rate As String
|
|
|
|
Private _rateUsed As String
|
|
|
|
Private _amnt As System.Nullable(Of Double)
|
|
|
|
Private _meaID As System.Nullable(Of Integer)
|
|
|
|
Private _tyInd As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property DutyCalc_ID() As Integer
|
|
Get
|
|
Return Me._dutyCalc_ID
|
|
End Get
|
|
Set
|
|
Me._dutyCalc_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Ty() As String
|
|
Get
|
|
Return Me._ty
|
|
End Get
|
|
Set
|
|
Me._ty = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property BaseD() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._baseD
|
|
End Get
|
|
Set
|
|
Me._baseD = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Curr() As String
|
|
Get
|
|
Return Me._curr
|
|
End Get
|
|
Set
|
|
Me._curr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Unit() As String
|
|
Get
|
|
Return Me._unit
|
|
End Get
|
|
Set
|
|
Me._unit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Base() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._base
|
|
End Get
|
|
Set
|
|
Me._base = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Rate() As String
|
|
Get
|
|
Return Me._rate
|
|
End Get
|
|
Set
|
|
Me._rate = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property RateUsed() As String
|
|
Get
|
|
Return Me._rateUsed
|
|
End Get
|
|
Set
|
|
Me._rateUsed = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Amnt() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._amnt
|
|
End Get
|
|
Set
|
|
Me._amnt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property MeaID() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._meaID
|
|
End Get
|
|
Set
|
|
Me._meaID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property TyInd() As String
|
|
Get
|
|
Return Me._tyInd
|
|
End Get
|
|
Set
|
|
Me._tyInd = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecDutyCalc))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecDutyCalc 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 vifDecDutyCalc object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecDutyCalc 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 vifDecDutyCalc, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecDutyCalc)
|
|
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 vifDecDutyCalc) 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 vifDecDutyCalc
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecDutyCalc)
|
|
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 vifDecDutyCalc
|
|
Return CType(Serializer.Deserialize(s), vifDecDutyCalc)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecDutyCalc 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 vifDecDutyCalc object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecDutyCalc 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 vifDecDutyCalc, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecDutyCalc)
|
|
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 vifDecDutyCalc) 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 vifDecDutyCalc
|
|
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")>
|
|
Partial Public Class vifDecSpecMent
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _specMent_ID As Integer
|
|
|
|
Private _inf As String
|
|
|
|
Private _cd As String
|
|
|
|
Private _exEC As System.Nullable(Of Boolean)
|
|
|
|
Private _exCtry As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property SpecMent_ID() As Integer
|
|
Get
|
|
Return Me._specMent_ID
|
|
End Get
|
|
Set
|
|
Me._specMent_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Inf() As String
|
|
Get
|
|
Return Me._inf
|
|
End Get
|
|
Set
|
|
Me._inf = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Cd() As String
|
|
Get
|
|
Return Me._cd
|
|
End Get
|
|
Set
|
|
Me._cd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExEC() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._exEC
|
|
End Get
|
|
Set
|
|
Me._exEC = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property ExCtry() As String
|
|
Get
|
|
Return Me._exCtry
|
|
End Get
|
|
Set
|
|
Me._exCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecSpecMent))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecSpecMent 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 vifDecSpecMent object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecSpecMent 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 vifDecSpecMent, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecSpecMent)
|
|
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 vifDecSpecMent) 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 vifDecSpecMent
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecSpecMent)
|
|
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 vifDecSpecMent
|
|
Return CType(Serializer.Deserialize(s), vifDecSpecMent)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecSpecMent 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 vifDecSpecMent object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecSpecMent 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 vifDecSpecMent, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecSpecMent)
|
|
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 vifDecSpecMent) 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 vifDecSpecMent
|
|
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")>
|
|
Partial Public Class vifDecSupplUnt
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _supplUnt_ID As Integer
|
|
|
|
Private _supplUnt_Unit As String
|
|
|
|
Private _supplUnt_SUQuant As System.Nullable(Of Double)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property SupplUnt_ID() As Integer
|
|
Get
|
|
Return Me._supplUnt_ID
|
|
End Get
|
|
Set
|
|
Me._supplUnt_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property SupplUnt_Unit() As String
|
|
Get
|
|
Return Me._supplUnt_Unit
|
|
End Get
|
|
Set
|
|
Me._supplUnt_Unit = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property SupplUnt_SUQuant() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._supplUnt_SUQuant
|
|
End Get
|
|
Set
|
|
Me._supplUnt_SUQuant = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecSupplUnt))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecSupplUnt 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 vifDecSupplUnt object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecSupplUnt 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 vifDecSupplUnt, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecSupplUnt)
|
|
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 vifDecSupplUnt) 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 vifDecSupplUnt
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecSupplUnt)
|
|
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 vifDecSupplUnt
|
|
Return CType(Serializer.Deserialize(s), vifDecSupplUnt)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecSupplUnt 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 vifDecSupplUnt object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecSupplUnt 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 vifDecSupplUnt, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecSupplUnt)
|
|
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 vifDecSupplUnt) 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 vifDecSupplUnt
|
|
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")>
|
|
Partial Public Class vifDecPrevAdmRef
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _prevRef_ID As Integer
|
|
|
|
Private _prevRef_Cat As String
|
|
|
|
Private _prevRef_PDTy As String
|
|
|
|
Private _prevRef_DRef As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property PrevRef_ID() As Integer
|
|
Get
|
|
Return Me._prevRef_ID
|
|
End Get
|
|
Set
|
|
Me._prevRef_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property PrevRef_Cat() As String
|
|
Get
|
|
Return Me._prevRef_Cat
|
|
End Get
|
|
Set
|
|
Me._prevRef_Cat = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property PrevRef_PDTy() As String
|
|
Get
|
|
Return Me._prevRef_PDTy
|
|
End Get
|
|
Set
|
|
Me._prevRef_PDTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property PrevRef_DRef() As String
|
|
Get
|
|
Return Me._prevRef_DRef
|
|
End Get
|
|
Set
|
|
Me._prevRef_DRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecPrevAdmRef))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecPrevAdmRef 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 vifDecPrevAdmRef object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecPrevAdmRef 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 vifDecPrevAdmRef, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecPrevAdmRef)
|
|
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 vifDecPrevAdmRef) 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 vifDecPrevAdmRef
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecPrevAdmRef)
|
|
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 vifDecPrevAdmRef
|
|
Return CType(Serializer.Deserialize(s), vifDecPrevAdmRef)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecPrevAdmRef 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 vifDecPrevAdmRef object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecPrevAdmRef 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 vifDecPrevAdmRef, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecPrevAdmRef)
|
|
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 vifDecPrevAdmRef) 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 vifDecPrevAdmRef
|
|
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")>
|
|
Partial Public Class vifDecPack
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _pack_ID As Integer
|
|
|
|
Private _pack_Mark As String
|
|
|
|
Private _pack_Kind As String
|
|
|
|
Private _pack_Nr As System.Nullable(Of Integer)
|
|
|
|
Private _pack_Piec As System.Nullable(Of Integer)
|
|
|
|
Private _tELO_Gross As System.Nullable(Of Double)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pack_ID() As Integer
|
|
Get
|
|
Return Me._pack_ID
|
|
End Get
|
|
Set
|
|
Me._pack_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Pack_Mark() As String
|
|
Get
|
|
Return Me._pack_Mark
|
|
End Get
|
|
Set
|
|
Me._pack_Mark = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Pack_Kind() As String
|
|
Get
|
|
Return Me._pack_Kind
|
|
End Get
|
|
Set
|
|
Me._pack_Kind = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Pack_Nr() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._pack_Nr
|
|
End Get
|
|
Set
|
|
Me._pack_Nr = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Pack_Piec() As System.Nullable(Of Integer)
|
|
Get
|
|
Return Me._pack_Piec
|
|
End Get
|
|
Set
|
|
Me._pack_Piec = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property TELO_Gross() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._tELO_Gross
|
|
End Get
|
|
Set
|
|
Me._tELO_Gross = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecPack))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecPack 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 vifDecPack object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecPack 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 vifDecPack, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecPack)
|
|
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 vifDecPack) 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 vifDecPack
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecPack)
|
|
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 vifDecPack
|
|
Return CType(Serializer.Deserialize(s), vifDecPack)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecPack 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 vifDecPack object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecPack 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 vifDecPack, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecPack)
|
|
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 vifDecPack) 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 vifDecPack
|
|
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")>
|
|
Partial Public Class vifDecDocCerts
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _docCerts_ID As Integer
|
|
|
|
Private _docCerts_DocCd As String
|
|
|
|
Private _docCerts_DTy As String
|
|
|
|
Private _docCerts_DRef As String
|
|
|
|
Private _docCerts_IssD As System.Nullable(Of Date)
|
|
|
|
Private _docCerts_IssCtry As String
|
|
|
|
Private _docCerts_DTIN As String
|
|
|
|
Private _docCerts_UidVid As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property DocCerts_ID() As Integer
|
|
Get
|
|
Return Me._docCerts_ID
|
|
End Get
|
|
Set
|
|
Me._docCerts_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_DocCd() As String
|
|
Get
|
|
Return Me._docCerts_DocCd
|
|
End Get
|
|
Set
|
|
Me._docCerts_DocCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_DTy() As String
|
|
Get
|
|
Return Me._docCerts_DTy
|
|
End Get
|
|
Set
|
|
Me._docCerts_DTy = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_DRef() As String
|
|
Get
|
|
Return Me._docCerts_DRef
|
|
End Get
|
|
Set
|
|
Me._docCerts_DRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_IssD() As System.Nullable(Of Date)
|
|
Get
|
|
Return Me._docCerts_IssD
|
|
End Get
|
|
Set
|
|
Me._docCerts_IssD = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_IssCtry() As String
|
|
Get
|
|
Return Me._docCerts_IssCtry
|
|
End Get
|
|
Set
|
|
Me._docCerts_IssCtry = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_DTIN() As String
|
|
Get
|
|
Return Me._docCerts_DTIN
|
|
End Get
|
|
Set
|
|
Me._docCerts_DTIN = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property DocCerts_UidVid() As String
|
|
Get
|
|
Return Me._docCerts_UidVid
|
|
End Get
|
|
Set
|
|
Me._docCerts_UidVid = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecDocCerts))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecDocCerts 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 vifDecDocCerts object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecDocCerts 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 vifDecDocCerts, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecDocCerts)
|
|
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 vifDecDocCerts) 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 vifDecDocCerts
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecDocCerts)
|
|
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 vifDecDocCerts
|
|
Return CType(Serializer.Deserialize(s), vifDecDocCerts)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecDocCerts 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 vifDecDocCerts object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecDocCerts 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 vifDecDocCerts, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecDocCerts)
|
|
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 vifDecDocCerts) 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 vifDecDocCerts
|
|
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")>
|
|
Partial Public Class vifDecContainer
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _container_ID As Integer
|
|
|
|
Private _container_CNr As String
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Container_ID() As Integer
|
|
Get
|
|
Return Me._container_ID
|
|
End Get
|
|
Set
|
|
Me._container_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Container_CNr() As String
|
|
Get
|
|
Return Me._container_CNr
|
|
End Get
|
|
Set
|
|
Me._container_CNr = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecContainer))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecContainer 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 vifDecContainer object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecContainer 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 vifDecContainer, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecContainer)
|
|
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 vifDecContainer) 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 vifDecContainer
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecContainer)
|
|
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 vifDecContainer
|
|
Return CType(Serializer.Deserialize(s), vifDecContainer)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecContainer 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 vifDecContainer object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecContainer 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 vifDecContainer, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecContainer)
|
|
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 vifDecContainer) 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 vifDecContainer
|
|
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")>
|
|
Partial Public Class vifDecItem
|
|
|
|
#Region "Private fields"
|
|
Private _mandant_ID As String
|
|
|
|
Private _bereich_ID As String
|
|
|
|
Private _referenz_ID As String
|
|
|
|
Private _comIndicator As Byte
|
|
|
|
Private _pos_ID As Integer
|
|
|
|
Private _item_Status As String
|
|
|
|
Private _item_ComCd As String
|
|
|
|
Private _item_GdsDes As String
|
|
|
|
Private _item_Gross As System.Nullable(Of Double)
|
|
|
|
Private _item_Net As System.Nullable(Of Double)
|
|
|
|
Private _item_Orig As String
|
|
|
|
Private _item_ProcCd As String
|
|
|
|
Private _item_ProcAddCd As String
|
|
|
|
Private _item_ItVal As System.Nullable(Of Double)
|
|
|
|
Private _item_Pref As String
|
|
|
|
Private _item_Quota As String
|
|
|
|
Private _item_ValMet As System.Nullable(Of Byte)
|
|
|
|
Private _item_VATInd As System.Nullable(Of Boolean)
|
|
|
|
Private _item_StatVal As System.Nullable(Of Double)
|
|
|
|
Private _survCO_Ref As String
|
|
|
|
Private _telo_Artikel_ID As String
|
|
|
|
Private _telo_ArtikelMenge As System.Nullable(Of Double)
|
|
|
|
Private _telo_ArtikelMEH As String
|
|
|
|
Private _vifDecContainer As List(Of vifDecContainer)
|
|
|
|
Private _vifDecDocCerts As List(Of vifDecDocCerts)
|
|
|
|
Private _vifDecPack As List(Of vifDecPack)
|
|
|
|
Private _vifDecPrevAdmRef As List(Of vifDecPrevAdmRef)
|
|
|
|
Private _vifDecSupplUnt As List(Of vifDecSupplUnt)
|
|
|
|
Private _vifDecSpecMent As List(Of vifDecSpecMent)
|
|
|
|
Private _vifDecDutyCalc As List(Of vifDecDutyCalc)
|
|
|
|
Private Shared sSerializer As XmlSerializer
|
|
#End Region
|
|
|
|
Public Sub New()
|
|
MyBase.New
|
|
Me._vifDecDutyCalc = New List(Of vifDecDutyCalc)()
|
|
Me._vifDecSpecMent = New List(Of vifDecSpecMent)()
|
|
Me._vifDecSupplUnt = New List(Of vifDecSupplUnt)()
|
|
Me._vifDecPrevAdmRef = New List(Of vifDecPrevAdmRef)()
|
|
Me._vifDecPack = New List(Of vifDecPack)()
|
|
Me._vifDecDocCerts = New List(Of vifDecDocCerts)()
|
|
Me._vifDecContainer = New List(Of vifDecContainer)()
|
|
End Sub
|
|
|
|
Public Property Mandant_ID() As String
|
|
Get
|
|
Return Me._mandant_ID
|
|
End Get
|
|
Set
|
|
Me._mandant_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Bereich_ID() As String
|
|
Get
|
|
Return Me._bereich_ID
|
|
End Get
|
|
Set
|
|
Me._bereich_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Referenz_ID() As String
|
|
Get
|
|
Return Me._referenz_ID
|
|
End Get
|
|
Set
|
|
Me._referenz_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property ComIndicator() As Byte
|
|
Get
|
|
Return Me._comIndicator
|
|
End Get
|
|
Set
|
|
Me._comIndicator = Value
|
|
End Set
|
|
End Property
|
|
|
|
Public Property Pos_ID() As Integer
|
|
Get
|
|
Return Me._pos_ID
|
|
End Get
|
|
Set
|
|
Me._pos_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_Status() As String
|
|
Get
|
|
Return Me._item_Status
|
|
End Get
|
|
Set
|
|
Me._item_Status = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_ComCd() As String
|
|
Get
|
|
Return Me._item_ComCd
|
|
End Get
|
|
Set
|
|
Me._item_ComCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_GdsDes() As String
|
|
Get
|
|
Return Me._item_GdsDes
|
|
End Get
|
|
Set
|
|
Me._item_GdsDes = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_Gross() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._item_Gross
|
|
End Get
|
|
Set
|
|
Me._item_Gross = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_Net() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._item_Net
|
|
End Get
|
|
Set
|
|
Me._item_Net = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_Orig() As String
|
|
Get
|
|
Return Me._item_Orig
|
|
End Get
|
|
Set
|
|
Me._item_Orig = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_ProcCd() As String
|
|
Get
|
|
Return Me._item_ProcCd
|
|
End Get
|
|
Set
|
|
Me._item_ProcCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_ProcAddCd() As String
|
|
Get
|
|
Return Me._item_ProcAddCd
|
|
End Get
|
|
Set
|
|
Me._item_ProcAddCd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_ItVal() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._item_ItVal
|
|
End Get
|
|
Set
|
|
Me._item_ItVal = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_Pref() As String
|
|
Get
|
|
Return Me._item_Pref
|
|
End Get
|
|
Set
|
|
Me._item_Pref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_Quota() As String
|
|
Get
|
|
Return Me._item_Quota
|
|
End Get
|
|
Set
|
|
Me._item_Quota = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_ValMet() As System.Nullable(Of Byte)
|
|
Get
|
|
Return Me._item_ValMet
|
|
End Get
|
|
Set
|
|
Me._item_ValMet = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_VATInd() As System.Nullable(Of Boolean)
|
|
Get
|
|
Return Me._item_VATInd
|
|
End Get
|
|
Set
|
|
Me._item_VATInd = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Item_StatVal() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._item_StatVal
|
|
End Get
|
|
Set
|
|
Me._item_StatVal = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property SurvCO_Ref() As String
|
|
Get
|
|
Return Me._survCO_Ref
|
|
End Get
|
|
Set
|
|
Me._survCO_Ref = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Telo_Artikel_ID() As String
|
|
Get
|
|
Return Me._telo_Artikel_ID
|
|
End Get
|
|
Set
|
|
Me._telo_Artikel_ID = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Telo_ArtikelMenge() As System.Nullable(Of Double)
|
|
Get
|
|
Return Me._telo_ArtikelMenge
|
|
End Get
|
|
Set
|
|
Me._telo_ArtikelMenge = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute(IsNullable:=True)>
|
|
Public Property Telo_ArtikelMEH() As String
|
|
Get
|
|
Return Me._telo_ArtikelMEH
|
|
End Get
|
|
Set
|
|
Me._telo_ArtikelMEH = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecContainer")>
|
|
Public Property vifDecContainer() As List(Of vifDecContainer)
|
|
Get
|
|
Return Me._vifDecContainer
|
|
End Get
|
|
Set
|
|
Me._vifDecContainer = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecDocCerts")>
|
|
Public Property vifDecDocCerts() As List(Of vifDecDocCerts)
|
|
Get
|
|
Return Me._vifDecDocCerts
|
|
End Get
|
|
Set
|
|
Me._vifDecDocCerts = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecPack")>
|
|
Public Property vifDecPack() As List(Of vifDecPack)
|
|
Get
|
|
Return Me._vifDecPack
|
|
End Get
|
|
Set
|
|
Me._vifDecPack = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecPrevAdmRef")>
|
|
Public Property vifDecPrevAdmRef() As List(Of vifDecPrevAdmRef)
|
|
Get
|
|
Return Me._vifDecPrevAdmRef
|
|
End Get
|
|
Set
|
|
Me._vifDecPrevAdmRef = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecSupplUnt")>
|
|
Public Property vifDecSupplUnt() As List(Of vifDecSupplUnt)
|
|
Get
|
|
Return Me._vifDecSupplUnt
|
|
End Get
|
|
Set
|
|
Me._vifDecSupplUnt = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecSpecMent")>
|
|
Public Property vifDecSpecMent() As List(Of vifDecSpecMent)
|
|
Get
|
|
Return Me._vifDecSpecMent
|
|
End Get
|
|
Set
|
|
Me._vifDecSpecMent = Value
|
|
End Set
|
|
End Property
|
|
|
|
<System.Xml.Serialization.XmlElementAttribute("vifDecDutyCalc")>
|
|
Public Property vifDecDutyCalc() As List(Of vifDecDutyCalc)
|
|
Get
|
|
Return Me._vifDecDutyCalc
|
|
End Get
|
|
Set
|
|
Me._vifDecDutyCalc = Value
|
|
End Set
|
|
End Property
|
|
|
|
Private Shared ReadOnly Property Serializer() As XmlSerializer
|
|
Get
|
|
If (sSerializer Is Nothing) Then
|
|
sSerializer = New XmlSerializerFactory().CreateSerializer(GetType(vifDecItem))
|
|
End If
|
|
Return sSerializer
|
|
End Get
|
|
End Property
|
|
|
|
#Region "Serialize/Deserialize"
|
|
''' <summary>
|
|
''' Serializes current vifDecItem 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 vifDecItem object
|
|
''' </summary>
|
|
''' <param name="input">string workflow markup to deserialize</param>
|
|
''' <param name="obj">Output vifDecItem 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 vifDecItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecItem)
|
|
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 vifDecItem) 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 vifDecItem
|
|
Dim stringReader As System.IO.StringReader = Nothing
|
|
Try
|
|
stringReader = New System.IO.StringReader(input)
|
|
Return CType(Serializer.Deserialize(XmlReader.Create(stringReader)), vifDecItem)
|
|
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 vifDecItem
|
|
Return CType(Serializer.Deserialize(s), vifDecItem)
|
|
End Function
|
|
#End Region
|
|
|
|
''' <summary>
|
|
''' Serializes current vifDecItem 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 vifDecItem object
|
|
''' </summary>
|
|
''' <param name="fileName">string xml file to load and deserialize</param>
|
|
''' <param name="obj">Output vifDecItem 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 vifDecItem, ByRef exception As System.Exception) As Boolean
|
|
exception = Nothing
|
|
obj = CType(Nothing, vifDecItem)
|
|
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 vifDecItem) 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 vifDecItem
|
|
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
|