' Copyright (C) 2025  P4pillon.org
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU Affero General Public License as
' published by the Free Software Foundation, either version 3 of the
' License, or (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
' GNU Affero General Public License for more details.
'
' You should have received a copy of the GNU Affero General Public License
' along with this program.  If not, see <https://www.gnu.org/licenses/>.
'------------------------------------------------------------------------------
' <auto-generated>
'     Ce code a été généré par un outil.
'     Version du runtime :4.0.30319.42000
'
'     Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
'     le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------

'LIGNE DE COMMANDE POUR GENERER LA CLASSE A PARTIR DU xsd:
'xsd.exe D:\temp\alerte.xsd /classes /language:vb /out:D:\temp\ 


Option Strict Off
Option Explicit On

Imports System.Xml.Serialization

'
'This source code was auto-generated by xsd, Version=4.7.3062.0.
'

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class DP

    Private refField As String

    Private typeField As String

    Private dateLectureField As Date

    Private dateEmissionField As Date

    Private dateExpirationField As Date

    Private emetteurField As String

    Private titreField As String

    Private texteField As String

    Private demandeRetourField As String

    Private laboratoireField As laboratoire

    Private produitsField() As produit

    Private alerteSuivanteField As alerteSuivante

    Private annulrefField As String

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property ref() As String
        Get
            Return Me.refField
        End Get
        Set(value As String)
            Me.refField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property type() As String
        Get
            Return Me.typeField
        End Get
        Set(value As String)
            Me.typeField = value
        End Set
    End Property

    '''<remarks/>
    Public Property dateLecture() As Date
        Get
            Return Me.dateLectureField
        End Get
        Set(value As Date)
            Me.dateLectureField = value
        End Set
    End Property

    '''<remarks/>
    Public Property dateEmission() As Date
        Get
            Return Me.dateEmissionField
        End Get
        Set(value As Date)
            Me.dateEmissionField = value
        End Set
    End Property

    '''<remarks/>
    Public Property dateExpiration() As Date
        Get
            Return Me.dateExpirationField
        End Get
        Set(value As Date)
            Me.dateExpirationField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property emetteur() As String
        Get
            Return Me.emetteurField
        End Get
        Set(value As String)
            Me.emetteurField = value
        End Set
    End Property

    '''<remarks/>
    Public Property titre() As String
        Get
            Return Me.titreField
        End Get
        Set(value As String)
            Me.titreField = value
        End Set
    End Property

    '''<remarks/>
    Public Property texte() As String
        Get
            Return Me.texteField
        End Get
        Set(value As String)
            Me.texteField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property demandeRetour() As String
        Get
            Return Me.demandeRetourField
        End Get
        Set(value As String)
            Me.demandeRetourField = value
        End Set
    End Property

    '''<remarks/>
    Public Property laboratoire() As laboratoire
        Get
            Return Me.laboratoireField
        End Get
        Set(value As laboratoire)
            Me.laboratoireField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlArrayItemAttribute("produit", IsNullable:=False)> _
    Public Property produits() As produit()
        Get
            Return Me.produitsField
        End Get
        Set(value As produit())
            Me.produitsField = value
        End Set
    End Property

    '''<remarks/>
    Public Property alerteSuivante() As alerteSuivante
        Get
            Return Me.alerteSuivanteField
        End Get
        Set(value As alerteSuivante)
            Me.alerteSuivanteField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property annulref() As String
        Get
            Return Me.annulrefField
        End Get
        Set(value As String)
            Me.annulrefField = value
        End Set
    End Property
End Class

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class laboratoire

    Private contactField As String

    Private adresseField As String

    Private codePostalField As String

    Private villeField As String

    Private telephoneField As String

    Private faxField As String

    Private emailField As String

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property contact() As String
        Get
            Return Me.contactField
        End Get
        Set(value As String)
            Me.contactField = value
        End Set
    End Property

    '''<remarks/>
    Public Property adresse() As String
        Get
            Return Me.adresseField
        End Get
        Set(value As String)
            Me.adresseField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property codePostal() As String
        Get
            Return Me.codePostalField
        End Get
        Set(value As String)
            Me.codePostalField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property ville() As String
        Get
            Return Me.villeField
        End Get
        Set(value As String)
            Me.villeField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property telephone() As String
        Get
            Return Me.telephoneField
        End Get
        Set(value As String)
            Me.telephoneField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property fax() As String
        Get
            Return Me.faxField
        End Get
        Set(value As String)
            Me.faxField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property email() As String
        Get
            Return Me.emailField
        End Get
        Set(value As String)
            Me.emailField = value
        End Set
    End Property
End Class

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class produit

    Private codeField As String

    Private libelleField As String

    Private lotsField As lots

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property code() As String
        Get
            Return Me.codeField
        End Get
        Set(value As String)
            Me.codeField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
    Public Property libelle() As String
        Get
            Return Me.libelleField
        End Get
        Set(value As String)
            Me.libelleField = value
        End Set
    End Property

    '''<remarks/>
    Public Property lots() As lots
        Get
            Return Me.lotsField
        End Get
        Set(value As lots)
            Me.lotsField = value
        End Set
    End Property
End Class

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class lots

    Private lotField() As lot

    Private ensembleField As String

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute("lot")> _
    Public Property lot() As lot()
        Get
            Return Me.lotField
        End Get
        Set(value As lot())
            Me.lotField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
    Public Property ensemble() As String
        Get
            Return Me.ensembleField
        End Get
        Set(value As String)
            Me.ensembleField = value
        End Set
    End Property
End Class

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class lot

    Private numField As String

    Private perField As Date

    Private perFieldSpecified As Boolean

    '''<remarks/>
    <System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
    Public Property num() As String
        Get
            Return Me.numField
        End Get
        Set(value As String)
            Me.numField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlAttributeAttribute(DataType:="date")> _
    Public Property per() As Date
        Get
            Return Me.perField
        End Get
        Set(value As Date)
            Me.perField = value
        End Set
    End Property

    '''<remarks/>
    <System.Xml.Serialization.XmlIgnoreAttribute()> _
    Public Property perSpecified() As Boolean
        Get
            Return Me.perFieldSpecified
        End Get
        Set(value As Boolean)
            Me.perFieldSpecified = value
        End Set
    End Property
End Class

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class alerteSuivante

    Private hrefField As String

    '''<remarks/>
    <System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
    Public Property href() As String
        Get
            Return Me.hrefField
        End Get
        Set(value As String)
            Me.hrefField = value
        End Set
    End Property
End Class

'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
 System.SerializableAttribute(), _
 System.Diagnostics.DebuggerStepThroughAttribute(), _
 System.ComponentModel.DesignerCategoryAttribute("code"), _
 System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
 System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class produits

    Private produitField() As produit

    '''<remarks/>
    <System.Xml.Serialization.XmlElementAttribute("produit")> _
    Public Property produit() As produit()
        Get
            Return Me.produitField
        End Get
        Set(value As produit())
            Me.produitField = value
        End Set
    End Property

    Public Sub save_alerte(ByVal myalerte As DP, ByVal File As String)
        Dim serializer As New XmlSerializer(GetType(DP))
        Dim writer As New System.IO.StreamWriter(File)
        serializer.Serialize(writer, myalerte)
        writer.Close()
    End Sub
    Public Sub load(ByVal File As String, ByRef myalerte As DP)
        Dim serializer As New XmlSerializer(GetType(DP))
        Dim reader As New IO.StreamReader(File)
        myalerte = serializer.Deserialize(reader)
        reader.Close()
        reader.Dispose()
    End Sub
End Class

