' 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 :2.0.50727.6400
'
'     Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
'     le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------

Option Strict Off
Option Explicit On



'''<summary>
'''Represents a strongly typed in-memory cache of data.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
 Global.System.Serializable(),  _
 Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
 Global.System.ComponentModel.ToolboxItem(true),  _
 Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedDataSetSchema"),  _
 Global.System.Xml.Serialization.XmlRootAttribute("PharmaDataSet"),  _
 Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.DataSet")>  _
Partial Public Class PharmaDataSet
    Inherits Global.System.Data.DataSet
    
    Private tableProduits As ProduitsDataTable
    
    Private tablePrescripteurs As PrescripteursDataTable
    
    Private tableVitale As VitaleDataTable
    
    Private tableLPP As LPPDataTable
    
    Private tableFactures As FacturesDataTable
    
    Private tableFichiersSV As FichiersSVDataTable
    
    Private tableActes As ActesDataTable
    
    Private tableSMTP As SMTPDataTable
    
    Private tableLots As LotsDataTable
    
    Private tableFacture_DétailCodeCIP As Facture_DétailCodeCIPDataTable
    
    Private tableFacture_DétailLpp As Facture_DétailLppDataTable
    
    Private tableFacture_LigneFacture As Facture_LigneFactureDataTable
    
    Private _tableAMC__Organismes_Contrat_Type_ As _AMC__Organismes_Contrat_Type_DataTable
    
    Private tableAMC_Contrat_Type As AMC_Contrat_TypeDataTable
    
    Private tableAMC_Organismes As AMC_OrganismesDataTable
    
    Private tableCodePrestations As CodePrestationsDataTable
    
    Private tableARL As ARLDataTable
    
    Private tableAMO As AMODataTable
    
    Private tableFacture_VenteDirecte As Facture_VenteDirecteDataTable
    
    Private tablePop_Allowed_List As Pop_Allowed_ListDataTable
    
    Private tableConvention_Table_correspondance As Convention_Table_correspondanceDataTable
    
    Private tableConvention_Table_Conventions As Convention_Table_ConventionsDataTable
    
    Private tableConvention_Table_Regroupements As Convention_Table_RegroupementsDataTable
    
    Private _tableTaux_CodeRégime As _Taux_CodeRégimeDataTable
    
    Private _tableTaux_CodeSituation As _Taux_CodeSituationDataTable
    
    Private tableAR_P As AR_PDataTable
    
    Private _tableService_Rejet As _Service_RejetDataTable
    
    Private tableRSP_LIGNE_REJET As RSP_LIGNE_REJETDataTable
    
    Private tableRSP_Paiements As RSP_PaiementsDataTable
    
    Private tableLOI_Demande As LOI_DemandeDataTable
    
    Private tableSCOR_PJ As SCOR_PJDataTable
    
    Private tableSCOR_lots As SCOR_lotsDataTable
    
    Private tablecompatibilités__codes_prestation__qualité_bénéficiaire As compatibilités__codes_prestation__qualité_bénéficiaireDataTable
    
    Private tablecompatibilités_codes_prestation_nature_assurance As compatibilités_codes_prestation_nature_assuranceDataTable
    
    Private tableBDM_Prix As BDM_PrixDataTable
    
    Private tableBDM_médicaments_detournables As BDM_médicaments_detournablesDataTable
    
    Private _schemaSerializationMode As Global.System.Data.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Public Sub New()
        MyBase.New
        Me.BeginInit
        Me.InitClass
        Dim schemaChangedHandler As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
        AddHandler MyBase.Tables.CollectionChanged, schemaChangedHandler
        AddHandler MyBase.Relations.CollectionChanged, schemaChangedHandler
        Me.EndInit
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
        MyBase.New(info, context, false)
        If (Me.IsBinarySerialized(info, context) = true) Then
            Me.InitVars(false)
            Dim schemaChangedHandler1 As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
            AddHandler Me.Tables.CollectionChanged, schemaChangedHandler1
            AddHandler Me.Relations.CollectionChanged, schemaChangedHandler1
            Return
        End If
        Dim strSchema As String = CType(info.GetValue("XmlSchema", GetType(String)),String)
        If (Me.DetermineSchemaSerializationMode(info, context) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
            Dim ds As Global.System.Data.DataSet = New Global.System.Data.DataSet
            ds.ReadXmlSchema(New Global.System.Xml.XmlTextReader(New Global.System.IO.StringReader(strSchema)))
            If (Not (ds.Tables("Produits")) Is Nothing) Then
                MyBase.Tables.Add(New ProduitsDataTable(ds.Tables("Produits")))
            End If
            If (Not (ds.Tables("Prescripteurs")) Is Nothing) Then
                MyBase.Tables.Add(New PrescripteursDataTable(ds.Tables("Prescripteurs")))
            End If
            If (Not (ds.Tables("Vitale")) Is Nothing) Then
                MyBase.Tables.Add(New VitaleDataTable(ds.Tables("Vitale")))
            End If
            If (Not (ds.Tables("LPP")) Is Nothing) Then
                MyBase.Tables.Add(New LPPDataTable(ds.Tables("LPP")))
            End If
            If (Not (ds.Tables("Factures")) Is Nothing) Then
                MyBase.Tables.Add(New FacturesDataTable(ds.Tables("Factures")))
            End If
            If (Not (ds.Tables("FichiersSV")) Is Nothing) Then
                MyBase.Tables.Add(New FichiersSVDataTable(ds.Tables("FichiersSV")))
            End If
            If (Not (ds.Tables("Actes")) Is Nothing) Then
                MyBase.Tables.Add(New ActesDataTable(ds.Tables("Actes")))
            End If
            If (Not (ds.Tables("SMTP")) Is Nothing) Then
                MyBase.Tables.Add(New SMTPDataTable(ds.Tables("SMTP")))
            End If
            If (Not (ds.Tables("Lots")) Is Nothing) Then
                MyBase.Tables.Add(New LotsDataTable(ds.Tables("Lots")))
            End If
            If (Not (ds.Tables("Facture_DétailCodeCIP")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_DétailCodeCIPDataTable(ds.Tables("Facture_DétailCodeCIP")))
            End If
            If (Not (ds.Tables("Facture_DétailLpp")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_DétailLppDataTable(ds.Tables("Facture_DétailLpp")))
            End If
            If (Not (ds.Tables("Facture_LigneFacture")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_LigneFactureDataTable(ds.Tables("Facture_LigneFacture")))
            End If
            If (Not (ds.Tables("AMC_(Organismes/Contrat_Type)")) Is Nothing) Then
                MyBase.Tables.Add(New _AMC__Organismes_Contrat_Type_DataTable(ds.Tables("AMC_(Organismes/Contrat_Type)")))
            End If
            If (Not (ds.Tables("AMC_Contrat_Type")) Is Nothing) Then
                MyBase.Tables.Add(New AMC_Contrat_TypeDataTable(ds.Tables("AMC_Contrat_Type")))
            End If
            If (Not (ds.Tables("AMC_Organismes")) Is Nothing) Then
                MyBase.Tables.Add(New AMC_OrganismesDataTable(ds.Tables("AMC_Organismes")))
            End If
            If (Not (ds.Tables("CodePrestations")) Is Nothing) Then
                MyBase.Tables.Add(New CodePrestationsDataTable(ds.Tables("CodePrestations")))
            End If
            If (Not (ds.Tables("ARL")) Is Nothing) Then
                MyBase.Tables.Add(New ARLDataTable(ds.Tables("ARL")))
            End If
            If (Not (ds.Tables("AMO")) Is Nothing) Then
                MyBase.Tables.Add(New AMODataTable(ds.Tables("AMO")))
            End If
            If (Not (ds.Tables("Facture_VenteDirecte")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_VenteDirecteDataTable(ds.Tables("Facture_VenteDirecte")))
            End If
            If (Not (ds.Tables("Pop_Allowed_List")) Is Nothing) Then
                MyBase.Tables.Add(New Pop_Allowed_ListDataTable(ds.Tables("Pop_Allowed_List")))
            End If
            If (Not (ds.Tables("Convention_Table_correspondance")) Is Nothing) Then
                MyBase.Tables.Add(New Convention_Table_correspondanceDataTable(ds.Tables("Convention_Table_correspondance")))
            End If
            If (Not (ds.Tables("Convention_Table_Conventions")) Is Nothing) Then
                MyBase.Tables.Add(New Convention_Table_ConventionsDataTable(ds.Tables("Convention_Table_Conventions")))
            End If
            If (Not (ds.Tables("Convention_Table_Regroupements")) Is Nothing) Then
                MyBase.Tables.Add(New Convention_Table_RegroupementsDataTable(ds.Tables("Convention_Table_Regroupements")))
            End If
            If (Not (ds.Tables("Taux/CodeRégime")) Is Nothing) Then
                MyBase.Tables.Add(New _Taux_CodeRégimeDataTable(ds.Tables("Taux/CodeRégime")))
            End If
            If (Not (ds.Tables("Taux/CodeSituation")) Is Nothing) Then
                MyBase.Tables.Add(New _Taux_CodeSituationDataTable(ds.Tables("Taux/CodeSituation")))
            End If
            If (Not (ds.Tables("AR_P")) Is Nothing) Then
                MyBase.Tables.Add(New AR_PDataTable(ds.Tables("AR_P")))
            End If
            If (Not (ds.Tables("Service/Rejet")) Is Nothing) Then
                MyBase.Tables.Add(New _Service_RejetDataTable(ds.Tables("Service/Rejet")))
            End If
            If (Not (ds.Tables("RSP_LIGNE_REJET")) Is Nothing) Then
                MyBase.Tables.Add(New RSP_LIGNE_REJETDataTable(ds.Tables("RSP_LIGNE_REJET")))
            End If
            If (Not (ds.Tables("RSP_Paiements")) Is Nothing) Then
                MyBase.Tables.Add(New RSP_PaiementsDataTable(ds.Tables("RSP_Paiements")))
            End If
            If (Not (ds.Tables("LOI_Demande")) Is Nothing) Then
                MyBase.Tables.Add(New LOI_DemandeDataTable(ds.Tables("LOI_Demande")))
            End If
            If (Not (ds.Tables("SCOR_PJ")) Is Nothing) Then
                MyBase.Tables.Add(New SCOR_PJDataTable(ds.Tables("SCOR_PJ")))
            End If
            If (Not (ds.Tables("SCOR_lots")) Is Nothing) Then
                MyBase.Tables.Add(New SCOR_lotsDataTable(ds.Tables("SCOR_lots")))
            End If
            If (Not (ds.Tables("compatibilités_ codes_prestation_ qualité_bénéficiaire")) Is Nothing) Then
                MyBase.Tables.Add(New compatibilités__codes_prestation__qualité_bénéficiaireDataTable(ds.Tables("compatibilités_ codes_prestation_ qualité_bénéficiaire")))
            End If
            If (Not (ds.Tables("compatibilités_codes_prestation_nature_assurance")) Is Nothing) Then
                MyBase.Tables.Add(New compatibilités_codes_prestation_nature_assuranceDataTable(ds.Tables("compatibilités_codes_prestation_nature_assurance")))
            End If
            If (Not (ds.Tables("BDM_Prix")) Is Nothing) Then
                MyBase.Tables.Add(New BDM_PrixDataTable(ds.Tables("BDM_Prix")))
            End If
            If (Not (ds.Tables("BDM_médicaments_detournables")) Is Nothing) Then
                MyBase.Tables.Add(New BDM_médicaments_detournablesDataTable(ds.Tables("BDM_médicaments_detournables")))
            End If
            Me.DataSetName = ds.DataSetName
            Me.Prefix = ds.Prefix
            Me.Namespace = ds.Namespace
            Me.Locale = ds.Locale
            Me.CaseSensitive = ds.CaseSensitive
            Me.EnforceConstraints = ds.EnforceConstraints
            Me.Merge(ds, false, Global.System.Data.MissingSchemaAction.Add)
            Me.InitVars
        Else
            Me.ReadXmlSchema(New Global.System.Xml.XmlTextReader(New Global.System.IO.StringReader(strSchema)))
        End If
        Me.GetSerializationData(info, context)
        Dim schemaChangedHandler As Global.System.ComponentModel.CollectionChangeEventHandler = AddressOf Me.SchemaChanged
        AddHandler MyBase.Tables.CollectionChanged, schemaChangedHandler
        AddHandler Me.Relations.CollectionChanged, schemaChangedHandler
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Produits() As ProduitsDataTable
        Get
            Return Me.tableProduits
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Prescripteurs() As PrescripteursDataTable
        Get
            Return Me.tablePrescripteurs
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Vitale() As VitaleDataTable
        Get
            Return Me.tableVitale
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property LPP() As LPPDataTable
        Get
            Return Me.tableLPP
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Factures() As FacturesDataTable
        Get
            Return Me.tableFactures
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property FichiersSV() As FichiersSVDataTable
        Get
            Return Me.tableFichiersSV
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Actes() As ActesDataTable
        Get
            Return Me.tableActes
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property SMTP() As SMTPDataTable
        Get
            Return Me.tableSMTP
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Lots() As LotsDataTable
        Get
            Return Me.tableLots
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Facture_DétailCodeCIP() As Facture_DétailCodeCIPDataTable
        Get
            Return Me.tableFacture_DétailCodeCIP
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Facture_DétailLpp() As Facture_DétailLppDataTable
        Get
            Return Me.tableFacture_DétailLpp
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Facture_LigneFacture() As Facture_LigneFactureDataTable
        Get
            Return Me.tableFacture_LigneFacture
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property _AMC__Organismes_Contrat_Type_() As _AMC__Organismes_Contrat_Type_DataTable
        Get
            Return Me._tableAMC__Organismes_Contrat_Type_
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property AMC_Contrat_Type() As AMC_Contrat_TypeDataTable
        Get
            Return Me.tableAMC_Contrat_Type
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property AMC_Organismes() As AMC_OrganismesDataTable
        Get
            Return Me.tableAMC_Organismes
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property CodePrestations() As CodePrestationsDataTable
        Get
            Return Me.tableCodePrestations
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property ARL() As ARLDataTable
        Get
            Return Me.tableARL
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property AMO() As AMODataTable
        Get
            Return Me.tableAMO
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Facture_VenteDirecte() As Facture_VenteDirecteDataTable
        Get
            Return Me.tableFacture_VenteDirecte
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Pop_Allowed_List() As Pop_Allowed_ListDataTable
        Get
            Return Me.tablePop_Allowed_List
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Convention_Table_correspondance() As Convention_Table_correspondanceDataTable
        Get
            Return Me.tableConvention_Table_correspondance
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Convention_Table_Conventions() As Convention_Table_ConventionsDataTable
        Get
            Return Me.tableConvention_Table_Conventions
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property Convention_Table_Regroupements() As Convention_Table_RegroupementsDataTable
        Get
            Return Me.tableConvention_Table_Regroupements
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property _Taux_CodeRégime() As _Taux_CodeRégimeDataTable
        Get
            Return Me._tableTaux_CodeRégime
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property _Taux_CodeSituation() As _Taux_CodeSituationDataTable
        Get
            Return Me._tableTaux_CodeSituation
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property AR_P() As AR_PDataTable
        Get
            Return Me.tableAR_P
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property _Service_Rejet() As _Service_RejetDataTable
        Get
            Return Me._tableService_Rejet
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property RSP_LIGNE_REJET() As RSP_LIGNE_REJETDataTable
        Get
            Return Me.tableRSP_LIGNE_REJET
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property RSP_Paiements() As RSP_PaiementsDataTable
        Get
            Return Me.tableRSP_Paiements
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property LOI_Demande() As LOI_DemandeDataTable
        Get
            Return Me.tableLOI_Demande
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property SCOR_PJ() As SCOR_PJDataTable
        Get
            Return Me.tableSCOR_PJ
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property SCOR_lots() As SCOR_lotsDataTable
        Get
            Return Me.tableSCOR_lots
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property compatibilités__codes_prestation__qualité_bénéficiaire() As compatibilités__codes_prestation__qualité_bénéficiaireDataTable
        Get
            Return Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property compatibilités_codes_prestation_nature_assurance() As compatibilités_codes_prestation_nature_assuranceDataTable
        Get
            Return Me.tablecompatibilités_codes_prestation_nature_assurance
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property BDM_Prix() As BDM_PrixDataTable
        Get
            Return Me.tableBDM_Prix
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.Browsable(false),  _
     Global.System.ComponentModel.DesignerSerializationVisibility(Global.System.ComponentModel.DesignerSerializationVisibility.Content)>  _
    Public ReadOnly Property BDM_médicaments_detournables() As BDM_médicaments_detournablesDataTable
        Get
            Return Me.tableBDM_médicaments_detournables
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.BrowsableAttribute(true),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Visible)>  _
    Public Overrides Property SchemaSerializationMode() As Global.System.Data.SchemaSerializationMode
        Get
            Return Me._schemaSerializationMode
        End Get
        Set
            Me._schemaSerializationMode = value
        End Set
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)>  _
    Public Shadows ReadOnly Property Tables() As Global.System.Data.DataTableCollection
        Get
            Return MyBase.Tables
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
     Global.System.ComponentModel.DesignerSerializationVisibilityAttribute(Global.System.ComponentModel.DesignerSerializationVisibility.Hidden)>  _
    Public Shadows ReadOnly Property Relations() As Global.System.Data.DataRelationCollection
        Get
            Return MyBase.Relations
        End Get
    End Property
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Sub InitializeDerivedDataSet()
        Me.BeginInit
        Me.InitClass
        Me.EndInit
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Public Overrides Function Clone() As Global.System.Data.DataSet
        Dim cln As PharmaDataSet = CType(MyBase.Clone,PharmaDataSet)
        cln.InitVars
        cln.SchemaSerializationMode = Me.SchemaSerializationMode
        Return cln
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Function ShouldSerializeTables() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Function ShouldSerializeRelations() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Sub ReadXmlSerializable(ByVal reader As Global.System.Xml.XmlReader)
        If (Me.DetermineSchemaSerializationMode(reader) = Global.System.Data.SchemaSerializationMode.IncludeSchema) Then
            Me.Reset
            Dim ds As Global.System.Data.DataSet = New Global.System.Data.DataSet
            ds.ReadXml(reader)
            If (Not (ds.Tables("Produits")) Is Nothing) Then
                MyBase.Tables.Add(New ProduitsDataTable(ds.Tables("Produits")))
            End If
            If (Not (ds.Tables("Prescripteurs")) Is Nothing) Then
                MyBase.Tables.Add(New PrescripteursDataTable(ds.Tables("Prescripteurs")))
            End If
            If (Not (ds.Tables("Vitale")) Is Nothing) Then
                MyBase.Tables.Add(New VitaleDataTable(ds.Tables("Vitale")))
            End If
            If (Not (ds.Tables("LPP")) Is Nothing) Then
                MyBase.Tables.Add(New LPPDataTable(ds.Tables("LPP")))
            End If
            If (Not (ds.Tables("Factures")) Is Nothing) Then
                MyBase.Tables.Add(New FacturesDataTable(ds.Tables("Factures")))
            End If
            If (Not (ds.Tables("FichiersSV")) Is Nothing) Then
                MyBase.Tables.Add(New FichiersSVDataTable(ds.Tables("FichiersSV")))
            End If
            If (Not (ds.Tables("Actes")) Is Nothing) Then
                MyBase.Tables.Add(New ActesDataTable(ds.Tables("Actes")))
            End If
            If (Not (ds.Tables("SMTP")) Is Nothing) Then
                MyBase.Tables.Add(New SMTPDataTable(ds.Tables("SMTP")))
            End If
            If (Not (ds.Tables("Lots")) Is Nothing) Then
                MyBase.Tables.Add(New LotsDataTable(ds.Tables("Lots")))
            End If
            If (Not (ds.Tables("Facture_DétailCodeCIP")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_DétailCodeCIPDataTable(ds.Tables("Facture_DétailCodeCIP")))
            End If
            If (Not (ds.Tables("Facture_DétailLpp")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_DétailLppDataTable(ds.Tables("Facture_DétailLpp")))
            End If
            If (Not (ds.Tables("Facture_LigneFacture")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_LigneFactureDataTable(ds.Tables("Facture_LigneFacture")))
            End If
            If (Not (ds.Tables("AMC_(Organismes/Contrat_Type)")) Is Nothing) Then
                MyBase.Tables.Add(New _AMC__Organismes_Contrat_Type_DataTable(ds.Tables("AMC_(Organismes/Contrat_Type)")))
            End If
            If (Not (ds.Tables("AMC_Contrat_Type")) Is Nothing) Then
                MyBase.Tables.Add(New AMC_Contrat_TypeDataTable(ds.Tables("AMC_Contrat_Type")))
            End If
            If (Not (ds.Tables("AMC_Organismes")) Is Nothing) Then
                MyBase.Tables.Add(New AMC_OrganismesDataTable(ds.Tables("AMC_Organismes")))
            End If
            If (Not (ds.Tables("CodePrestations")) Is Nothing) Then
                MyBase.Tables.Add(New CodePrestationsDataTable(ds.Tables("CodePrestations")))
            End If
            If (Not (ds.Tables("ARL")) Is Nothing) Then
                MyBase.Tables.Add(New ARLDataTable(ds.Tables("ARL")))
            End If
            If (Not (ds.Tables("AMO")) Is Nothing) Then
                MyBase.Tables.Add(New AMODataTable(ds.Tables("AMO")))
            End If
            If (Not (ds.Tables("Facture_VenteDirecte")) Is Nothing) Then
                MyBase.Tables.Add(New Facture_VenteDirecteDataTable(ds.Tables("Facture_VenteDirecte")))
            End If
            If (Not (ds.Tables("Pop_Allowed_List")) Is Nothing) Then
                MyBase.Tables.Add(New Pop_Allowed_ListDataTable(ds.Tables("Pop_Allowed_List")))
            End If
            If (Not (ds.Tables("Convention_Table_correspondance")) Is Nothing) Then
                MyBase.Tables.Add(New Convention_Table_correspondanceDataTable(ds.Tables("Convention_Table_correspondance")))
            End If
            If (Not (ds.Tables("Convention_Table_Conventions")) Is Nothing) Then
                MyBase.Tables.Add(New Convention_Table_ConventionsDataTable(ds.Tables("Convention_Table_Conventions")))
            End If
            If (Not (ds.Tables("Convention_Table_Regroupements")) Is Nothing) Then
                MyBase.Tables.Add(New Convention_Table_RegroupementsDataTable(ds.Tables("Convention_Table_Regroupements")))
            End If
            If (Not (ds.Tables("Taux/CodeRégime")) Is Nothing) Then
                MyBase.Tables.Add(New _Taux_CodeRégimeDataTable(ds.Tables("Taux/CodeRégime")))
            End If
            If (Not (ds.Tables("Taux/CodeSituation")) Is Nothing) Then
                MyBase.Tables.Add(New _Taux_CodeSituationDataTable(ds.Tables("Taux/CodeSituation")))
            End If
            If (Not (ds.Tables("AR_P")) Is Nothing) Then
                MyBase.Tables.Add(New AR_PDataTable(ds.Tables("AR_P")))
            End If
            If (Not (ds.Tables("Service/Rejet")) Is Nothing) Then
                MyBase.Tables.Add(New _Service_RejetDataTable(ds.Tables("Service/Rejet")))
            End If
            If (Not (ds.Tables("RSP_LIGNE_REJET")) Is Nothing) Then
                MyBase.Tables.Add(New RSP_LIGNE_REJETDataTable(ds.Tables("RSP_LIGNE_REJET")))
            End If
            If (Not (ds.Tables("RSP_Paiements")) Is Nothing) Then
                MyBase.Tables.Add(New RSP_PaiementsDataTable(ds.Tables("RSP_Paiements")))
            End If
            If (Not (ds.Tables("LOI_Demande")) Is Nothing) Then
                MyBase.Tables.Add(New LOI_DemandeDataTable(ds.Tables("LOI_Demande")))
            End If
            If (Not (ds.Tables("SCOR_PJ")) Is Nothing) Then
                MyBase.Tables.Add(New SCOR_PJDataTable(ds.Tables("SCOR_PJ")))
            End If
            If (Not (ds.Tables("SCOR_lots")) Is Nothing) Then
                MyBase.Tables.Add(New SCOR_lotsDataTable(ds.Tables("SCOR_lots")))
            End If
            If (Not (ds.Tables("compatibilités_ codes_prestation_ qualité_bénéficiaire")) Is Nothing) Then
                MyBase.Tables.Add(New compatibilités__codes_prestation__qualité_bénéficiaireDataTable(ds.Tables("compatibilités_ codes_prestation_ qualité_bénéficiaire")))
            End If
            If (Not (ds.Tables("compatibilités_codes_prestation_nature_assurance")) Is Nothing) Then
                MyBase.Tables.Add(New compatibilités_codes_prestation_nature_assuranceDataTable(ds.Tables("compatibilités_codes_prestation_nature_assurance")))
            End If
            If (Not (ds.Tables("BDM_Prix")) Is Nothing) Then
                MyBase.Tables.Add(New BDM_PrixDataTable(ds.Tables("BDM_Prix")))
            End If
            If (Not (ds.Tables("BDM_médicaments_detournables")) Is Nothing) Then
                MyBase.Tables.Add(New BDM_médicaments_detournablesDataTable(ds.Tables("BDM_médicaments_detournables")))
            End If
            Me.DataSetName = ds.DataSetName
            Me.Prefix = ds.Prefix
            Me.Namespace = ds.Namespace
            Me.Locale = ds.Locale
            Me.CaseSensitive = ds.CaseSensitive
            Me.EnforceConstraints = ds.EnforceConstraints
            Me.Merge(ds, false, Global.System.Data.MissingSchemaAction.Add)
            Me.InitVars
        Else
            Me.ReadXml(reader)
            Me.InitVars
        End If
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Protected Overrides Function GetSchemaSerializable() As Global.System.Xml.Schema.XmlSchema
        Dim stream As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
        Me.WriteXmlSchema(New Global.System.Xml.XmlTextWriter(stream, Nothing))
        stream.Position = 0
        Return Global.System.Xml.Schema.XmlSchema.Read(New Global.System.Xml.XmlTextReader(stream), Nothing)
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Friend Overloads Sub InitVars()
        Me.InitVars(true)
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Friend Overloads Sub InitVars(ByVal initTable As Boolean)
        Me.tableProduits = CType(MyBase.Tables("Produits"),ProduitsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableProduits) Is Nothing) Then
                Me.tableProduits.InitVars
            End If
        End If
        Me.tablePrescripteurs = CType(MyBase.Tables("Prescripteurs"),PrescripteursDataTable)
        If (initTable = true) Then
            If (Not (Me.tablePrescripteurs) Is Nothing) Then
                Me.tablePrescripteurs.InitVars
            End If
        End If
        Me.tableVitale = CType(MyBase.Tables("Vitale"),VitaleDataTable)
        If (initTable = true) Then
            If (Not (Me.tableVitale) Is Nothing) Then
                Me.tableVitale.InitVars
            End If
        End If
        Me.tableLPP = CType(MyBase.Tables("LPP"),LPPDataTable)
        If (initTable = true) Then
            If (Not (Me.tableLPP) Is Nothing) Then
                Me.tableLPP.InitVars
            End If
        End If
        Me.tableFactures = CType(MyBase.Tables("Factures"),FacturesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFactures) Is Nothing) Then
                Me.tableFactures.InitVars
            End If
        End If
        Me.tableFichiersSV = CType(MyBase.Tables("FichiersSV"),FichiersSVDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFichiersSV) Is Nothing) Then
                Me.tableFichiersSV.InitVars
            End If
        End If
        Me.tableActes = CType(MyBase.Tables("Actes"),ActesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableActes) Is Nothing) Then
                Me.tableActes.InitVars
            End If
        End If
        Me.tableSMTP = CType(MyBase.Tables("SMTP"),SMTPDataTable)
        If (initTable = true) Then
            If (Not (Me.tableSMTP) Is Nothing) Then
                Me.tableSMTP.InitVars
            End If
        End If
        Me.tableLots = CType(MyBase.Tables("Lots"),LotsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableLots) Is Nothing) Then
                Me.tableLots.InitVars
            End If
        End If
        Me.tableFacture_DétailCodeCIP = CType(MyBase.Tables("Facture_DétailCodeCIP"),Facture_DétailCodeCIPDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFacture_DétailCodeCIP) Is Nothing) Then
                Me.tableFacture_DétailCodeCIP.InitVars
            End If
        End If
        Me.tableFacture_DétailLpp = CType(MyBase.Tables("Facture_DétailLpp"),Facture_DétailLppDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFacture_DétailLpp) Is Nothing) Then
                Me.tableFacture_DétailLpp.InitVars
            End If
        End If
        Me.tableFacture_LigneFacture = CType(MyBase.Tables("Facture_LigneFacture"),Facture_LigneFactureDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFacture_LigneFacture) Is Nothing) Then
                Me.tableFacture_LigneFacture.InitVars
            End If
        End If
        Me._tableAMC__Organismes_Contrat_Type_ = CType(MyBase.Tables("AMC_(Organismes/Contrat_Type)"),_AMC__Organismes_Contrat_Type_DataTable)
        If (initTable = true) Then
            If (Not (Me._tableAMC__Organismes_Contrat_Type_) Is Nothing) Then
                Me._tableAMC__Organismes_Contrat_Type_.InitVars
            End If
        End If
        Me.tableAMC_Contrat_Type = CType(MyBase.Tables("AMC_Contrat_Type"),AMC_Contrat_TypeDataTable)
        If (initTable = true) Then
            If (Not (Me.tableAMC_Contrat_Type) Is Nothing) Then
                Me.tableAMC_Contrat_Type.InitVars
            End If
        End If
        Me.tableAMC_Organismes = CType(MyBase.Tables("AMC_Organismes"),AMC_OrganismesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableAMC_Organismes) Is Nothing) Then
                Me.tableAMC_Organismes.InitVars
            End If
        End If
        Me.tableCodePrestations = CType(MyBase.Tables("CodePrestations"),CodePrestationsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableCodePrestations) Is Nothing) Then
                Me.tableCodePrestations.InitVars
            End If
        End If
        Me.tableARL = CType(MyBase.Tables("ARL"),ARLDataTable)
        If (initTable = true) Then
            If (Not (Me.tableARL) Is Nothing) Then
                Me.tableARL.InitVars
            End If
        End If
        Me.tableAMO = CType(MyBase.Tables("AMO"),AMODataTable)
        If (initTable = true) Then
            If (Not (Me.tableAMO) Is Nothing) Then
                Me.tableAMO.InitVars
            End If
        End If
        Me.tableFacture_VenteDirecte = CType(MyBase.Tables("Facture_VenteDirecte"),Facture_VenteDirecteDataTable)
        If (initTable = true) Then
            If (Not (Me.tableFacture_VenteDirecte) Is Nothing) Then
                Me.tableFacture_VenteDirecte.InitVars
            End If
        End If
        Me.tablePop_Allowed_List = CType(MyBase.Tables("Pop_Allowed_List"),Pop_Allowed_ListDataTable)
        If (initTable = true) Then
            If (Not (Me.tablePop_Allowed_List) Is Nothing) Then
                Me.tablePop_Allowed_List.InitVars
            End If
        End If
        Me.tableConvention_Table_correspondance = CType(MyBase.Tables("Convention_Table_correspondance"),Convention_Table_correspondanceDataTable)
        If (initTable = true) Then
            If (Not (Me.tableConvention_Table_correspondance) Is Nothing) Then
                Me.tableConvention_Table_correspondance.InitVars
            End If
        End If
        Me.tableConvention_Table_Conventions = CType(MyBase.Tables("Convention_Table_Conventions"),Convention_Table_ConventionsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableConvention_Table_Conventions) Is Nothing) Then
                Me.tableConvention_Table_Conventions.InitVars
            End If
        End If
        Me.tableConvention_Table_Regroupements = CType(MyBase.Tables("Convention_Table_Regroupements"),Convention_Table_RegroupementsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableConvention_Table_Regroupements) Is Nothing) Then
                Me.tableConvention_Table_Regroupements.InitVars
            End If
        End If
        Me._tableTaux_CodeRégime = CType(MyBase.Tables("Taux/CodeRégime"),_Taux_CodeRégimeDataTable)
        If (initTable = true) Then
            If (Not (Me._tableTaux_CodeRégime) Is Nothing) Then
                Me._tableTaux_CodeRégime.InitVars
            End If
        End If
        Me._tableTaux_CodeSituation = CType(MyBase.Tables("Taux/CodeSituation"),_Taux_CodeSituationDataTable)
        If (initTable = true) Then
            If (Not (Me._tableTaux_CodeSituation) Is Nothing) Then
                Me._tableTaux_CodeSituation.InitVars
            End If
        End If
        Me.tableAR_P = CType(MyBase.Tables("AR_P"),AR_PDataTable)
        If (initTable = true) Then
            If (Not (Me.tableAR_P) Is Nothing) Then
                Me.tableAR_P.InitVars
            End If
        End If
        Me._tableService_Rejet = CType(MyBase.Tables("Service/Rejet"),_Service_RejetDataTable)
        If (initTable = true) Then
            If (Not (Me._tableService_Rejet) Is Nothing) Then
                Me._tableService_Rejet.InitVars
            End If
        End If
        Me.tableRSP_LIGNE_REJET = CType(MyBase.Tables("RSP_LIGNE_REJET"),RSP_LIGNE_REJETDataTable)
        If (initTable = true) Then
            If (Not (Me.tableRSP_LIGNE_REJET) Is Nothing) Then
                Me.tableRSP_LIGNE_REJET.InitVars
            End If
        End If
        Me.tableRSP_Paiements = CType(MyBase.Tables("RSP_Paiements"),RSP_PaiementsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableRSP_Paiements) Is Nothing) Then
                Me.tableRSP_Paiements.InitVars
            End If
        End If
        Me.tableLOI_Demande = CType(MyBase.Tables("LOI_Demande"),LOI_DemandeDataTable)
        If (initTable = true) Then
            If (Not (Me.tableLOI_Demande) Is Nothing) Then
                Me.tableLOI_Demande.InitVars
            End If
        End If
        Me.tableSCOR_PJ = CType(MyBase.Tables("SCOR_PJ"),SCOR_PJDataTable)
        If (initTable = true) Then
            If (Not (Me.tableSCOR_PJ) Is Nothing) Then
                Me.tableSCOR_PJ.InitVars
            End If
        End If
        Me.tableSCOR_lots = CType(MyBase.Tables("SCOR_lots"),SCOR_lotsDataTable)
        If (initTable = true) Then
            If (Not (Me.tableSCOR_lots) Is Nothing) Then
                Me.tableSCOR_lots.InitVars
            End If
        End If
        Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire = CType(MyBase.Tables("compatibilités_ codes_prestation_ qualité_bénéficiaire"),compatibilités__codes_prestation__qualité_bénéficiaireDataTable)
        If (initTable = true) Then
            If (Not (Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire) Is Nothing) Then
                Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.InitVars
            End If
        End If
        Me.tablecompatibilités_codes_prestation_nature_assurance = CType(MyBase.Tables("compatibilités_codes_prestation_nature_assurance"),compatibilités_codes_prestation_nature_assuranceDataTable)
        If (initTable = true) Then
            If (Not (Me.tablecompatibilités_codes_prestation_nature_assurance) Is Nothing) Then
                Me.tablecompatibilités_codes_prestation_nature_assurance.InitVars
            End If
        End If
        Me.tableBDM_Prix = CType(MyBase.Tables("BDM_Prix"),BDM_PrixDataTable)
        If (initTable = true) Then
            If (Not (Me.tableBDM_Prix) Is Nothing) Then
                Me.tableBDM_Prix.InitVars
            End If
        End If
        Me.tableBDM_médicaments_detournables = CType(MyBase.Tables("BDM_médicaments_detournables"),BDM_médicaments_detournablesDataTable)
        If (initTable = true) Then
            If (Not (Me.tableBDM_médicaments_detournables) Is Nothing) Then
                Me.tableBDM_médicaments_detournables.InitVars
            End If
        End If
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Sub InitClass()
        Me.DataSetName = "PharmaDataSet"
        Me.Prefix = ""
        Me.Namespace = "http://tempuri.org/PharmaDataSet.xsd"
        Me.EnforceConstraints = true
        Me.SchemaSerializationMode = Global.System.Data.SchemaSerializationMode.IncludeSchema
        Me.tableProduits = New ProduitsDataTable
        MyBase.Tables.Add(Me.tableProduits)
        Me.tablePrescripteurs = New PrescripteursDataTable
        MyBase.Tables.Add(Me.tablePrescripteurs)
        Me.tableVitale = New VitaleDataTable
        MyBase.Tables.Add(Me.tableVitale)
        Me.tableLPP = New LPPDataTable
        MyBase.Tables.Add(Me.tableLPP)
        Me.tableFactures = New FacturesDataTable
        MyBase.Tables.Add(Me.tableFactures)
        Me.tableFichiersSV = New FichiersSVDataTable
        MyBase.Tables.Add(Me.tableFichiersSV)
        Me.tableActes = New ActesDataTable
        MyBase.Tables.Add(Me.tableActes)
        Me.tableSMTP = New SMTPDataTable
        MyBase.Tables.Add(Me.tableSMTP)
        Me.tableLots = New LotsDataTable
        MyBase.Tables.Add(Me.tableLots)
        Me.tableFacture_DétailCodeCIP = New Facture_DétailCodeCIPDataTable
        MyBase.Tables.Add(Me.tableFacture_DétailCodeCIP)
        Me.tableFacture_DétailLpp = New Facture_DétailLppDataTable
        MyBase.Tables.Add(Me.tableFacture_DétailLpp)
        Me.tableFacture_LigneFacture = New Facture_LigneFactureDataTable
        MyBase.Tables.Add(Me.tableFacture_LigneFacture)
        Me._tableAMC__Organismes_Contrat_Type_ = New _AMC__Organismes_Contrat_Type_DataTable
        MyBase.Tables.Add(Me._tableAMC__Organismes_Contrat_Type_)
        Me.tableAMC_Contrat_Type = New AMC_Contrat_TypeDataTable
        MyBase.Tables.Add(Me.tableAMC_Contrat_Type)
        Me.tableAMC_Organismes = New AMC_OrganismesDataTable
        MyBase.Tables.Add(Me.tableAMC_Organismes)
        Me.tableCodePrestations = New CodePrestationsDataTable
        MyBase.Tables.Add(Me.tableCodePrestations)
        Me.tableARL = New ARLDataTable
        MyBase.Tables.Add(Me.tableARL)
        Me.tableAMO = New AMODataTable
        MyBase.Tables.Add(Me.tableAMO)
        Me.tableFacture_VenteDirecte = New Facture_VenteDirecteDataTable
        MyBase.Tables.Add(Me.tableFacture_VenteDirecte)
        Me.tablePop_Allowed_List = New Pop_Allowed_ListDataTable
        MyBase.Tables.Add(Me.tablePop_Allowed_List)
        Me.tableConvention_Table_correspondance = New Convention_Table_correspondanceDataTable
        MyBase.Tables.Add(Me.tableConvention_Table_correspondance)
        Me.tableConvention_Table_Conventions = New Convention_Table_ConventionsDataTable
        MyBase.Tables.Add(Me.tableConvention_Table_Conventions)
        Me.tableConvention_Table_Regroupements = New Convention_Table_RegroupementsDataTable
        MyBase.Tables.Add(Me.tableConvention_Table_Regroupements)
        Me._tableTaux_CodeRégime = New _Taux_CodeRégimeDataTable
        MyBase.Tables.Add(Me._tableTaux_CodeRégime)
        Me._tableTaux_CodeSituation = New _Taux_CodeSituationDataTable
        MyBase.Tables.Add(Me._tableTaux_CodeSituation)
        Me.tableAR_P = New AR_PDataTable
        MyBase.Tables.Add(Me.tableAR_P)
        Me._tableService_Rejet = New _Service_RejetDataTable
        MyBase.Tables.Add(Me._tableService_Rejet)
        Me.tableRSP_LIGNE_REJET = New RSP_LIGNE_REJETDataTable
        MyBase.Tables.Add(Me.tableRSP_LIGNE_REJET)
        Me.tableRSP_Paiements = New RSP_PaiementsDataTable
        MyBase.Tables.Add(Me.tableRSP_Paiements)
        Me.tableLOI_Demande = New LOI_DemandeDataTable
        MyBase.Tables.Add(Me.tableLOI_Demande)
        Me.tableSCOR_PJ = New SCOR_PJDataTable
        MyBase.Tables.Add(Me.tableSCOR_PJ)
        Me.tableSCOR_lots = New SCOR_lotsDataTable
        MyBase.Tables.Add(Me.tableSCOR_lots)
        Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire = New compatibilités__codes_prestation__qualité_bénéficiaireDataTable
        MyBase.Tables.Add(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire)
        Me.tablecompatibilités_codes_prestation_nature_assurance = New compatibilités_codes_prestation_nature_assuranceDataTable
        MyBase.Tables.Add(Me.tablecompatibilités_codes_prestation_nature_assurance)
        Me.tableBDM_Prix = New BDM_PrixDataTable
        MyBase.Tables.Add(Me.tableBDM_Prix)
        Me.tableBDM_médicaments_detournables = New BDM_médicaments_detournablesDataTable
        MyBase.Tables.Add(Me.tableBDM_médicaments_detournables)
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeProduits() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializePrescripteurs() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeVitale() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeLPP() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFactures() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFichiersSV() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeActes() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeSMTP() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeLots() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFacture_DétailCodeCIP() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFacture_DétailLpp() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFacture_LigneFacture() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerialize_AMC__Organismes_Contrat_Type_() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeAMC_Contrat_Type() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeAMC_Organismes() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeCodePrestations() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeARL() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeAMO() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeFacture_VenteDirecte() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializePop_Allowed_List() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeConvention_Table_correspondance() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeConvention_Table_Conventions() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeConvention_Table_Regroupements() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerialize_Taux_CodeRégime() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerialize_Taux_CodeSituation() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeAR_P() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerialize_Service_Rejet() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeRSP_LIGNE_REJET() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeRSP_Paiements() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeLOI_Demande() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeSCOR_PJ() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeSCOR_lots() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializecompatibilités__codes_prestation__qualité_bénéficiaire() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializecompatibilités_codes_prestation_nature_assurance() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeBDM_Prix() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Function ShouldSerializeBDM_médicaments_detournables() As Boolean
        Return false
    End Function
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Private Sub SchemaChanged(ByVal sender As Object, ByVal e As Global.System.ComponentModel.CollectionChangeEventArgs)
        If (e.Action = Global.System.ComponentModel.CollectionChangeAction.Remove) Then
            Me.InitVars
        End If
    End Sub
    
    <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
    Public Shared Function GetTypedDataSetSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
        Dim ds As PharmaDataSet = New PharmaDataSet
        Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
        Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
        Dim any As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
        any.Namespace = ds.Namespace
        sequence.Items.Add(any)
        type.Particle = sequence
        Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
        If xs.Contains(dsSchema.TargetNamespace) Then
            Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
            Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
            Try 
                Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                dsSchema.Write(s1)
                Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                Do While schemas.MoveNext
                    schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                    s2.SetLength(0)
                    schema.Write(s2)
                    If (s1.Length = s2.Length) Then
                        s1.Position = 0
                        s2.Position = 0
                        
                        Do While ((s1.Position <> s1.Length)  _
                                    AndAlso (s1.ReadByte = s2.ReadByte))
                            
                            
                        Loop
                        If (s1.Position = s1.Length) Then
                            Return type
                        End If
                    End If
                    
                Loop
            Finally
                If (Not (s1) Is Nothing) Then
                    s1.Close
                End If
                If (Not (s2) Is Nothing) Then
                    s2.Close
                End If
            End Try
        End If
        xs.Add(dsSchema)
        Return type
    End Function
    
    Public Delegate Sub ProduitsRowChangeEventHandler(ByVal sender As Object, ByVal e As ProduitsRowChangeEvent)
    
    Public Delegate Sub PrescripteursRowChangeEventHandler(ByVal sender As Object, ByVal e As PrescripteursRowChangeEvent)
    
    Public Delegate Sub VitaleRowChangeEventHandler(ByVal sender As Object, ByVal e As VitaleRowChangeEvent)
    
    Public Delegate Sub LPPRowChangeEventHandler(ByVal sender As Object, ByVal e As LPPRowChangeEvent)
    
    Public Delegate Sub FacturesRowChangeEventHandler(ByVal sender As Object, ByVal e As FacturesRowChangeEvent)
    
    Public Delegate Sub FichiersSVRowChangeEventHandler(ByVal sender As Object, ByVal e As FichiersSVRowChangeEvent)
    
    Public Delegate Sub ActesRowChangeEventHandler(ByVal sender As Object, ByVal e As ActesRowChangeEvent)
    
    Public Delegate Sub SMTPRowChangeEventHandler(ByVal sender As Object, ByVal e As SMTPRowChangeEvent)
    
    Public Delegate Sub LotsRowChangeEventHandler(ByVal sender As Object, ByVal e As LotsRowChangeEvent)
    
    Public Delegate Sub Facture_DétailCodeCIPRowChangeEventHandler(ByVal sender As Object, ByVal e As Facture_DétailCodeCIPRowChangeEvent)
    
    Public Delegate Sub Facture_DétailLppRowChangeEventHandler(ByVal sender As Object, ByVal e As Facture_DétailLppRowChangeEvent)
    
    Public Delegate Sub Facture_LigneFactureRowChangeEventHandler(ByVal sender As Object, ByVal e As Facture_LigneFactureRowChangeEvent)
    
    Public Delegate Sub _AMC__Organismes_Contrat_Type_RowChangeEventHandler(ByVal sender As Object, ByVal e As _AMC__Organismes_Contrat_Type_RowChangeEvent)
    
    Public Delegate Sub AMC_Contrat_TypeRowChangeEventHandler(ByVal sender As Object, ByVal e As AMC_Contrat_TypeRowChangeEvent)
    
    Public Delegate Sub AMC_OrganismesRowChangeEventHandler(ByVal sender As Object, ByVal e As AMC_OrganismesRowChangeEvent)
    
    Public Delegate Sub CodePrestationsRowChangeEventHandler(ByVal sender As Object, ByVal e As CodePrestationsRowChangeEvent)
    
    Public Delegate Sub ARLRowChangeEventHandler(ByVal sender As Object, ByVal e As ARLRowChangeEvent)
    
    Public Delegate Sub AMORowChangeEventHandler(ByVal sender As Object, ByVal e As AMORowChangeEvent)
    
    Public Delegate Sub Facture_VenteDirecteRowChangeEventHandler(ByVal sender As Object, ByVal e As Facture_VenteDirecteRowChangeEvent)
    
    Public Delegate Sub Pop_Allowed_ListRowChangeEventHandler(ByVal sender As Object, ByVal e As Pop_Allowed_ListRowChangeEvent)
    
    Public Delegate Sub Convention_Table_correspondanceRowChangeEventHandler(ByVal sender As Object, ByVal e As Convention_Table_correspondanceRowChangeEvent)
    
    Public Delegate Sub Convention_Table_ConventionsRowChangeEventHandler(ByVal sender As Object, ByVal e As Convention_Table_ConventionsRowChangeEvent)
    
    Public Delegate Sub Convention_Table_RegroupementsRowChangeEventHandler(ByVal sender As Object, ByVal e As Convention_Table_RegroupementsRowChangeEvent)
    
    Public Delegate Sub _Taux_CodeRégimeRowChangeEventHandler(ByVal sender As Object, ByVal e As _Taux_CodeRégimeRowChangeEvent)
    
    Public Delegate Sub _Taux_CodeSituationRowChangeEventHandler(ByVal sender As Object, ByVal e As _Taux_CodeSituationRowChangeEvent)
    
    Public Delegate Sub AR_PRowChangeEventHandler(ByVal sender As Object, ByVal e As AR_PRowChangeEvent)
    
    Public Delegate Sub _Service_RejetRowChangeEventHandler(ByVal sender As Object, ByVal e As _Service_RejetRowChangeEvent)
    
    Public Delegate Sub RSP_LIGNE_REJETRowChangeEventHandler(ByVal sender As Object, ByVal e As RSP_LIGNE_REJETRowChangeEvent)
    
    Public Delegate Sub RSP_PaiementsRowChangeEventHandler(ByVal sender As Object, ByVal e As RSP_PaiementsRowChangeEvent)
    
    Public Delegate Sub LOI_DemandeRowChangeEventHandler(ByVal sender As Object, ByVal e As LOI_DemandeRowChangeEvent)
    
    Public Delegate Sub SCOR_PJRowChangeEventHandler(ByVal sender As Object, ByVal e As SCOR_PJRowChangeEvent)
    
    Public Delegate Sub SCOR_lotsRowChangeEventHandler(ByVal sender As Object, ByVal e As SCOR_lotsRowChangeEvent)
    
    Public Delegate Sub compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEventHandler(ByVal sender As Object, ByVal e As compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEvent)
    
    Public Delegate Sub compatibilités_codes_prestation_nature_assuranceRowChangeEventHandler(ByVal sender As Object, ByVal e As compatibilités_codes_prestation_nature_assuranceRowChangeEvent)
    
    Public Delegate Sub BDM_PrixRowChangeEventHandler(ByVal sender As Object, ByVal e As BDM_PrixRowChangeEvent)
    
    Public Delegate Sub BDM_médicaments_detournablesRowChangeEventHandler(ByVal sender As Object, ByVal e As BDM_médicaments_detournablesRowChangeEvent)
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class ProduitsDataTable
        Inherits Global.System.Data.TypedTableBase(Of ProduitsRow)
        
        Private columnCIP As Global.System.Data.DataColumn
        
        Private columnEAN13 As Global.System.Data.DataColumn
        
        Private columnCAB As Global.System.Data.DataColumn
        
        Private columnDesignation As Global.System.Data.DataColumn
        
        Private columnPrixachatRemiseHT As Global.System.Data.DataColumn
        
        Private columnPrixventeTTC As Global.System.Data.DataColumn
        
        Private columnPrixachatHT As Global.System.Data.DataColumn
        
        Private columnTVA As Global.System.Data.DataColumn
        
        Private columnStock As Global.System.Data.DataColumn
        
        Private columnMarque As Global.System.Data.DataColumn
        
        Private columnRepartiteurattitre As Global.System.Data.DataColumn
        
        Private columnLPP As Global.System.Data.DataColumn
        
        Private columnColisage As Global.System.Data.DataColumn
        
        Private columnCommentaireGestion As Global.System.Data.DataColumn
        
        Private columnContenance As Global.System.Data.DataColumn
        
        Private columnUnitecontenance As Global.System.Data.DataColumn
        
        Private columnConditionnement As Global.System.Data.DataColumn
        
        Private columnDateDernièrevente As Global.System.Data.DataColumn
        
        Private columnGestiondeStock As Global.System.Data.DataColumn
        
        Private columnZoneGeographique As Global.System.Data.DataColumn
        
        Private columnMargetaux As Global.System.Data.DataColumn
        
        Private columnMargecoeffsurPAremise As Global.System.Data.DataColumn
        
        Private columnAssimilestupefiant As Global.System.Data.DataColumn
        
        Private columnfrigo As Global.System.Data.DataColumn
        
        Private columnMedicamentdexception As Global.System.Data.DataColumn
        
        Private columnVeterinaire As Global.System.Data.DataColumn
        
        Private columnPeremptioncourte As Global.System.Data.DataColumn
        
        Private columnPrestation As Global.System.Data.DataColumn
        
        Private columnListe As Global.System.Data.DataColumn
        
        Private columnDus As Global.System.Data.DataColumn
        
        Private columnType As Global.System.Data.DataColumn
        
        Private columnTFRtype As Global.System.Data.DataColumn
        
        Private columnTFRprix As Global.System.Data.DataColumn
        
        Private columnLPP_Type_Service As Global.System.Data.DataColumn
        
        Private columnLPP_Quantité As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Produits"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CIPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCIP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EAN13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnEAN13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CABColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCAB
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DesignationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDesignation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrixachatRemiseHTColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrixachatRemiseHT
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrixventeTTCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrixventeTTC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrixachatHTColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrixachatHT
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TVAColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTVA
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property StockColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnStock
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MarqueColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMarque
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RepartiteurattitreColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRepartiteurattitre
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LPPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLPP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ColisageColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnColisage
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CommentaireGestionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCommentaireGestion
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ContenanceColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnContenance
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property UnitecontenanceColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnUnitecontenance
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ConditionnementColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnConditionnement
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateDernièreventeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateDernièrevente
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property GestiondeStockColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnGestiondeStock
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ZoneGeographiqueColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnZoneGeographique
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MargetauxColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMargetaux
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MargecoeffsurPAremiseColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMargecoeffsurPAremise
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AssimilestupefiantColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAssimilestupefiant
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property frigoColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnfrigo
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MedicamentdexceptionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMedicamentdexception
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property VeterinaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnVeterinaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PeremptioncourteColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPeremptioncourte
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrestationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrestation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ListeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnListe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DusColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDus
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TypeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnType
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TFRtypeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTFRtype
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TFRprixColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTFRprix
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LPP_Type_ServiceColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLPP_Type_Service
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LPP_QuantitéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLPP_Quantité
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As ProduitsRow
            Get
                Return CType(Me.Rows(index),ProduitsRow)
            End Get
        End Property
        
        Public Event ProduitsRowChanging As ProduitsRowChangeEventHandler
        
        Public Event ProduitsRowChanged As ProduitsRowChangeEventHandler
        
        Public Event ProduitsRowDeleting As ProduitsRowChangeEventHandler
        
        Public Event ProduitsRowDeleted As ProduitsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddProduitsRow(ByVal row As ProduitsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddProduitsRow( _
                    ByVal CIP As String,  _
                    ByVal EAN13 As String,  _
                    ByVal CAB As String,  _
                    ByVal Designation As String,  _
                    ByVal PrixachatRemiseHT As String,  _
                    ByVal PrixventeTTC As String,  _
                    ByVal PrixachatHT As String,  _
                    ByVal TVA As String,  _
                    ByVal Stock As String,  _
                    ByVal Marque As String,  _
                    ByVal Repartiteurattitre As String,  _
                    ByVal LPP As String,  _
                    ByVal Colisage As String,  _
                    ByVal CommentaireGestion As String,  _
                    ByVal Contenance As String,  _
                    ByVal Unitecontenance As String,  _
                    ByVal Conditionnement As String,  _
                    ByVal DateDernièrevente As String,  _
                    ByVal GestiondeStock As String,  _
                    ByVal ZoneGeographique As String,  _
                    ByVal Margetaux As String,  _
                    ByVal MargecoeffsurPAremise As String,  _
                    ByVal Assimilestupefiant As String,  _
                    ByVal frigo As String,  _
                    ByVal Medicamentdexception As String,  _
                    ByVal Veterinaire As String,  _
                    ByVal Peremptioncourte As String,  _
                    ByVal Prestation As String,  _
                    ByVal Liste As String,  _
                    ByVal Dus As String,  _
                    ByVal Type As String,  _
                    ByVal TFRtype As String,  _
                    ByVal TFRprix As String,  _
                    ByVal LPP_Type_Service As String,  _
                    ByVal LPP_Quantité As Decimal) As ProduitsRow
            Dim rowProduitsRow As ProduitsRow = CType(Me.NewRow,ProduitsRow)
            Dim columnValuesArray() As Object = New Object() {CIP, EAN13, CAB, Designation, PrixachatRemiseHT, PrixventeTTC, PrixachatHT, TVA, Stock, Marque, Repartiteurattitre, LPP, Colisage, CommentaireGestion, Contenance, Unitecontenance, Conditionnement, DateDernièrevente, GestiondeStock, ZoneGeographique, Margetaux, MargecoeffsurPAremise, Assimilestupefiant, frigo, Medicamentdexception, Veterinaire, Peremptioncourte, Prestation, Liste, Dus, Type, TFRtype, TFRprix, LPP_Type_Service, LPP_Quantité}
            rowProduitsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowProduitsRow)
            Return rowProduitsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As ProduitsDataTable = CType(MyBase.Clone,ProduitsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New ProduitsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCIP = MyBase.Columns("CIP")
            Me.columnEAN13 = MyBase.Columns("EAN13")
            Me.columnCAB = MyBase.Columns("CAB")
            Me.columnDesignation = MyBase.Columns("Designation")
            Me.columnPrixachatRemiseHT = MyBase.Columns("PrixachatRemiseHT")
            Me.columnPrixventeTTC = MyBase.Columns("PrixventeTTC")
            Me.columnPrixachatHT = MyBase.Columns("PrixachatHT")
            Me.columnTVA = MyBase.Columns("TVA")
            Me.columnStock = MyBase.Columns("Stock")
            Me.columnMarque = MyBase.Columns("Marque")
            Me.columnRepartiteurattitre = MyBase.Columns("Repartiteurattitre")
            Me.columnLPP = MyBase.Columns("LPP")
            Me.columnColisage = MyBase.Columns("Colisage")
            Me.columnCommentaireGestion = MyBase.Columns("CommentaireGestion")
            Me.columnContenance = MyBase.Columns("Contenance")
            Me.columnUnitecontenance = MyBase.Columns("Unitecontenance")
            Me.columnConditionnement = MyBase.Columns("Conditionnement")
            Me.columnDateDernièrevente = MyBase.Columns("DateDernièrevente")
            Me.columnGestiondeStock = MyBase.Columns("GestiondeStock")
            Me.columnZoneGeographique = MyBase.Columns("ZoneGeographique")
            Me.columnMargetaux = MyBase.Columns("Margetaux")
            Me.columnMargecoeffsurPAremise = MyBase.Columns("MargecoeffsurPAremise")
            Me.columnAssimilestupefiant = MyBase.Columns("Assimilestupefiant")
            Me.columnfrigo = MyBase.Columns("frigo")
            Me.columnMedicamentdexception = MyBase.Columns("Medicamentdexception")
            Me.columnVeterinaire = MyBase.Columns("Veterinaire")
            Me.columnPeremptioncourte = MyBase.Columns("Peremptioncourte")
            Me.columnPrestation = MyBase.Columns("Prestation")
            Me.columnListe = MyBase.Columns("Liste")
            Me.columnDus = MyBase.Columns("Dus")
            Me.columnType = MyBase.Columns("Type")
            Me.columnTFRtype = MyBase.Columns("TFRtype")
            Me.columnTFRprix = MyBase.Columns("TFRprix")
            Me.columnLPP_Type_Service = MyBase.Columns("LPP_Type_Service")
            Me.columnLPP_Quantité = MyBase.Columns("LPP_Quantité")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCIP = New Global.System.Data.DataColumn("CIP", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCIP)
            Me.columnEAN13 = New Global.System.Data.DataColumn("EAN13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEAN13)
            Me.columnCAB = New Global.System.Data.DataColumn("CAB", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCAB)
            Me.columnDesignation = New Global.System.Data.DataColumn("Designation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDesignation)
            Me.columnPrixachatRemiseHT = New Global.System.Data.DataColumn("PrixachatRemiseHT", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrixachatRemiseHT)
            Me.columnPrixventeTTC = New Global.System.Data.DataColumn("PrixventeTTC", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrixventeTTC)
            Me.columnPrixachatHT = New Global.System.Data.DataColumn("PrixachatHT", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrixachatHT)
            Me.columnTVA = New Global.System.Data.DataColumn("TVA", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTVA)
            Me.columnStock = New Global.System.Data.DataColumn("Stock", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnStock)
            Me.columnMarque = New Global.System.Data.DataColumn("Marque", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMarque)
            Me.columnRepartiteurattitre = New Global.System.Data.DataColumn("Repartiteurattitre", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRepartiteurattitre)
            Me.columnLPP = New Global.System.Data.DataColumn("LPP", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLPP)
            Me.columnColisage = New Global.System.Data.DataColumn("Colisage", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnColisage)
            Me.columnCommentaireGestion = New Global.System.Data.DataColumn("CommentaireGestion", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCommentaireGestion)
            Me.columnContenance = New Global.System.Data.DataColumn("Contenance", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnContenance)
            Me.columnUnitecontenance = New Global.System.Data.DataColumn("Unitecontenance", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnUnitecontenance)
            Me.columnConditionnement = New Global.System.Data.DataColumn("Conditionnement", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnConditionnement)
            Me.columnDateDernièrevente = New Global.System.Data.DataColumn("DateDernièrevente", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateDernièrevente)
            Me.columnGestiondeStock = New Global.System.Data.DataColumn("GestiondeStock", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnGestiondeStock)
            Me.columnZoneGeographique = New Global.System.Data.DataColumn("ZoneGeographique", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnZoneGeographique)
            Me.columnMargetaux = New Global.System.Data.DataColumn("Margetaux", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMargetaux)
            Me.columnMargecoeffsurPAremise = New Global.System.Data.DataColumn("MargecoeffsurPAremise", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMargecoeffsurPAremise)
            Me.columnAssimilestupefiant = New Global.System.Data.DataColumn("Assimilestupefiant", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAssimilestupefiant)
            Me.columnfrigo = New Global.System.Data.DataColumn("frigo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnfrigo)
            Me.columnMedicamentdexception = New Global.System.Data.DataColumn("Medicamentdexception", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMedicamentdexception)
            Me.columnVeterinaire = New Global.System.Data.DataColumn("Veterinaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnVeterinaire)
            Me.columnPeremptioncourte = New Global.System.Data.DataColumn("Peremptioncourte", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPeremptioncourte)
            Me.columnPrestation = New Global.System.Data.DataColumn("Prestation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrestation)
            Me.columnListe = New Global.System.Data.DataColumn("Liste", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnListe)
            Me.columnDus = New Global.System.Data.DataColumn("Dus", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDus)
            Me.columnType = New Global.System.Data.DataColumn("Type", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnType)
            Me.columnTFRtype = New Global.System.Data.DataColumn("TFRtype", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTFRtype)
            Me.columnTFRprix = New Global.System.Data.DataColumn("TFRprix", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTFRprix)
            Me.columnLPP_Type_Service = New Global.System.Data.DataColumn("LPP_Type_Service", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLPP_Type_Service)
            Me.columnLPP_Quantité = New Global.System.Data.DataColumn("LPP_Quantité", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLPP_Quantité)
            Me.columnCIP.MaxLength = 50
            Me.columnEAN13.MaxLength = 50
            Me.columnCAB.MaxLength = 50
            Me.columnDesignation.MaxLength = 4000
            Me.columnPrixachatRemiseHT.MaxLength = 50
            Me.columnPrixventeTTC.MaxLength = 50
            Me.columnPrixachatHT.MaxLength = 50
            Me.columnTVA.MaxLength = 50
            Me.columnStock.MaxLength = 50
            Me.columnMarque.MaxLength = 50
            Me.columnRepartiteurattitre.MaxLength = 50
            Me.columnLPP.MaxLength = 50
            Me.columnColisage.MaxLength = 50
            Me.columnCommentaireGestion.MaxLength = 50
            Me.columnContenance.MaxLength = 50
            Me.columnUnitecontenance.MaxLength = 50
            Me.columnConditionnement.MaxLength = 50
            Me.columnDateDernièrevente.MaxLength = 50
            Me.columnGestiondeStock.MaxLength = 50
            Me.columnZoneGeographique.MaxLength = 50
            Me.columnMargetaux.MaxLength = 50
            Me.columnMargecoeffsurPAremise.MaxLength = 50
            Me.columnAssimilestupefiant.MaxLength = 50
            Me.columnfrigo.MaxLength = 50
            Me.columnMedicamentdexception.MaxLength = 50
            Me.columnVeterinaire.MaxLength = 50
            Me.columnPeremptioncourte.MaxLength = 50
            Me.columnPrestation.MaxLength = 50
            Me.columnListe.MaxLength = 50
            Me.columnDus.MaxLength = 50
            Me.columnType.MaxLength = 50
            Me.columnTFRtype.MaxLength = 50
            Me.columnTFRprix.MaxLength = 50
            Me.columnLPP_Type_Service.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewProduitsRow() As ProduitsRow
            Return CType(Me.NewRow,ProduitsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New ProduitsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(ProduitsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.ProduitsRowChangedEvent) Is Nothing) Then
                RaiseEvent ProduitsRowChanged(Me, New ProduitsRowChangeEvent(CType(e.Row,ProduitsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.ProduitsRowChangingEvent) Is Nothing) Then
                RaiseEvent ProduitsRowChanging(Me, New ProduitsRowChangeEvent(CType(e.Row,ProduitsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.ProduitsRowDeletedEvent) Is Nothing) Then
                RaiseEvent ProduitsRowDeleted(Me, New ProduitsRowChangeEvent(CType(e.Row,ProduitsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.ProduitsRowDeletingEvent) Is Nothing) Then
                RaiseEvent ProduitsRowDeleting(Me, New ProduitsRowChangeEvent(CType(e.Row,ProduitsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveProduitsRow(ByVal row As ProduitsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "ProduitsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class PrescripteursDataTable
        Inherits Global.System.Data.TypedTableBase(Of PrescripteursRow)
        
        Private columnIDinterne As Global.System.Data.DataColumn
        
        Private columnNumidentification As Global.System.Data.DataColumn
        
        Private columnClé As Global.System.Data.DataColumn
        
        Private columnCodeSpécialité As Global.System.Data.DataColumn
        
        Private columnNomPrénom As Global.System.Data.DataColumn
        
        Private columnAdresse As Global.System.Data.DataColumn
        
        Private columnStatut As Global.System.Data.DataColumn
        
        Private columnNumRPPS As Global.System.Data.DataColumn
        
        Private columnCléRPPS As Global.System.Data.DataColumn
        
        Private columnnumStructure As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Prescripteurs"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IDinterneColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIDinterne
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumidentificationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumidentification
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CléColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnClé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeSpécialitéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeSpécialité
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NomPrénomColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNomPrénom
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AdresseColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAdresse
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property StatutColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnStatut
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumRPPSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumRPPS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CléRPPSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCléRPPS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property numStructureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnnumStructure
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As PrescripteursRow
            Get
                Return CType(Me.Rows(index),PrescripteursRow)
            End Get
        End Property
        
        Public Event PrescripteursRowChanging As PrescripteursRowChangeEventHandler
        
        Public Event PrescripteursRowChanged As PrescripteursRowChangeEventHandler
        
        Public Event PrescripteursRowDeleting As PrescripteursRowChangeEventHandler
        
        Public Event PrescripteursRowDeleted As PrescripteursRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddPrescripteursRow(ByVal row As PrescripteursRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddPrescripteursRow(ByVal IDinterne As String, ByVal Numidentification As String, ByVal Clé As String, ByVal CodeSpécialité As String, ByVal NomPrénom As String, ByVal Adresse As String, ByVal Statut As String, ByVal NumRPPS As String, ByVal CléRPPS As String, ByVal numStructure As String) As PrescripteursRow
            Dim rowPrescripteursRow As PrescripteursRow = CType(Me.NewRow,PrescripteursRow)
            Dim columnValuesArray() As Object = New Object() {IDinterne, Numidentification, Clé, CodeSpécialité, NomPrénom, Adresse, Statut, NumRPPS, CléRPPS, numStructure}
            rowPrescripteursRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowPrescripteursRow)
            Return rowPrescripteursRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByIDinterne(ByVal IDinterne As String) As PrescripteursRow
            Return CType(Me.Rows.Find(New Object() {IDinterne}),PrescripteursRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As PrescripteursDataTable = CType(MyBase.Clone,PrescripteursDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New PrescripteursDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnIDinterne = MyBase.Columns("IDinterne")
            Me.columnNumidentification = MyBase.Columns("Numidentification")
            Me.columnClé = MyBase.Columns("Clé")
            Me.columnCodeSpécialité = MyBase.Columns("CodeSpécialité")
            Me.columnNomPrénom = MyBase.Columns("NomPrénom")
            Me.columnAdresse = MyBase.Columns("Adresse")
            Me.columnStatut = MyBase.Columns("Statut")
            Me.columnNumRPPS = MyBase.Columns("NumRPPS")
            Me.columnCléRPPS = MyBase.Columns("CléRPPS")
            Me.columnnumStructure = MyBase.Columns("numStructure")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnIDinterne = New Global.System.Data.DataColumn("IDinterne", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIDinterne)
            Me.columnNumidentification = New Global.System.Data.DataColumn("Numidentification", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumidentification)
            Me.columnClé = New Global.System.Data.DataColumn("Clé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnClé)
            Me.columnCodeSpécialité = New Global.System.Data.DataColumn("CodeSpécialité", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeSpécialité)
            Me.columnNomPrénom = New Global.System.Data.DataColumn("NomPrénom", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNomPrénom)
            Me.columnAdresse = New Global.System.Data.DataColumn("Adresse", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAdresse)
            Me.columnStatut = New Global.System.Data.DataColumn("Statut", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnStatut)
            Me.columnNumRPPS = New Global.System.Data.DataColumn("NumRPPS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumRPPS)
            Me.columnCléRPPS = New Global.System.Data.DataColumn("CléRPPS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCléRPPS)
            Me.columnnumStructure = New Global.System.Data.DataColumn("numStructure", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnnumStructure)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint11", New Global.System.Data.DataColumn() {Me.columnIDinterne}, true))
            Me.columnIDinterne.AllowDBNull = false
            Me.columnIDinterne.Unique = true
            Me.columnIDinterne.MaxLength = 50
            Me.columnNumidentification.MaxLength = 50
            Me.columnClé.MaxLength = 50
            Me.columnCodeSpécialité.MaxLength = 50
            Me.columnNomPrénom.MaxLength = 50
            Me.columnAdresse.MaxLength = 50
            Me.columnStatut.MaxLength = 50
            Me.columnNumRPPS.MaxLength = 50
            Me.columnCléRPPS.MaxLength = 50
            Me.columnnumStructure.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewPrescripteursRow() As PrescripteursRow
            Return CType(Me.NewRow,PrescripteursRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New PrescripteursRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(PrescripteursRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.PrescripteursRowChangedEvent) Is Nothing) Then
                RaiseEvent PrescripteursRowChanged(Me, New PrescripteursRowChangeEvent(CType(e.Row,PrescripteursRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.PrescripteursRowChangingEvent) Is Nothing) Then
                RaiseEvent PrescripteursRowChanging(Me, New PrescripteursRowChangeEvent(CType(e.Row,PrescripteursRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.PrescripteursRowDeletedEvent) Is Nothing) Then
                RaiseEvent PrescripteursRowDeleted(Me, New PrescripteursRowChangeEvent(CType(e.Row,PrescripteursRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.PrescripteursRowDeletingEvent) Is Nothing) Then
                RaiseEvent PrescripteursRowDeleting(Me, New PrescripteursRowChangeEvent(CType(e.Row,PrescripteursRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemovePrescripteursRow(ByVal row As PrescripteursRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "PrescripteursDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class VitaleDataTable
        Inherits Global.System.Data.TypedTableBase(Of VitaleRow)
        
        Private columnG101C2 As Global.System.Data.DataColumn
        
        Private columnG101C3 As Global.System.Data.DataColumn
        
        Private columnG101C7 As Global.System.Data.DataColumn
        
        Private columnG101C8 As Global.System.Data.DataColumn
        
        Private columnG101C9 As Global.System.Data.DataColumn
        
        Private columnG101C10 As Global.System.Data.DataColumn
        
        Private columnG101C11 As Global.System.Data.DataColumn
        
        Private columnG101C12 As Global.System.Data.DataColumn
        
        Private columnG101C13 As Global.System.Data.DataColumn
        
        Private columnG102C1 As Global.System.Data.DataColumn
        
        Private columnG102C2 As Global.System.Data.DataColumn
        
        Private columnG102C3 As Global.System.Data.DataColumn
        
        Private columnG103C1 As Global.System.Data.DataColumn
        
        Private columnG103C2 As Global.System.Data.DataColumn
        
        Private columnG103C3 As Global.System.Data.DataColumn
        
        Private columnG103C4 As Global.System.Data.DataColumn
        
        Private columnG103C5 As Global.System.Data.DataColumn
        
        Private columnG103C6 As Global.System.Data.DataColumn
        
        Private columnG103C7 As Global.System.Data.DataColumn
        
        Private columnG103C8 As Global.System.Data.DataColumn
        
        Private columnG103C9 As Global.System.Data.DataColumn
        
        Private columnG104C1 As Global.System.Data.DataColumn
        
        Private columnG104C2 As Global.System.Data.DataColumn
        
        Private columnG104C3 As Global.System.Data.DataColumn
        
        Private columnG104C4 As Global.System.Data.DataColumn
        
        Private columnG104C5 As Global.System.Data.DataColumn
        
        Private columnG104C6 As Global.System.Data.DataColumn
        
        Private columnG104C7 As Global.System.Data.DataColumn
        
        Private columnG104C8 As Global.System.Data.DataColumn
        
        Private columnG104C9 As Global.System.Data.DataColumn
        
        Private columnG104C10 As Global.System.Data.DataColumn
        
        Private columnG104C11 As Global.System.Data.DataColumn
        
        Private columnG104C12 As Global.System.Data.DataColumn
        
        Private columnG104C13 As Global.System.Data.DataColumn
        
        Private columnG104C14 As Global.System.Data.DataColumn
        
        Private columnG104C15 As Global.System.Data.DataColumn
        
        Private columnG104C16 As Global.System.Data.DataColumn
        
        Private columnG104C17 As Global.System.Data.DataColumn
        
        Private columnG104C18 As Global.System.Data.DataColumn
        
        Private columnG105C1O1 As Global.System.Data.DataColumn
        
        Private columnG105C2O1 As Global.System.Data.DataColumn
        
        Private columnG105C1O2 As Global.System.Data.DataColumn
        
        Private columnG105C2O2 As Global.System.Data.DataColumn
        
        Private columnG105C1O3 As Global.System.Data.DataColumn
        
        Private columnG105C2O3 As Global.System.Data.DataColumn
        
        Private columnG106C1O1 As Global.System.Data.DataColumn
        
        Private columnG106C2O1 As Global.System.Data.DataColumn
        
        Private columnG106C3O1 As Global.System.Data.DataColumn
        
        Private columnG106C4O1 As Global.System.Data.DataColumn
        
        Private columnG106C1O2 As Global.System.Data.DataColumn
        
        Private columnG106C2O2 As Global.System.Data.DataColumn
        
        Private columnG106C3O2 As Global.System.Data.DataColumn
        
        Private columnG106C4O2 As Global.System.Data.DataColumn
        
        Private columnG106C1O3 As Global.System.Data.DataColumn
        
        Private columnG106C2O3 As Global.System.Data.DataColumn
        
        Private columnG106C3O3 As Global.System.Data.DataColumn
        
        Private columnG106C4O3 As Global.System.Data.DataColumn
        
        Private columnG106C1O4 As Global.System.Data.DataColumn
        
        Private columnG106C2O4 As Global.System.Data.DataColumn
        
        Private columnG106C3O4 As Global.System.Data.DataColumn
        
        Private columnG106C4O4 As Global.System.Data.DataColumn
        
        Private columnG106C1O5 As Global.System.Data.DataColumn
        
        Private columnG106C2O5 As Global.System.Data.DataColumn
        
        Private columnG106C3O5 As Global.System.Data.DataColumn
        
        Private columnG106C4O5 As Global.System.Data.DataColumn
        
        Private columnG106C1O6 As Global.System.Data.DataColumn
        
        Private columnG106C2O6 As Global.System.Data.DataColumn
        
        Private columnG106C3O6 As Global.System.Data.DataColumn
        
        Private columnG106C4O6 As Global.System.Data.DataColumn
        
        Private columnG106C1O7 As Global.System.Data.DataColumn
        
        Private columnG106C2O7 As Global.System.Data.DataColumn
        
        Private columnG106C3O7 As Global.System.Data.DataColumn
        
        Private columnG106C4O7 As Global.System.Data.DataColumn
        
        Private columnG107C1 As Global.System.Data.DataColumn
        
        Private columnG107C2 As Global.System.Data.DataColumn
        
        Private columnG107C3 As Global.System.Data.DataColumn
        
        Private columnG107C4 As Global.System.Data.DataColumn
        
        Private columnG107C5 As Global.System.Data.DataColumn
        
        Private columnG107C6 As Global.System.Data.DataColumn
        
        Private columnG108C1O1 As Global.System.Data.DataColumn
        
        Private columnG108C2O1 As Global.System.Data.DataColumn
        
        Private columnG108C1O2 As Global.System.Data.DataColumn
        
        Private columnG108C2O2 As Global.System.Data.DataColumn
        
        Private columnG108C1O3 As Global.System.Data.DataColumn
        
        Private columnG108C2O3 As Global.System.Data.DataColumn
        
        Private columnG109C1 As Global.System.Data.DataColumn
        
        Private columnG109C2 As Global.System.Data.DataColumn
        
        Private columnG109C3 As Global.System.Data.DataColumn
        
        Private columnG109C4 As Global.System.Data.DataColumn
        
        Private columnG109C5 As Global.System.Data.DataColumn
        
        Private columnG109C6 As Global.System.Data.DataColumn
        
        Private columnG109C7 As Global.System.Data.DataColumn
        
        Private columnG109C8 As Global.System.Data.DataColumn
        
        Private columnG109C9 As Global.System.Data.DataColumn
        
        Private columnG109C10 As Global.System.Data.DataColumn
        
        Private columnG109C11 As Global.System.Data.DataColumn
        
        Private columnG109C12 As Global.System.Data.DataColumn
        
        Private columnG111C1 As Global.System.Data.DataColumn
        
        Private columnIDPrescripteur As Global.System.Data.DataColumn
        
        Private columnG101C1 As Global.System.Data.DataColumn
        
        Private columnG101C5 As Global.System.Data.DataColumn
        
        Private columnG101C6 As Global.System.Data.DataColumn
        
        Private columnG101C14 As Global.System.Data.DataColumn
        
        Private columnAMC_NumOrganisme As Global.System.Data.DataColumn
        
        Private columnAMC_NumAdherent As Global.System.Data.DataColumn
        
        Private columnAMC_TypeContrat As Global.System.Data.DataColumn
        
        Private columnAMC_DateDébut As Global.System.Data.DataColumn
        
        Private columnAMC_DateFin As Global.System.Data.DataColumn
        
        Private columnAMC_Piecejustificative As Global.System.Data.DataColumn
        
        Private columnG1420C1 As Global.System.Data.DataColumn
        
        Private columnG1420C2 As Global.System.Data.DataColumn
        
        Private columnG1420C3 As Global.System.Data.DataColumn
        
        Private columnAssuré As Global.System.Data.DataColumn
        
        Private columnG1511C2 As Global.System.Data.DataColumn
        
        Private columnAMC_Indicateurdetrairement As Global.System.Data.DataColumn
        
        Private columnAMC_NumMutuelle As Global.System.Data.DataColumn
        
        Private columnAMC_IDassure As Global.System.Data.DataColumn
        
        Private columnAMC_Code_Aiguillage_STS As Global.System.Data.DataColumn
        
        Private columnAMC_CodeRoutage As Global.System.Data.DataColumn
        
        Private columnAMC_IdHote As Global.System.Data.DataColumn
        
        Private columnAMC_NomDomaine As Global.System.Data.DataColumn
        
        Private columnAMC_Type_Convention As Global.System.Data.DataColumn
        
        Private columnAMC_Critère_secondaire As Global.System.Data.DataColumn
        
        Private columnAMC_IdentifiantAMC As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Vitale"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C12Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C12
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G102C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG102C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G102C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG102C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G102C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG102C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G103C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG103C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C12Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C12
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C14Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C14
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C15Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C15
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C16Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C16
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C17Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C17
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G104C18Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG104C18
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G105C1O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG105C1O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G105C2O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG105C2O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G105C1O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG105C1O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G105C2O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG105C2O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G105C1O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG105C1O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G105C2O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG105C2O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C1O7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C1O7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C2O7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C2O7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C3O7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C3O7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G106C4O7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG106C4O7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G107C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG107C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G107C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG107C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G107C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG107C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G107C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG107C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G107C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG107C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G107C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG107C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G108C1O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG108C1O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G108C2O1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG108C2O1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G108C1O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG108C1O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G108C2O2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG108C2O2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G108C1O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG108C1O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G108C2O3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG108C2O3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G109C12Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG109C12
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G111C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG111C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IDPrescripteurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIDPrescripteur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G101C14Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG101C14
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_NumOrganismeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_NumOrganisme
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_NumAdherentColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_NumAdherent
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_TypeContratColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_TypeContrat
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_DateDébutColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_DateDébut
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_DateFinColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_DateFin
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_PiecejustificativeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_Piecejustificative
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1420C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1420C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1420C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1420C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1420C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1420C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AssuréColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAssuré
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1511C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1511C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_IndicateurdetrairementColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_Indicateurdetrairement
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_NumMutuelleColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_NumMutuelle
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_IDassureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_IDassure
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_Code_Aiguillage_STSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_Code_Aiguillage_STS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_CodeRoutageColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_CodeRoutage
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_IdHoteColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_IdHote
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_NomDomaineColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_NomDomaine
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_Type_ConventionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_Type_Convention
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_Critère_secondaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_Critère_secondaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AMC_IdentifiantAMCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAMC_IdentifiantAMC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As VitaleRow
            Get
                Return CType(Me.Rows(index),VitaleRow)
            End Get
        End Property
        
        Public Event VitaleRowChanging As VitaleRowChangeEventHandler
        
        Public Event VitaleRowChanged As VitaleRowChangeEventHandler
        
        Public Event VitaleRowDeleting As VitaleRowChangeEventHandler
        
        Public Event VitaleRowDeleted As VitaleRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddVitaleRow(ByVal row As VitaleRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddVitaleRow( _
                    ByVal G101C2 As String,  _
                    ByVal G101C3 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G101C13 As String,  _
                    ByVal G102C1 As String,  _
                    ByVal G102C2 As String,  _
                    ByVal G102C3 As String,  _
                    ByVal G103C1 As String,  _
                    ByVal G103C2 As String,  _
                    ByVal G103C3 As String,  _
                    ByVal G103C4 As String,  _
                    ByVal G103C5 As String,  _
                    ByVal G103C6 As String,  _
                    ByVal G103C7 As String,  _
                    ByVal G103C8 As String,  _
                    ByVal G103C9 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C4 As String,  _
                    ByVal G104C5 As String,  _
                    ByVal G104C6 As String,  _
                    ByVal G104C7 As String,  _
                    ByVal G104C8 As String,  _
                    ByVal G104C9 As String,  _
                    ByVal G104C10 As String,  _
                    ByVal G104C11 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G104C15 As String,  _
                    ByVal G104C16 As String,  _
                    ByVal G104C17 As String,  _
                    ByVal G104C18 As String,  _
                    ByVal G105C1O1 As String,  _
                    ByVal G105C2O1 As String,  _
                    ByVal G105C1O2 As String,  _
                    ByVal G105C2O2 As String,  _
                    ByVal G105C1O3 As String,  _
                    ByVal G105C2O3 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal G107C1 As String,  _
                    ByVal G107C2 As String,  _
                    ByVal G107C3 As String,  _
                    ByVal G107C4 As String,  _
                    ByVal G107C5 As String,  _
                    ByVal G107C6 As String,  _
                    ByVal G108C1O1 As String,  _
                    ByVal G108C2O1 As String,  _
                    ByVal G108C1O2 As String,  _
                    ByVal G108C2O2 As String,  _
                    ByVal G108C1O3 As String,  _
                    ByVal G108C2O3 As String,  _
                    ByVal G109C1 As String,  _
                    ByVal G109C2 As String,  _
                    ByVal G109C3 As String,  _
                    ByVal G109C4 As String,  _
                    ByVal G109C5 As String,  _
                    ByVal G109C6 As String,  _
                    ByVal G109C7 As String,  _
                    ByVal G109C8 As String,  _
                    ByVal G109C9 As String,  _
                    ByVal G109C10 As String,  _
                    ByVal G109C11 As String,  _
                    ByVal G109C12 As String,  _
                    ByVal G111C1 As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal G101C1 As String,  _
                    ByVal G101C5 As String,  _
                    ByVal G101C6 As String,  _
                    ByVal G101C14 As String,  _
                    ByVal AMC_NumOrganisme As String,  _
                    ByVal AMC_NumAdherent As String,  _
                    ByVal AMC_TypeContrat As String,  _
                    ByVal AMC_DateDébut As String,  _
                    ByVal AMC_DateFin As String,  _
                    ByVal AMC_Piecejustificative As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal Assuré As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal AMC_Indicateurdetrairement As String,  _
                    ByVal AMC_NumMutuelle As String,  _
                    ByVal AMC_IDassure As String,  _
                    ByVal AMC_Code_Aiguillage_STS As String,  _
                    ByVal AMC_CodeRoutage As String,  _
                    ByVal AMC_IdHote As String,  _
                    ByVal AMC_NomDomaine As String,  _
                    ByVal AMC_Type_Convention As String,  _
                    ByVal AMC_Critère_secondaire As String,  _
                    ByVal AMC_IdentifiantAMC As String) As VitaleRow
            Dim rowVitaleRow As VitaleRow = CType(Me.NewRow,VitaleRow)
            Dim columnValuesArray() As Object = New Object() {G101C2, G101C3, G101C7, G101C8, G101C9, G101C10, G101C11, G101C12, G101C13, G102C1, G102C2, G102C3, G103C1, G103C2, G103C3, G103C4, G103C5, G103C6, G103C7, G103C8, G103C9, G104C1, G104C2, G104C3, G104C4, G104C5, G104C6, G104C7, G104C8, G104C9, G104C10, G104C11, G104C12, G104C13, G104C14, G104C15, G104C16, G104C17, G104C18, G105C1O1, G105C2O1, G105C1O2, G105C2O2, G105C1O3, G105C2O3, G106C1O1, G106C2O1, G106C3O1, G106C4O1, G106C1O2, G106C2O2, G106C3O2, G106C4O2, G106C1O3, G106C2O3, G106C3O3, G106C4O3, G106C1O4, G106C2O4, G106C3O4, G106C4O4, G106C1O5, G106C2O5, G106C3O5, G106C4O5, G106C1O6, G106C2O6, G106C3O6, G106C4O6, G106C1O7, G106C2O7, G106C3O7, G106C4O7, G107C1, G107C2, G107C3, G107C4, G107C5, G107C6, G108C1O1, G108C2O1, G108C1O2, G108C2O2, G108C1O3, G108C2O3, G109C1, G109C2, G109C3, G109C4, G109C5, G109C6, G109C7, G109C8, G109C9, G109C10, G109C11, G109C12, G111C1, IDPrescripteur, G101C1, G101C5, G101C6, G101C14, AMC_NumOrganisme, AMC_NumAdherent, AMC_TypeContrat, AMC_DateDébut, AMC_DateFin, AMC_Piecejustificative, G1420C1, G1420C2, G1420C3, Assuré, G1511C2, AMC_Indicateurdetrairement, AMC_NumMutuelle, AMC_IDassure, AMC_Code_Aiguillage_STS, AMC_CodeRoutage, AMC_IdHote, AMC_NomDomaine, AMC_Type_Convention, AMC_Critère_secondaire, AMC_IdentifiantAMC}
            rowVitaleRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowVitaleRow)
            Return rowVitaleRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As VitaleDataTable = CType(MyBase.Clone,VitaleDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New VitaleDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnG101C2 = MyBase.Columns("G101C2")
            Me.columnG101C3 = MyBase.Columns("G101C3")
            Me.columnG101C7 = MyBase.Columns("G101C7")
            Me.columnG101C8 = MyBase.Columns("G101C8")
            Me.columnG101C9 = MyBase.Columns("G101C9")
            Me.columnG101C10 = MyBase.Columns("G101C10")
            Me.columnG101C11 = MyBase.Columns("G101C11")
            Me.columnG101C12 = MyBase.Columns("G101C12")
            Me.columnG101C13 = MyBase.Columns("G101C13")
            Me.columnG102C1 = MyBase.Columns("G102C1")
            Me.columnG102C2 = MyBase.Columns("G102C2")
            Me.columnG102C3 = MyBase.Columns("G102C3")
            Me.columnG103C1 = MyBase.Columns("G103C1")
            Me.columnG103C2 = MyBase.Columns("G103C2")
            Me.columnG103C3 = MyBase.Columns("G103C3")
            Me.columnG103C4 = MyBase.Columns("G103C4")
            Me.columnG103C5 = MyBase.Columns("G103C5")
            Me.columnG103C6 = MyBase.Columns("G103C6")
            Me.columnG103C7 = MyBase.Columns("G103C7")
            Me.columnG103C8 = MyBase.Columns("G103C8")
            Me.columnG103C9 = MyBase.Columns("G103C9")
            Me.columnG104C1 = MyBase.Columns("G104C1")
            Me.columnG104C2 = MyBase.Columns("G104C2")
            Me.columnG104C3 = MyBase.Columns("G104C3")
            Me.columnG104C4 = MyBase.Columns("G104C4")
            Me.columnG104C5 = MyBase.Columns("G104C5")
            Me.columnG104C6 = MyBase.Columns("G104C6")
            Me.columnG104C7 = MyBase.Columns("G104C7")
            Me.columnG104C8 = MyBase.Columns("G104C8")
            Me.columnG104C9 = MyBase.Columns("G104C9")
            Me.columnG104C10 = MyBase.Columns("G104C10")
            Me.columnG104C11 = MyBase.Columns("G104C11")
            Me.columnG104C12 = MyBase.Columns("G104C12")
            Me.columnG104C13 = MyBase.Columns("G104C13")
            Me.columnG104C14 = MyBase.Columns("G104C14")
            Me.columnG104C15 = MyBase.Columns("G104C15")
            Me.columnG104C16 = MyBase.Columns("G104C16")
            Me.columnG104C17 = MyBase.Columns("G104C17")
            Me.columnG104C18 = MyBase.Columns("G104C18")
            Me.columnG105C1O1 = MyBase.Columns("G105C1O1")
            Me.columnG105C2O1 = MyBase.Columns("G105C2O1")
            Me.columnG105C1O2 = MyBase.Columns("G105C1O2")
            Me.columnG105C2O2 = MyBase.Columns("G105C2O2")
            Me.columnG105C1O3 = MyBase.Columns("G105C1O3")
            Me.columnG105C2O3 = MyBase.Columns("G105C2O3")
            Me.columnG106C1O1 = MyBase.Columns("G106C1O1")
            Me.columnG106C2O1 = MyBase.Columns("G106C2O1")
            Me.columnG106C3O1 = MyBase.Columns("G106C3O1")
            Me.columnG106C4O1 = MyBase.Columns("G106C4O1")
            Me.columnG106C1O2 = MyBase.Columns("G106C1O2")
            Me.columnG106C2O2 = MyBase.Columns("G106C2O2")
            Me.columnG106C3O2 = MyBase.Columns("G106C3O2")
            Me.columnG106C4O2 = MyBase.Columns("G106C4O2")
            Me.columnG106C1O3 = MyBase.Columns("G106C1O3")
            Me.columnG106C2O3 = MyBase.Columns("G106C2O3")
            Me.columnG106C3O3 = MyBase.Columns("G106C3O3")
            Me.columnG106C4O3 = MyBase.Columns("G106C4O3")
            Me.columnG106C1O4 = MyBase.Columns("G106C1O4")
            Me.columnG106C2O4 = MyBase.Columns("G106C2O4")
            Me.columnG106C3O4 = MyBase.Columns("G106C3O4")
            Me.columnG106C4O4 = MyBase.Columns("G106C4O4")
            Me.columnG106C1O5 = MyBase.Columns("G106C1O5")
            Me.columnG106C2O5 = MyBase.Columns("G106C2O5")
            Me.columnG106C3O5 = MyBase.Columns("G106C3O5")
            Me.columnG106C4O5 = MyBase.Columns("G106C4O5")
            Me.columnG106C1O6 = MyBase.Columns("G106C1O6")
            Me.columnG106C2O6 = MyBase.Columns("G106C2O6")
            Me.columnG106C3O6 = MyBase.Columns("G106C3O6")
            Me.columnG106C4O6 = MyBase.Columns("G106C4O6")
            Me.columnG106C1O7 = MyBase.Columns("G106C1O7")
            Me.columnG106C2O7 = MyBase.Columns("G106C2O7")
            Me.columnG106C3O7 = MyBase.Columns("G106C3O7")
            Me.columnG106C4O7 = MyBase.Columns("G106C4O7")
            Me.columnG107C1 = MyBase.Columns("G107C1")
            Me.columnG107C2 = MyBase.Columns("G107C2")
            Me.columnG107C3 = MyBase.Columns("G107C3")
            Me.columnG107C4 = MyBase.Columns("G107C4")
            Me.columnG107C5 = MyBase.Columns("G107C5")
            Me.columnG107C6 = MyBase.Columns("G107C6")
            Me.columnG108C1O1 = MyBase.Columns("G108C1O1")
            Me.columnG108C2O1 = MyBase.Columns("G108C2O1")
            Me.columnG108C1O2 = MyBase.Columns("G108C1O2")
            Me.columnG108C2O2 = MyBase.Columns("G108C2O2")
            Me.columnG108C1O3 = MyBase.Columns("G108C1O3")
            Me.columnG108C2O3 = MyBase.Columns("G108C2O3")
            Me.columnG109C1 = MyBase.Columns("G109C1")
            Me.columnG109C2 = MyBase.Columns("G109C2")
            Me.columnG109C3 = MyBase.Columns("G109C3")
            Me.columnG109C4 = MyBase.Columns("G109C4")
            Me.columnG109C5 = MyBase.Columns("G109C5")
            Me.columnG109C6 = MyBase.Columns("G109C6")
            Me.columnG109C7 = MyBase.Columns("G109C7")
            Me.columnG109C8 = MyBase.Columns("G109C8")
            Me.columnG109C9 = MyBase.Columns("G109C9")
            Me.columnG109C10 = MyBase.Columns("G109C10")
            Me.columnG109C11 = MyBase.Columns("G109C11")
            Me.columnG109C12 = MyBase.Columns("G109C12")
            Me.columnG111C1 = MyBase.Columns("G111C1")
            Me.columnIDPrescripteur = MyBase.Columns("IDPrescripteur")
            Me.columnG101C1 = MyBase.Columns("G101C1")
            Me.columnG101C5 = MyBase.Columns("G101C5")
            Me.columnG101C6 = MyBase.Columns("G101C6")
            Me.columnG101C14 = MyBase.Columns("G101C14")
            Me.columnAMC_NumOrganisme = MyBase.Columns("AMC_NumOrganisme")
            Me.columnAMC_NumAdherent = MyBase.Columns("AMC_NumAdherent")
            Me.columnAMC_TypeContrat = MyBase.Columns("AMC_TypeContrat")
            Me.columnAMC_DateDébut = MyBase.Columns("AMC_DateDébut")
            Me.columnAMC_DateFin = MyBase.Columns("AMC_DateFin")
            Me.columnAMC_Piecejustificative = MyBase.Columns("AMC_Piecejustificative")
            Me.columnG1420C1 = MyBase.Columns("G1420C1")
            Me.columnG1420C2 = MyBase.Columns("G1420C2")
            Me.columnG1420C3 = MyBase.Columns("G1420C3")
            Me.columnAssuré = MyBase.Columns("Assuré")
            Me.columnG1511C2 = MyBase.Columns("G1511C2")
            Me.columnAMC_Indicateurdetrairement = MyBase.Columns("AMC_Indicateurdetrairement")
            Me.columnAMC_NumMutuelle = MyBase.Columns("AMC_NumMutuelle")
            Me.columnAMC_IDassure = MyBase.Columns("AMC_IDassure")
            Me.columnAMC_Code_Aiguillage_STS = MyBase.Columns("AMC_Code_Aiguillage_STS")
            Me.columnAMC_CodeRoutage = MyBase.Columns("AMC_CodeRoutage")
            Me.columnAMC_IdHote = MyBase.Columns("AMC_IdHote")
            Me.columnAMC_NomDomaine = MyBase.Columns("AMC_NomDomaine")
            Me.columnAMC_Type_Convention = MyBase.Columns("AMC_Type_Convention")
            Me.columnAMC_Critère_secondaire = MyBase.Columns("AMC_Critère_secondaire")
            Me.columnAMC_IdentifiantAMC = MyBase.Columns("AMC_IdentifiantAMC")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnG101C2 = New Global.System.Data.DataColumn("G101C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C2)
            Me.columnG101C3 = New Global.System.Data.DataColumn("G101C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C3)
            Me.columnG101C7 = New Global.System.Data.DataColumn("G101C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C7)
            Me.columnG101C8 = New Global.System.Data.DataColumn("G101C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C8)
            Me.columnG101C9 = New Global.System.Data.DataColumn("G101C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C9)
            Me.columnG101C10 = New Global.System.Data.DataColumn("G101C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C10)
            Me.columnG101C11 = New Global.System.Data.DataColumn("G101C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C11)
            Me.columnG101C12 = New Global.System.Data.DataColumn("G101C12", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C12)
            Me.columnG101C13 = New Global.System.Data.DataColumn("G101C13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C13)
            Me.columnG102C1 = New Global.System.Data.DataColumn("G102C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG102C1)
            Me.columnG102C2 = New Global.System.Data.DataColumn("G102C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG102C2)
            Me.columnG102C3 = New Global.System.Data.DataColumn("G102C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG102C3)
            Me.columnG103C1 = New Global.System.Data.DataColumn("G103C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C1)
            Me.columnG103C2 = New Global.System.Data.DataColumn("G103C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C2)
            Me.columnG103C3 = New Global.System.Data.DataColumn("G103C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C3)
            Me.columnG103C4 = New Global.System.Data.DataColumn("G103C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C4)
            Me.columnG103C5 = New Global.System.Data.DataColumn("G103C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C5)
            Me.columnG103C6 = New Global.System.Data.DataColumn("G103C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C6)
            Me.columnG103C7 = New Global.System.Data.DataColumn("G103C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C7)
            Me.columnG103C8 = New Global.System.Data.DataColumn("G103C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C8)
            Me.columnG103C9 = New Global.System.Data.DataColumn("G103C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG103C9)
            Me.columnG104C1 = New Global.System.Data.DataColumn("G104C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C1)
            Me.columnG104C2 = New Global.System.Data.DataColumn("G104C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C2)
            Me.columnG104C3 = New Global.System.Data.DataColumn("G104C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C3)
            Me.columnG104C4 = New Global.System.Data.DataColumn("G104C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C4)
            Me.columnG104C5 = New Global.System.Data.DataColumn("G104C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C5)
            Me.columnG104C6 = New Global.System.Data.DataColumn("G104C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C6)
            Me.columnG104C7 = New Global.System.Data.DataColumn("G104C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C7)
            Me.columnG104C8 = New Global.System.Data.DataColumn("G104C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C8)
            Me.columnG104C9 = New Global.System.Data.DataColumn("G104C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C9)
            Me.columnG104C10 = New Global.System.Data.DataColumn("G104C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C10)
            Me.columnG104C11 = New Global.System.Data.DataColumn("G104C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C11)
            Me.columnG104C12 = New Global.System.Data.DataColumn("G104C12", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C12)
            Me.columnG104C13 = New Global.System.Data.DataColumn("G104C13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C13)
            Me.columnG104C14 = New Global.System.Data.DataColumn("G104C14", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C14)
            Me.columnG104C15 = New Global.System.Data.DataColumn("G104C15", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C15)
            Me.columnG104C16 = New Global.System.Data.DataColumn("G104C16", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C16)
            Me.columnG104C17 = New Global.System.Data.DataColumn("G104C17", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C17)
            Me.columnG104C18 = New Global.System.Data.DataColumn("G104C18", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG104C18)
            Me.columnG105C1O1 = New Global.System.Data.DataColumn("G105C1O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG105C1O1)
            Me.columnG105C2O1 = New Global.System.Data.DataColumn("G105C2O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG105C2O1)
            Me.columnG105C1O2 = New Global.System.Data.DataColumn("G105C1O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG105C1O2)
            Me.columnG105C2O2 = New Global.System.Data.DataColumn("G105C2O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG105C2O2)
            Me.columnG105C1O3 = New Global.System.Data.DataColumn("G105C1O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG105C1O3)
            Me.columnG105C2O3 = New Global.System.Data.DataColumn("G105C2O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG105C2O3)
            Me.columnG106C1O1 = New Global.System.Data.DataColumn("G106C1O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O1)
            Me.columnG106C2O1 = New Global.System.Data.DataColumn("G106C2O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O1)
            Me.columnG106C3O1 = New Global.System.Data.DataColumn("G106C3O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O1)
            Me.columnG106C4O1 = New Global.System.Data.DataColumn("G106C4O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O1)
            Me.columnG106C1O2 = New Global.System.Data.DataColumn("G106C1O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O2)
            Me.columnG106C2O2 = New Global.System.Data.DataColumn("G106C2O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O2)
            Me.columnG106C3O2 = New Global.System.Data.DataColumn("G106C3O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O2)
            Me.columnG106C4O2 = New Global.System.Data.DataColumn("G106C4O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O2)
            Me.columnG106C1O3 = New Global.System.Data.DataColumn("G106C1O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O3)
            Me.columnG106C2O3 = New Global.System.Data.DataColumn("G106C2O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O3)
            Me.columnG106C3O3 = New Global.System.Data.DataColumn("G106C3O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O3)
            Me.columnG106C4O3 = New Global.System.Data.DataColumn("G106C4O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O3)
            Me.columnG106C1O4 = New Global.System.Data.DataColumn("G106C1O4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O4)
            Me.columnG106C2O4 = New Global.System.Data.DataColumn("G106C2O4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O4)
            Me.columnG106C3O4 = New Global.System.Data.DataColumn("G106C3O4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O4)
            Me.columnG106C4O4 = New Global.System.Data.DataColumn("G106C4O4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O4)
            Me.columnG106C1O5 = New Global.System.Data.DataColumn("G106C1O5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O5)
            Me.columnG106C2O5 = New Global.System.Data.DataColumn("G106C2O5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O5)
            Me.columnG106C3O5 = New Global.System.Data.DataColumn("G106C3O5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O5)
            Me.columnG106C4O5 = New Global.System.Data.DataColumn("G106C4O5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O5)
            Me.columnG106C1O6 = New Global.System.Data.DataColumn("G106C1O6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O6)
            Me.columnG106C2O6 = New Global.System.Data.DataColumn("G106C2O6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O6)
            Me.columnG106C3O6 = New Global.System.Data.DataColumn("G106C3O6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O6)
            Me.columnG106C4O6 = New Global.System.Data.DataColumn("G106C4O6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O6)
            Me.columnG106C1O7 = New Global.System.Data.DataColumn("G106C1O7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C1O7)
            Me.columnG106C2O7 = New Global.System.Data.DataColumn("G106C2O7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C2O7)
            Me.columnG106C3O7 = New Global.System.Data.DataColumn("G106C3O7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C3O7)
            Me.columnG106C4O7 = New Global.System.Data.DataColumn("G106C4O7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG106C4O7)
            Me.columnG107C1 = New Global.System.Data.DataColumn("G107C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG107C1)
            Me.columnG107C2 = New Global.System.Data.DataColumn("G107C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG107C2)
            Me.columnG107C3 = New Global.System.Data.DataColumn("G107C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG107C3)
            Me.columnG107C4 = New Global.System.Data.DataColumn("G107C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG107C4)
            Me.columnG107C5 = New Global.System.Data.DataColumn("G107C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG107C5)
            Me.columnG107C6 = New Global.System.Data.DataColumn("G107C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG107C6)
            Me.columnG108C1O1 = New Global.System.Data.DataColumn("G108C1O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG108C1O1)
            Me.columnG108C2O1 = New Global.System.Data.DataColumn("G108C2O1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG108C2O1)
            Me.columnG108C1O2 = New Global.System.Data.DataColumn("G108C1O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG108C1O2)
            Me.columnG108C2O2 = New Global.System.Data.DataColumn("G108C2O2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG108C2O2)
            Me.columnG108C1O3 = New Global.System.Data.DataColumn("G108C1O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG108C1O3)
            Me.columnG108C2O3 = New Global.System.Data.DataColumn("G108C2O3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG108C2O3)
            Me.columnG109C1 = New Global.System.Data.DataColumn("G109C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C1)
            Me.columnG109C2 = New Global.System.Data.DataColumn("G109C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C2)
            Me.columnG109C3 = New Global.System.Data.DataColumn("G109C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C3)
            Me.columnG109C4 = New Global.System.Data.DataColumn("G109C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C4)
            Me.columnG109C5 = New Global.System.Data.DataColumn("G109C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C5)
            Me.columnG109C6 = New Global.System.Data.DataColumn("G109C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C6)
            Me.columnG109C7 = New Global.System.Data.DataColumn("G109C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C7)
            Me.columnG109C8 = New Global.System.Data.DataColumn("G109C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C8)
            Me.columnG109C9 = New Global.System.Data.DataColumn("G109C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C9)
            Me.columnG109C10 = New Global.System.Data.DataColumn("G109C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C10)
            Me.columnG109C11 = New Global.System.Data.DataColumn("G109C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C11)
            Me.columnG109C12 = New Global.System.Data.DataColumn("G109C12", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG109C12)
            Me.columnG111C1 = New Global.System.Data.DataColumn("G111C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG111C1)
            Me.columnIDPrescripteur = New Global.System.Data.DataColumn("IDPrescripteur", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIDPrescripteur)
            Me.columnG101C1 = New Global.System.Data.DataColumn("G101C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C1)
            Me.columnG101C5 = New Global.System.Data.DataColumn("G101C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C5)
            Me.columnG101C6 = New Global.System.Data.DataColumn("G101C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C6)
            Me.columnG101C14 = New Global.System.Data.DataColumn("G101C14", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG101C14)
            Me.columnAMC_NumOrganisme = New Global.System.Data.DataColumn("AMC_NumOrganisme", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_NumOrganisme)
            Me.columnAMC_NumAdherent = New Global.System.Data.DataColumn("AMC_NumAdherent", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_NumAdherent)
            Me.columnAMC_TypeContrat = New Global.System.Data.DataColumn("AMC_TypeContrat", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_TypeContrat)
            Me.columnAMC_DateDébut = New Global.System.Data.DataColumn("AMC_DateDébut", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_DateDébut)
            Me.columnAMC_DateFin = New Global.System.Data.DataColumn("AMC_DateFin", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_DateFin)
            Me.columnAMC_Piecejustificative = New Global.System.Data.DataColumn("AMC_Piecejustificative", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_Piecejustificative)
            Me.columnG1420C1 = New Global.System.Data.DataColumn("G1420C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1420C1)
            Me.columnG1420C2 = New Global.System.Data.DataColumn("G1420C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1420C2)
            Me.columnG1420C3 = New Global.System.Data.DataColumn("G1420C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1420C3)
            Me.columnAssuré = New Global.System.Data.DataColumn("Assuré", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAssuré)
            Me.columnG1511C2 = New Global.System.Data.DataColumn("G1511C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1511C2)
            Me.columnAMC_Indicateurdetrairement = New Global.System.Data.DataColumn("AMC_Indicateurdetrairement", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_Indicateurdetrairement)
            Me.columnAMC_NumMutuelle = New Global.System.Data.DataColumn("AMC_NumMutuelle", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_NumMutuelle)
            Me.columnAMC_IDassure = New Global.System.Data.DataColumn("AMC_IDassure", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_IDassure)
            Me.columnAMC_Code_Aiguillage_STS = New Global.System.Data.DataColumn("AMC_Code_Aiguillage_STS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_Code_Aiguillage_STS)
            Me.columnAMC_CodeRoutage = New Global.System.Data.DataColumn("AMC_CodeRoutage", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_CodeRoutage)
            Me.columnAMC_IdHote = New Global.System.Data.DataColumn("AMC_IdHote", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_IdHote)
            Me.columnAMC_NomDomaine = New Global.System.Data.DataColumn("AMC_NomDomaine", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_NomDomaine)
            Me.columnAMC_Type_Convention = New Global.System.Data.DataColumn("AMC_Type_Convention", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_Type_Convention)
            Me.columnAMC_Critère_secondaire = New Global.System.Data.DataColumn("AMC_Critère_secondaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_Critère_secondaire)
            Me.columnAMC_IdentifiantAMC = New Global.System.Data.DataColumn("AMC_IdentifiantAMC", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAMC_IdentifiantAMC)
            Me.columnG101C2.MaxLength = 50
            Me.columnG101C3.MaxLength = 50
            Me.columnG101C7.MaxLength = 50
            Me.columnG101C8.AllowDBNull = false
            Me.columnG101C8.MaxLength = 50
            Me.columnG101C9.AllowDBNull = false
            Me.columnG101C9.MaxLength = 50
            Me.columnG101C10.MaxLength = 50
            Me.columnG101C11.MaxLength = 50
            Me.columnG101C12.MaxLength = 50
            Me.columnG101C13.MaxLength = 50
            Me.columnG102C1.MaxLength = 50
            Me.columnG102C2.MaxLength = 50
            Me.columnG102C3.MaxLength = 50
            Me.columnG103C1.MaxLength = 50
            Me.columnG103C2.MaxLength = 50
            Me.columnG103C3.MaxLength = 50
            Me.columnG103C4.MaxLength = 50
            Me.columnG103C5.MaxLength = 50
            Me.columnG103C6.MaxLength = 50
            Me.columnG103C7.MaxLength = 50
            Me.columnG103C8.MaxLength = 50
            Me.columnG103C9.MaxLength = 50
            Me.columnG104C1.MaxLength = 50
            Me.columnG104C2.MaxLength = 50
            Me.columnG104C3.MaxLength = 50
            Me.columnG104C4.MaxLength = 50
            Me.columnG104C5.MaxLength = 50
            Me.columnG104C6.MaxLength = 50
            Me.columnG104C7.MaxLength = 50
            Me.columnG104C8.MaxLength = 50
            Me.columnG104C9.MaxLength = 50
            Me.columnG104C10.MaxLength = 50
            Me.columnG104C11.MaxLength = 50
            Me.columnG104C12.AllowDBNull = false
            Me.columnG104C12.MaxLength = 50
            Me.columnG104C13.AllowDBNull = false
            Me.columnG104C13.MaxLength = 50
            Me.columnG104C14.AllowDBNull = false
            Me.columnG104C14.MaxLength = 50
            Me.columnG104C15.MaxLength = 50
            Me.columnG104C16.MaxLength = 50
            Me.columnG104C17.MaxLength = 50
            Me.columnG104C18.MaxLength = 50
            Me.columnG105C1O1.MaxLength = 50
            Me.columnG105C2O1.MaxLength = 50
            Me.columnG105C1O2.MaxLength = 50
            Me.columnG105C2O2.MaxLength = 50
            Me.columnG105C1O3.MaxLength = 50
            Me.columnG105C2O3.MaxLength = 50
            Me.columnG106C1O1.MaxLength = 50
            Me.columnG106C2O1.MaxLength = 50
            Me.columnG106C3O1.MaxLength = 50
            Me.columnG106C4O1.MaxLength = 50
            Me.columnG106C1O2.MaxLength = 50
            Me.columnG106C2O2.MaxLength = 50
            Me.columnG106C3O2.MaxLength = 50
            Me.columnG106C4O2.MaxLength = 50
            Me.columnG106C1O3.MaxLength = 50
            Me.columnG106C2O3.MaxLength = 50
            Me.columnG106C3O3.MaxLength = 50
            Me.columnG106C4O3.MaxLength = 50
            Me.columnG106C1O4.MaxLength = 50
            Me.columnG106C2O4.MaxLength = 50
            Me.columnG106C3O4.MaxLength = 50
            Me.columnG106C4O4.MaxLength = 50
            Me.columnG106C1O5.MaxLength = 50
            Me.columnG106C2O5.MaxLength = 50
            Me.columnG106C3O5.MaxLength = 50
            Me.columnG106C4O5.MaxLength = 50
            Me.columnG106C1O6.MaxLength = 50
            Me.columnG106C2O6.MaxLength = 50
            Me.columnG106C3O6.MaxLength = 50
            Me.columnG106C4O6.MaxLength = 50
            Me.columnG106C1O7.MaxLength = 50
            Me.columnG106C2O7.MaxLength = 50
            Me.columnG106C3O7.MaxLength = 50
            Me.columnG106C4O7.MaxLength = 50
            Me.columnG107C1.MaxLength = 50
            Me.columnG107C2.MaxLength = 50
            Me.columnG107C3.MaxLength = 50
            Me.columnG107C4.MaxLength = 50
            Me.columnG107C5.MaxLength = 50
            Me.columnG107C6.MaxLength = 50
            Me.columnG108C1O1.MaxLength = 50
            Me.columnG108C2O1.MaxLength = 50
            Me.columnG108C1O2.MaxLength = 50
            Me.columnG108C2O2.MaxLength = 50
            Me.columnG108C1O3.MaxLength = 50
            Me.columnG108C2O3.MaxLength = 50
            Me.columnG109C1.MaxLength = 50
            Me.columnG109C2.MaxLength = 50
            Me.columnG109C3.MaxLength = 50
            Me.columnG109C4.MaxLength = 50
            Me.columnG109C5.MaxLength = 50
            Me.columnG109C6.MaxLength = 50
            Me.columnG109C7.MaxLength = 50
            Me.columnG109C8.MaxLength = 50
            Me.columnG109C9.MaxLength = 50
            Me.columnG109C10.MaxLength = 50
            Me.columnG109C11.MaxLength = 50
            Me.columnG109C12.MaxLength = 50
            Me.columnG111C1.MaxLength = 50
            Me.columnIDPrescripteur.MaxLength = 50
            Me.columnG101C1.MaxLength = 50
            Me.columnG101C5.MaxLength = 50
            Me.columnG101C6.MaxLength = 50
            Me.columnG101C14.MaxLength = 50
            Me.columnAMC_NumOrganisme.MaxLength = 50
            Me.columnAMC_NumAdherent.MaxLength = 50
            Me.columnAMC_TypeContrat.MaxLength = 50
            Me.columnAMC_DateDébut.MaxLength = 50
            Me.columnAMC_DateFin.MaxLength = 50
            Me.columnAMC_Piecejustificative.MaxLength = 50
            Me.columnG1420C1.MaxLength = 1
            Me.columnG1420C2.MaxLength = 12
            Me.columnG1420C3.MaxLength = 3
            Me.columnAssuré.MaxLength = 2147483647
            Me.columnG1511C2.MaxLength = 1
            Me.columnAMC_Indicateurdetrairement.MaxLength = 2
            Me.columnAMC_NumMutuelle.MaxLength = 8
            Me.columnAMC_IDassure.MaxLength = 50
            Me.columnAMC_Code_Aiguillage_STS.MaxLength = 1
            Me.columnAMC_CodeRoutage.MaxLength = 2
            Me.columnAMC_IdHote.MaxLength = 3
            Me.columnAMC_NomDomaine.MaxLength = 50
            Me.columnAMC_Type_Convention.MaxLength = 50
            Me.columnAMC_Critère_secondaire.MaxLength = 50
            Me.columnAMC_IdentifiantAMC.MaxLength = 15
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewVitaleRow() As VitaleRow
            Return CType(Me.NewRow,VitaleRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New VitaleRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(VitaleRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.VitaleRowChangedEvent) Is Nothing) Then
                RaiseEvent VitaleRowChanged(Me, New VitaleRowChangeEvent(CType(e.Row,VitaleRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.VitaleRowChangingEvent) Is Nothing) Then
                RaiseEvent VitaleRowChanging(Me, New VitaleRowChangeEvent(CType(e.Row,VitaleRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.VitaleRowDeletedEvent) Is Nothing) Then
                RaiseEvent VitaleRowDeleted(Me, New VitaleRowChangeEvent(CType(e.Row,VitaleRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.VitaleRowDeletingEvent) Is Nothing) Then
                RaiseEvent VitaleRowDeleting(Me, New VitaleRowChangeEvent(CType(e.Row,VitaleRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveVitaleRow(ByVal row As VitaleRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "VitaleDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class LPPDataTable
        Inherits Global.System.Data.TypedTableBase(Of LPPRow)
        
        Private columnCodeLPP As Global.System.Data.DataColumn
        
        Private columnPrixLPP As Global.System.Data.DataColumn
        
        Private columnDateMax As Global.System.Data.DataColumn
        
        Private columnDateMin As Global.System.Data.DataColumn
        
        Private columnPrestation As Global.System.Data.DataColumn
        
        Private columnEntente_Préalable As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "LPP"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeLPPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeLPP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrixLPPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrixLPP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateMaxColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateMax
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateMinColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateMin
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrestationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrestation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Entente_PréalableColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEntente_Préalable
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As LPPRow
            Get
                Return CType(Me.Rows(index),LPPRow)
            End Get
        End Property
        
        Public Event LPPRowChanging As LPPRowChangeEventHandler
        
        Public Event LPPRowChanged As LPPRowChangeEventHandler
        
        Public Event LPPRowDeleting As LPPRowChangeEventHandler
        
        Public Event LPPRowDeleted As LPPRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddLPPRow(ByVal row As LPPRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddLPPRow(ByVal CodeLPP As String, ByVal PrixLPP As String, ByVal DateMax As String, ByVal DateMin As String, ByVal Prestation As String, ByVal Entente_Préalable As Boolean) As LPPRow
            Dim rowLPPRow As LPPRow = CType(Me.NewRow,LPPRow)
            Dim columnValuesArray() As Object = New Object() {CodeLPP, PrixLPP, DateMax, DateMin, Prestation, Entente_Préalable}
            rowLPPRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowLPPRow)
            Return rowLPPRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByCodeLPP(ByVal CodeLPP As String) As LPPRow
            Return CType(Me.Rows.Find(New Object() {CodeLPP}),LPPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As LPPDataTable = CType(MyBase.Clone,LPPDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New LPPDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCodeLPP = MyBase.Columns("CodeLPP")
            Me.columnPrixLPP = MyBase.Columns("PrixLPP")
            Me.columnDateMax = MyBase.Columns("DateMax")
            Me.columnDateMin = MyBase.Columns("DateMin")
            Me.columnPrestation = MyBase.Columns("Prestation")
            Me.columnEntente_Préalable = MyBase.Columns("Entente_Préalable")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCodeLPP = New Global.System.Data.DataColumn("CodeLPP", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeLPP)
            Me.columnPrixLPP = New Global.System.Data.DataColumn("PrixLPP", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrixLPP)
            Me.columnDateMax = New Global.System.Data.DataColumn("DateMax", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateMax)
            Me.columnDateMin = New Global.System.Data.DataColumn("DateMin", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateMin)
            Me.columnPrestation = New Global.System.Data.DataColumn("Prestation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrestation)
            Me.columnEntente_Préalable = New Global.System.Data.DataColumn("Entente_Préalable", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEntente_Préalable)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnCodeLPP}, true))
            Me.columnCodeLPP.AllowDBNull = false
            Me.columnCodeLPP.Unique = true
            Me.columnCodeLPP.MaxLength = 50
            Me.columnPrixLPP.MaxLength = 50
            Me.columnDateMax.MaxLength = 8
            Me.columnDateMin.MaxLength = 8
            Me.columnPrestation.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewLPPRow() As LPPRow
            Return CType(Me.NewRow,LPPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New LPPRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(LPPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.LPPRowChangedEvent) Is Nothing) Then
                RaiseEvent LPPRowChanged(Me, New LPPRowChangeEvent(CType(e.Row,LPPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.LPPRowChangingEvent) Is Nothing) Then
                RaiseEvent LPPRowChanging(Me, New LPPRowChangeEvent(CType(e.Row,LPPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.LPPRowDeletedEvent) Is Nothing) Then
                RaiseEvent LPPRowDeleted(Me, New LPPRowChangeEvent(CType(e.Row,LPPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.LPPRowDeletingEvent) Is Nothing) Then
                RaiseEvent LPPRowDeleting(Me, New LPPRowChangeEvent(CType(e.Row,LPPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveLPPRow(ByVal row As LPPRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "LPPDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class FacturesDataTable
        Inherits Global.System.Data.TypedTableBase(Of FacturesRow)
        
        Private columnNum As Global.System.Data.DataColumn
        
        Private columnG1110C2 As Global.System.Data.DataColumn
        
        Private columnG1110C3 As Global.System.Data.DataColumn
        
        Private columnG1110C4 As Global.System.Data.DataColumn
        
        Private columnG1230C1 As Global.System.Data.DataColumn
        
        Private columnG1410C1 As Global.System.Data.DataColumn
        
        Private columnG1420C1 As Global.System.Data.DataColumn
        
        Private columnG1420C2 As Global.System.Data.DataColumn
        
        Private columnG1420C3 As Global.System.Data.DataColumn
        
        Private columnG1440C1 As Global.System.Data.DataColumn
        
        Private columnG1440C2 As Global.System.Data.DataColumn
        
        Private columnG1440C3 As Global.System.Data.DataColumn
        
        Private columnG1450C1 As Global.System.Data.DataColumn
        
        Private columnG1450C2 As Global.System.Data.DataColumn
        
        Private columnG1511C1 As Global.System.Data.DataColumn
        
        Private columnG1511C2 As Global.System.Data.DataColumn
        
        Private columnG1512C1 As Global.System.Data.DataColumn
        
        Private columnG1513C1 As Global.System.Data.DataColumn
        
        Private columnG1513C2 As Global.System.Data.DataColumn
        
        Private columnG1513C3 As Global.System.Data.DataColumn
        
        Private columnG1514C1 As Global.System.Data.DataColumn
        
        Private columnG1514C2 As Global.System.Data.DataColumn
        
        Private columnG1514C3 As Global.System.Data.DataColumn
        
        Private columnG1514C4 As Global.System.Data.DataColumn
        
        Private columnCRLdeFSE As Global.System.Data.DataColumn
        
        Private columnCRLdeDRE As Global.System.Data.DataColumn
        
        Private columnG1120C1 As Global.System.Data.DataColumn
        
        Private columnG1130C1 As Global.System.Data.DataColumn
        
        Private columnG1130C2 As Global.System.Data.DataColumn
        
        Private columnG1130C3 As Global.System.Data.DataColumn
        
        Private columnG1130C4 As Global.System.Data.DataColumn
        
        Private columnG1130C5 As Global.System.Data.DataColumn
        
        Private columnG1130C6 As Global.System.Data.DataColumn
        
        Private columnG1130C7 As Global.System.Data.DataColumn
        
        Private columnG1130C8 As Global.System.Data.DataColumn
        
        Private columnG1211C1 As Global.System.Data.DataColumn
        
        Private columnG1211C2 As Global.System.Data.DataColumn
        
        Private columnG1211C3 As Global.System.Data.DataColumn
        
        Private columnG1211C4 As Global.System.Data.DataColumn
        
        Private columnG1211C5 As Global.System.Data.DataColumn
        
        Private columnG1211C6 As Global.System.Data.DataColumn
        
        Private columnG1211C7 As Global.System.Data.DataColumn
        
        Private columnG1213C1 As Global.System.Data.DataColumn
        
        Private columnG1213C2 As Global.System.Data.DataColumn
        
        Private columnG1213C3 As Global.System.Data.DataColumn
        
        Private columnG1213C4 As Global.System.Data.DataColumn
        
        Private columnG1213C5 As Global.System.Data.DataColumn
        
        Private columnG1213C6 As Global.System.Data.DataColumn
        
        Private columnG1213C7 As Global.System.Data.DataColumn
        
        Private columnG1213C8 As Global.System.Data.DataColumn
        
        Private columnG1214C1 As Global.System.Data.DataColumn
        
        Private columnG1214C2 As Global.System.Data.DataColumn
        
        Private columnG1214C3 As Global.System.Data.DataColumn
        
        Private columnG1214C4 As Global.System.Data.DataColumn
        
        Private columnG1214C5 As Global.System.Data.DataColumn
        
        Private columnG1214C6 As Global.System.Data.DataColumn
        
        Private columnG1214C7 As Global.System.Data.DataColumn
        
        Private columnG1214C8 As Global.System.Data.DataColumn
        
        Private columnG1110C1 As Global.System.Data.DataColumn
        
        Private columnG1310C1 As Global.System.Data.DataColumn
        
        Private columnG1310C2 As Global.System.Data.DataColumn
        
        Private columnG1310C3 As Global.System.Data.DataColumn
        
        Private columnG1310C4 As Global.System.Data.DataColumn
        
        Private columnG1310C5 As Global.System.Data.DataColumn
        
        Private columnG1910C1 As Global.System.Data.DataColumn
        
        Private columnG1910C2 As Global.System.Data.DataColumn
        
        Private columnG1910C3 As Global.System.Data.DataColumn
        
        Private columnG1910C4 As Global.System.Data.DataColumn
        
        Private columnG1910C5 As Global.System.Data.DataColumn
        
        Private columnG1910C6 As Global.System.Data.DataColumn
        
        Private columnIDPrescripteur As Global.System.Data.DataColumn
        
        Private columnG1160C1 As Global.System.Data.DataColumn
        
        Private columnG1160C2 As Global.System.Data.DataColumn
        
        Private columnG1321C1 As Global.System.Data.DataColumn
        
        Private columnG1321C2 As Global.System.Data.DataColumn
        
        Private columnG1321C3 As Global.System.Data.DataColumn
        
        Private columnG1321C4 As Global.System.Data.DataColumn
        
        Private columnG1321C5 As Global.System.Data.DataColumn
        
        Private columnG1321C6 As Global.System.Data.DataColumn
        
        Private columnG1321C7 As Global.System.Data.DataColumn
        
        Private columnG1321C8 As Global.System.Data.DataColumn
        
        Private columnG1321C9 As Global.System.Data.DataColumn
        
        Private columnG1321C10 As Global.System.Data.DataColumn
        
        Private columnG1321C11 As Global.System.Data.DataColumn
        
        Private columnG1321C12 As Global.System.Data.DataColumn
        
        Private columnBénéficiaire As Global.System.Data.DataColumn
        
        Private columnAssuré As Global.System.Data.DataColumn
        
        Private columnG1120C2 As Global.System.Data.DataColumn
        
        Private columnFactureAcree As Global.System.Data.DataColumn
        
        Private columnNum_Lot_FSE As Global.System.Data.DataColumn
        
        Private columnNum_Lot_DRE As Global.System.Data.DataColumn
        
        Private columnG1330C1 As Global.System.Data.DataColumn
        
        Private columnG1330C2 As Global.System.Data.DataColumn
        
        Private columnG3700C1 As Global.System.Data.DataColumn
        
        Private columnG3700C2 As Global.System.Data.DataColumn
        
        Private columnG3730C1 As Global.System.Data.DataColumn
        
        Private columnModeSecur As Global.System.Data.DataColumn
        
        Private columnDate_Lot_FSE As Global.System.Data.DataColumn
        
        Private columnDate_Lot_DRE As Global.System.Data.DataColumn
        
        Private columnComposite_Convention As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Factures"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1110C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1110C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1110C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1110C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1110C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1110C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1230C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1230C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1410C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1410C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1420C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1420C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1420C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1420C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1420C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1420C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1440C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1440C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1440C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1440C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1440C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1440C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1450C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1450C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1450C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1450C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1511C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1511C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1511C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1511C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1512C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1512C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1513C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1513C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1513C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1513C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1513C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1513C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1514C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1514C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1514C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1514C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1514C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1514C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1514C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1514C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CRLdeFSEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCRLdeFSE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CRLdeDREColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCRLdeDRE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1120C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1120C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1130C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1130C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1211C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1211C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1213C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1213C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1214C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1214C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1110C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1110C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1310C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1310C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1310C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1310C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1310C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1310C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1310C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1310C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1310C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1310C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1910C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1910C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1910C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1910C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1910C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1910C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1910C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1910C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1910C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1910C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1910C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1910C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IDPrescripteurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIDPrescripteur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1160C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1160C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1160C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1160C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1321C12Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1321C12
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property BénéficiaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnBénéficiaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AssuréColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAssuré
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1120C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1120C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FactureAcreeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFactureAcree
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_Lot_FSEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_Lot_FSE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_Lot_DREColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_Lot_DRE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1330C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1330C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1330C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1330C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G3700C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG3700C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G3700C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG3700C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G3730C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG3730C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ModeSecurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnModeSecur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Date_Lot_FSEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate_Lot_FSE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Date_Lot_DREColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate_Lot_DRE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Composite_ConventionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnComposite_Convention
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As FacturesRow
            Get
                Return CType(Me.Rows(index),FacturesRow)
            End Get
        End Property
        
        Public Event FacturesRowChanging As FacturesRowChangeEventHandler
        
        Public Event FacturesRowChanged As FacturesRowChangeEventHandler
        
        Public Event FacturesRowDeleting As FacturesRowChangeEventHandler
        
        Public Event FacturesRowDeleted As FacturesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFacturesRow(ByVal row As FacturesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFacturesRow( _
                    ByVal Num As Decimal,  _
                    ByVal G1110C2 As String,  _
                    ByVal G1110C3 As String,  _
                    ByVal G1110C4 As String,  _
                    ByVal G1230C1 As String,  _
                    ByVal G1410C1 As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal G1440C1 As String,  _
                    ByVal G1440C2 As String,  _
                    ByVal G1440C3 As String,  _
                    ByVal G1450C1 As String,  _
                    ByVal G1450C2 As String,  _
                    ByVal G1511C1 As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal G1512C1 As String,  _
                    ByVal G1513C1 As String,  _
                    ByVal G1513C2 As String,  _
                    ByVal G1513C3 As String,  _
                    ByVal G1514C1 As String,  _
                    ByVal G1514C2 As String,  _
                    ByVal G1514C3 As String,  _
                    ByVal G1514C4 As String,  _
                    ByVal CRLdeFSE As String,  _
                    ByVal CRLdeDRE As String,  _
                    ByVal G1120C1 As String,  _
                    ByVal G1130C1 As String,  _
                    ByVal G1130C2 As String,  _
                    ByVal G1130C3 As String,  _
                    ByVal G1130C4 As String,  _
                    ByVal G1130C5 As String,  _
                    ByVal G1130C6 As String,  _
                    ByVal G1130C7 As String,  _
                    ByVal G1130C8 As String,  _
                    ByVal G1211C1 As String,  _
                    ByVal G1211C2 As String,  _
                    ByVal G1211C3 As String,  _
                    ByVal G1211C4 As String,  _
                    ByVal G1211C5 As String,  _
                    ByVal G1211C6 As String,  _
                    ByVal G1211C7 As String,  _
                    ByVal G1213C1 As String,  _
                    ByVal G1213C2 As String,  _
                    ByVal G1213C3 As String,  _
                    ByVal G1213C4 As String,  _
                    ByVal G1213C5 As String,  _
                    ByVal G1213C6 As String,  _
                    ByVal G1213C7 As String,  _
                    ByVal G1213C8 As String,  _
                    ByVal G1214C1 As String,  _
                    ByVal G1214C2 As String,  _
                    ByVal G1214C3 As String,  _
                    ByVal G1214C4 As String,  _
                    ByVal G1214C5 As String,  _
                    ByVal G1214C6 As String,  _
                    ByVal G1214C7 As String,  _
                    ByVal G1214C8 As String,  _
                    ByVal G1110C1 As String,  _
                    ByVal G1310C1 As String,  _
                    ByVal G1310C2 As String,  _
                    ByVal G1310C3 As String,  _
                    ByVal G1310C4 As String,  _
                    ByVal G1310C5 As String,  _
                    ByVal G1910C1 As Decimal,  _
                    ByVal G1910C2 As Decimal,  _
                    ByVal G1910C3 As Decimal,  _
                    ByVal G1910C4 As Decimal,  _
                    ByVal G1910C5 As Decimal,  _
                    ByVal G1910C6 As Decimal,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal G1160C1 As String,  _
                    ByVal G1160C2 As String,  _
                    ByVal G1321C1 As String,  _
                    ByVal G1321C2 As String,  _
                    ByVal G1321C3 As String,  _
                    ByVal G1321C4 As String,  _
                    ByVal G1321C5 As String,  _
                    ByVal G1321C6 As String,  _
                    ByVal G1321C7 As String,  _
                    ByVal G1321C8 As String,  _
                    ByVal G1321C9 As String,  _
                    ByVal G1321C10 As String,  _
                    ByVal G1321C11 As String,  _
                    ByVal G1321C12 As String,  _
                    ByVal Bénéficiaire As String,  _
                    ByVal Assuré As String,  _
                    ByVal G1120C2 As String,  _
                    ByVal FactureAcree As String,  _
                    ByVal Num_Lot_FSE As String,  _
                    ByVal Num_Lot_DRE As String,  _
                    ByVal G1330C1 As String,  _
                    ByVal G1330C2 As String,  _
                    ByVal G3700C1 As String,  _
                    ByVal G3700C2 As String,  _
                    ByVal G3730C1 As String,  _
                    ByVal ModeSecur As String,  _
                    ByVal Date_Lot_FSE As String,  _
                    ByVal Date_Lot_DRE As String,  _
                    ByVal Composite_Convention As String) As FacturesRow
            Dim rowFacturesRow As FacturesRow = CType(Me.NewRow,FacturesRow)
            Dim columnValuesArray() As Object = New Object() {Num, G1110C2, G1110C3, G1110C4, G1230C1, G1410C1, G1420C1, G1420C2, G1420C3, G1440C1, G1440C2, G1440C3, G1450C1, G1450C2, G1511C1, G1511C2, G1512C1, G1513C1, G1513C2, G1513C3, G1514C1, G1514C2, G1514C3, G1514C4, CRLdeFSE, CRLdeDRE, G1120C1, G1130C1, G1130C2, G1130C3, G1130C4, G1130C5, G1130C6, G1130C7, G1130C8, G1211C1, G1211C2, G1211C3, G1211C4, G1211C5, G1211C6, G1211C7, G1213C1, G1213C2, G1213C3, G1213C4, G1213C5, G1213C6, G1213C7, G1213C8, G1214C1, G1214C2, G1214C3, G1214C4, G1214C5, G1214C6, G1214C7, G1214C8, G1110C1, G1310C1, G1310C2, G1310C3, G1310C4, G1310C5, G1910C1, G1910C2, G1910C3, G1910C4, G1910C5, G1910C6, IDPrescripteur, G1160C1, G1160C2, G1321C1, G1321C2, G1321C3, G1321C4, G1321C5, G1321C6, G1321C7, G1321C8, G1321C9, G1321C10, G1321C11, G1321C12, Bénéficiaire, Assuré, G1120C2, FactureAcree, Num_Lot_FSE, Num_Lot_DRE, G1330C1, G1330C2, G3700C1, G3700C2, G3730C1, ModeSecur, Date_Lot_FSE, Date_Lot_DRE, Composite_Convention}
            rowFacturesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFacturesRow)
            Return rowFacturesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As FacturesDataTable = CType(MyBase.Clone,FacturesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New FacturesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNum = MyBase.Columns("Num")
            Me.columnG1110C2 = MyBase.Columns("G1110C2")
            Me.columnG1110C3 = MyBase.Columns("G1110C3")
            Me.columnG1110C4 = MyBase.Columns("G1110C4")
            Me.columnG1230C1 = MyBase.Columns("G1230C1")
            Me.columnG1410C1 = MyBase.Columns("G1410C1")
            Me.columnG1420C1 = MyBase.Columns("G1420C1")
            Me.columnG1420C2 = MyBase.Columns("G1420C2")
            Me.columnG1420C3 = MyBase.Columns("G1420C3")
            Me.columnG1440C1 = MyBase.Columns("G1440C1")
            Me.columnG1440C2 = MyBase.Columns("G1440C2")
            Me.columnG1440C3 = MyBase.Columns("G1440C3")
            Me.columnG1450C1 = MyBase.Columns("G1450C1")
            Me.columnG1450C2 = MyBase.Columns("G1450C2")
            Me.columnG1511C1 = MyBase.Columns("G1511C1")
            Me.columnG1511C2 = MyBase.Columns("G1511C2")
            Me.columnG1512C1 = MyBase.Columns("G1512C1")
            Me.columnG1513C1 = MyBase.Columns("G1513C1")
            Me.columnG1513C2 = MyBase.Columns("G1513C2")
            Me.columnG1513C3 = MyBase.Columns("G1513C3")
            Me.columnG1514C1 = MyBase.Columns("G1514C1")
            Me.columnG1514C2 = MyBase.Columns("G1514C2")
            Me.columnG1514C3 = MyBase.Columns("G1514C3")
            Me.columnG1514C4 = MyBase.Columns("G1514C4")
            Me.columnCRLdeFSE = MyBase.Columns("CRLdeFSE")
            Me.columnCRLdeDRE = MyBase.Columns("CRLdeDRE")
            Me.columnG1120C1 = MyBase.Columns("G1120C1")
            Me.columnG1130C1 = MyBase.Columns("G1130C1")
            Me.columnG1130C2 = MyBase.Columns("G1130C2")
            Me.columnG1130C3 = MyBase.Columns("G1130C3")
            Me.columnG1130C4 = MyBase.Columns("G1130C4")
            Me.columnG1130C5 = MyBase.Columns("G1130C5")
            Me.columnG1130C6 = MyBase.Columns("G1130C6")
            Me.columnG1130C7 = MyBase.Columns("G1130C7")
            Me.columnG1130C8 = MyBase.Columns("G1130C8")
            Me.columnG1211C1 = MyBase.Columns("G1211C1")
            Me.columnG1211C2 = MyBase.Columns("G1211C2")
            Me.columnG1211C3 = MyBase.Columns("G1211C3")
            Me.columnG1211C4 = MyBase.Columns("G1211C4")
            Me.columnG1211C5 = MyBase.Columns("G1211C5")
            Me.columnG1211C6 = MyBase.Columns("G1211C6")
            Me.columnG1211C7 = MyBase.Columns("G1211C7")
            Me.columnG1213C1 = MyBase.Columns("G1213C1")
            Me.columnG1213C2 = MyBase.Columns("G1213C2")
            Me.columnG1213C3 = MyBase.Columns("G1213C3")
            Me.columnG1213C4 = MyBase.Columns("G1213C4")
            Me.columnG1213C5 = MyBase.Columns("G1213C5")
            Me.columnG1213C6 = MyBase.Columns("G1213C6")
            Me.columnG1213C7 = MyBase.Columns("G1213C7")
            Me.columnG1213C8 = MyBase.Columns("G1213C8")
            Me.columnG1214C1 = MyBase.Columns("G1214C1")
            Me.columnG1214C2 = MyBase.Columns("G1214C2")
            Me.columnG1214C3 = MyBase.Columns("G1214C3")
            Me.columnG1214C4 = MyBase.Columns("G1214C4")
            Me.columnG1214C5 = MyBase.Columns("G1214C5")
            Me.columnG1214C6 = MyBase.Columns("G1214C6")
            Me.columnG1214C7 = MyBase.Columns("G1214C7")
            Me.columnG1214C8 = MyBase.Columns("G1214C8")
            Me.columnG1110C1 = MyBase.Columns("G1110C1")
            Me.columnG1310C1 = MyBase.Columns("G1310C1")
            Me.columnG1310C2 = MyBase.Columns("G1310C2")
            Me.columnG1310C3 = MyBase.Columns("G1310C3")
            Me.columnG1310C4 = MyBase.Columns("G1310C4")
            Me.columnG1310C5 = MyBase.Columns("G1310C5")
            Me.columnG1910C1 = MyBase.Columns("G1910C1")
            Me.columnG1910C2 = MyBase.Columns("G1910C2")
            Me.columnG1910C3 = MyBase.Columns("G1910C3")
            Me.columnG1910C4 = MyBase.Columns("G1910C4")
            Me.columnG1910C5 = MyBase.Columns("G1910C5")
            Me.columnG1910C6 = MyBase.Columns("G1910C6")
            Me.columnIDPrescripteur = MyBase.Columns("IDPrescripteur")
            Me.columnG1160C1 = MyBase.Columns("G1160C1")
            Me.columnG1160C2 = MyBase.Columns("G1160C2")
            Me.columnG1321C1 = MyBase.Columns("G1321C1")
            Me.columnG1321C2 = MyBase.Columns("G1321C2")
            Me.columnG1321C3 = MyBase.Columns("G1321C3")
            Me.columnG1321C4 = MyBase.Columns("G1321C4")
            Me.columnG1321C5 = MyBase.Columns("G1321C5")
            Me.columnG1321C6 = MyBase.Columns("G1321C6")
            Me.columnG1321C7 = MyBase.Columns("G1321C7")
            Me.columnG1321C8 = MyBase.Columns("G1321C8")
            Me.columnG1321C9 = MyBase.Columns("G1321C9")
            Me.columnG1321C10 = MyBase.Columns("G1321C10")
            Me.columnG1321C11 = MyBase.Columns("G1321C11")
            Me.columnG1321C12 = MyBase.Columns("G1321C12")
            Me.columnBénéficiaire = MyBase.Columns("Bénéficiaire")
            Me.columnAssuré = MyBase.Columns("Assuré")
            Me.columnG1120C2 = MyBase.Columns("G1120C2")
            Me.columnFactureAcree = MyBase.Columns("FactureAcree")
            Me.columnNum_Lot_FSE = MyBase.Columns("Num_Lot_FSE")
            Me.columnNum_Lot_DRE = MyBase.Columns("Num_Lot_DRE")
            Me.columnG1330C1 = MyBase.Columns("G1330C1")
            Me.columnG1330C2 = MyBase.Columns("G1330C2")
            Me.columnG3700C1 = MyBase.Columns("G3700C1")
            Me.columnG3700C2 = MyBase.Columns("G3700C2")
            Me.columnG3730C1 = MyBase.Columns("G3730C1")
            Me.columnModeSecur = MyBase.Columns("ModeSecur")
            Me.columnDate_Lot_FSE = MyBase.Columns("Date_Lot_FSE")
            Me.columnDate_Lot_DRE = MyBase.Columns("Date_Lot_DRE")
            Me.columnComposite_Convention = MyBase.Columns("Composite_Convention")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNum = New Global.System.Data.DataColumn("Num", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum)
            Me.columnG1110C2 = New Global.System.Data.DataColumn("G1110C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1110C2)
            Me.columnG1110C3 = New Global.System.Data.DataColumn("G1110C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1110C3)
            Me.columnG1110C4 = New Global.System.Data.DataColumn("G1110C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1110C4)
            Me.columnG1230C1 = New Global.System.Data.DataColumn("G1230C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1230C1)
            Me.columnG1410C1 = New Global.System.Data.DataColumn("G1410C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1410C1)
            Me.columnG1420C1 = New Global.System.Data.DataColumn("G1420C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1420C1)
            Me.columnG1420C2 = New Global.System.Data.DataColumn("G1420C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1420C2)
            Me.columnG1420C3 = New Global.System.Data.DataColumn("G1420C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1420C3)
            Me.columnG1440C1 = New Global.System.Data.DataColumn("G1440C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1440C1)
            Me.columnG1440C2 = New Global.System.Data.DataColumn("G1440C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1440C2)
            Me.columnG1440C3 = New Global.System.Data.DataColumn("G1440C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1440C3)
            Me.columnG1450C1 = New Global.System.Data.DataColumn("G1450C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1450C1)
            Me.columnG1450C2 = New Global.System.Data.DataColumn("G1450C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1450C2)
            Me.columnG1511C1 = New Global.System.Data.DataColumn("G1511C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1511C1)
            Me.columnG1511C2 = New Global.System.Data.DataColumn("G1511C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1511C2)
            Me.columnG1512C1 = New Global.System.Data.DataColumn("G1512C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1512C1)
            Me.columnG1513C1 = New Global.System.Data.DataColumn("G1513C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1513C1)
            Me.columnG1513C2 = New Global.System.Data.DataColumn("G1513C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1513C2)
            Me.columnG1513C3 = New Global.System.Data.DataColumn("G1513C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1513C3)
            Me.columnG1514C1 = New Global.System.Data.DataColumn("G1514C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1514C1)
            Me.columnG1514C2 = New Global.System.Data.DataColumn("G1514C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1514C2)
            Me.columnG1514C3 = New Global.System.Data.DataColumn("G1514C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1514C3)
            Me.columnG1514C4 = New Global.System.Data.DataColumn("G1514C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1514C4)
            Me.columnCRLdeFSE = New Global.System.Data.DataColumn("CRLdeFSE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCRLdeFSE)
            Me.columnCRLdeDRE = New Global.System.Data.DataColumn("CRLdeDRE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCRLdeDRE)
            Me.columnG1120C1 = New Global.System.Data.DataColumn("G1120C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1120C1)
            Me.columnG1130C1 = New Global.System.Data.DataColumn("G1130C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C1)
            Me.columnG1130C2 = New Global.System.Data.DataColumn("G1130C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C2)
            Me.columnG1130C3 = New Global.System.Data.DataColumn("G1130C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C3)
            Me.columnG1130C4 = New Global.System.Data.DataColumn("G1130C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C4)
            Me.columnG1130C5 = New Global.System.Data.DataColumn("G1130C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C5)
            Me.columnG1130C6 = New Global.System.Data.DataColumn("G1130C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C6)
            Me.columnG1130C7 = New Global.System.Data.DataColumn("G1130C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C7)
            Me.columnG1130C8 = New Global.System.Data.DataColumn("G1130C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1130C8)
            Me.columnG1211C1 = New Global.System.Data.DataColumn("G1211C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C1)
            Me.columnG1211C2 = New Global.System.Data.DataColumn("G1211C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C2)
            Me.columnG1211C3 = New Global.System.Data.DataColumn("G1211C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C3)
            Me.columnG1211C4 = New Global.System.Data.DataColumn("G1211C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C4)
            Me.columnG1211C5 = New Global.System.Data.DataColumn("G1211C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C5)
            Me.columnG1211C6 = New Global.System.Data.DataColumn("G1211C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C6)
            Me.columnG1211C7 = New Global.System.Data.DataColumn("G1211C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1211C7)
            Me.columnG1213C1 = New Global.System.Data.DataColumn("G1213C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C1)
            Me.columnG1213C2 = New Global.System.Data.DataColumn("G1213C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C2)
            Me.columnG1213C3 = New Global.System.Data.DataColumn("G1213C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C3)
            Me.columnG1213C4 = New Global.System.Data.DataColumn("G1213C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C4)
            Me.columnG1213C5 = New Global.System.Data.DataColumn("G1213C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C5)
            Me.columnG1213C6 = New Global.System.Data.DataColumn("G1213C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C6)
            Me.columnG1213C7 = New Global.System.Data.DataColumn("G1213C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C7)
            Me.columnG1213C8 = New Global.System.Data.DataColumn("G1213C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1213C8)
            Me.columnG1214C1 = New Global.System.Data.DataColumn("G1214C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C1)
            Me.columnG1214C2 = New Global.System.Data.DataColumn("G1214C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C2)
            Me.columnG1214C3 = New Global.System.Data.DataColumn("G1214C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C3)
            Me.columnG1214C4 = New Global.System.Data.DataColumn("G1214C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C4)
            Me.columnG1214C5 = New Global.System.Data.DataColumn("G1214C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C5)
            Me.columnG1214C6 = New Global.System.Data.DataColumn("G1214C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C6)
            Me.columnG1214C7 = New Global.System.Data.DataColumn("G1214C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C7)
            Me.columnG1214C8 = New Global.System.Data.DataColumn("G1214C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1214C8)
            Me.columnG1110C1 = New Global.System.Data.DataColumn("G1110C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1110C1)
            Me.columnG1310C1 = New Global.System.Data.DataColumn("G1310C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1310C1)
            Me.columnG1310C2 = New Global.System.Data.DataColumn("G1310C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1310C2)
            Me.columnG1310C3 = New Global.System.Data.DataColumn("G1310C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1310C3)
            Me.columnG1310C4 = New Global.System.Data.DataColumn("G1310C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1310C4)
            Me.columnG1310C5 = New Global.System.Data.DataColumn("G1310C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1310C5)
            Me.columnG1910C1 = New Global.System.Data.DataColumn("G1910C1", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1910C1)
            Me.columnG1910C2 = New Global.System.Data.DataColumn("G1910C2", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1910C2)
            Me.columnG1910C3 = New Global.System.Data.DataColumn("G1910C3", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1910C3)
            Me.columnG1910C4 = New Global.System.Data.DataColumn("G1910C4", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1910C4)
            Me.columnG1910C5 = New Global.System.Data.DataColumn("G1910C5", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1910C5)
            Me.columnG1910C6 = New Global.System.Data.DataColumn("G1910C6", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1910C6)
            Me.columnIDPrescripteur = New Global.System.Data.DataColumn("IDPrescripteur", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIDPrescripteur)
            Me.columnG1160C1 = New Global.System.Data.DataColumn("G1160C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1160C1)
            Me.columnG1160C2 = New Global.System.Data.DataColumn("G1160C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1160C2)
            Me.columnG1321C1 = New Global.System.Data.DataColumn("G1321C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C1)
            Me.columnG1321C2 = New Global.System.Data.DataColumn("G1321C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C2)
            Me.columnG1321C3 = New Global.System.Data.DataColumn("G1321C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C3)
            Me.columnG1321C4 = New Global.System.Data.DataColumn("G1321C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C4)
            Me.columnG1321C5 = New Global.System.Data.DataColumn("G1321C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C5)
            Me.columnG1321C6 = New Global.System.Data.DataColumn("G1321C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C6)
            Me.columnG1321C7 = New Global.System.Data.DataColumn("G1321C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C7)
            Me.columnG1321C8 = New Global.System.Data.DataColumn("G1321C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C8)
            Me.columnG1321C9 = New Global.System.Data.DataColumn("G1321C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C9)
            Me.columnG1321C10 = New Global.System.Data.DataColumn("G1321C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C10)
            Me.columnG1321C11 = New Global.System.Data.DataColumn("G1321C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C11)
            Me.columnG1321C12 = New Global.System.Data.DataColumn("G1321C12", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1321C12)
            Me.columnBénéficiaire = New Global.System.Data.DataColumn("Bénéficiaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnBénéficiaire)
            Me.columnAssuré = New Global.System.Data.DataColumn("Assuré", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAssuré)
            Me.columnG1120C2 = New Global.System.Data.DataColumn("G1120C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1120C2)
            Me.columnFactureAcree = New Global.System.Data.DataColumn("FactureAcree", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFactureAcree)
            Me.columnNum_Lot_FSE = New Global.System.Data.DataColumn("Num_Lot_FSE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_Lot_FSE)
            Me.columnNum_Lot_DRE = New Global.System.Data.DataColumn("Num_Lot_DRE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_Lot_DRE)
            Me.columnG1330C1 = New Global.System.Data.DataColumn("G1330C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1330C1)
            Me.columnG1330C2 = New Global.System.Data.DataColumn("G1330C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1330C2)
            Me.columnG3700C1 = New Global.System.Data.DataColumn("G3700C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG3700C1)
            Me.columnG3700C2 = New Global.System.Data.DataColumn("G3700C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG3700C2)
            Me.columnG3730C1 = New Global.System.Data.DataColumn("G3730C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG3730C1)
            Me.columnModeSecur = New Global.System.Data.DataColumn("ModeSecur", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnModeSecur)
            Me.columnDate_Lot_FSE = New Global.System.Data.DataColumn("Date_Lot_FSE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDate_Lot_FSE)
            Me.columnDate_Lot_DRE = New Global.System.Data.DataColumn("Date_Lot_DRE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDate_Lot_DRE)
            Me.columnComposite_Convention = New Global.System.Data.DataColumn("Composite_Convention", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnComposite_Convention)
            Me.columnNum.AllowDBNull = false
            Me.columnG1110C2.MaxLength = 50
            Me.columnG1110C3.MaxLength = 50
            Me.columnG1110C4.MaxLength = 50
            Me.columnG1230C1.MaxLength = 50
            Me.columnG1410C1.MaxLength = 50
            Me.columnG1420C1.MaxLength = 50
            Me.columnG1420C2.MaxLength = 50
            Me.columnG1420C3.MaxLength = 50
            Me.columnG1440C1.MaxLength = 50
            Me.columnG1440C2.MaxLength = 50
            Me.columnG1440C3.MaxLength = 50
            Me.columnG1450C1.MaxLength = 50
            Me.columnG1450C2.MaxLength = 50
            Me.columnG1511C1.MaxLength = 50
            Me.columnG1511C2.MaxLength = 50
            Me.columnG1512C1.MaxLength = 50
            Me.columnG1513C1.MaxLength = 50
            Me.columnG1513C2.MaxLength = 50
            Me.columnG1513C3.MaxLength = 50
            Me.columnG1514C1.MaxLength = 50
            Me.columnG1514C2.MaxLength = 50
            Me.columnG1514C3.MaxLength = 50
            Me.columnG1514C4.MaxLength = 50
            Me.columnCRLdeFSE.MaxLength = 50
            Me.columnCRLdeDRE.MaxLength = 50
            Me.columnG1120C1.MaxLength = 50
            Me.columnG1130C1.MaxLength = 50
            Me.columnG1130C2.MaxLength = 50
            Me.columnG1130C3.MaxLength = 50
            Me.columnG1130C4.MaxLength = 50
            Me.columnG1130C5.MaxLength = 50
            Me.columnG1130C6.MaxLength = 50
            Me.columnG1130C7.MaxLength = 50
            Me.columnG1130C8.MaxLength = 50
            Me.columnG1211C1.MaxLength = 50
            Me.columnG1211C2.MaxLength = 50
            Me.columnG1211C3.MaxLength = 50
            Me.columnG1211C4.MaxLength = 50
            Me.columnG1211C5.MaxLength = 50
            Me.columnG1211C6.MaxLength = 50
            Me.columnG1211C7.MaxLength = 50
            Me.columnG1213C1.MaxLength = 50
            Me.columnG1213C2.MaxLength = 50
            Me.columnG1213C3.MaxLength = 50
            Me.columnG1213C4.MaxLength = 50
            Me.columnG1213C5.MaxLength = 50
            Me.columnG1213C6.MaxLength = 50
            Me.columnG1213C7.MaxLength = 50
            Me.columnG1213C8.MaxLength = 50
            Me.columnG1214C1.MaxLength = 50
            Me.columnG1214C2.MaxLength = 50
            Me.columnG1214C3.MaxLength = 50
            Me.columnG1214C4.MaxLength = 50
            Me.columnG1214C5.MaxLength = 50
            Me.columnG1214C6.MaxLength = 50
            Me.columnG1214C7.MaxLength = 50
            Me.columnG1214C8.MaxLength = 50
            Me.columnG1110C1.MaxLength = 50
            Me.columnG1310C1.MaxLength = 2
            Me.columnG1310C2.MaxLength = 3
            Me.columnG1310C3.MaxLength = 4
            Me.columnG1310C4.MaxLength = 3
            Me.columnG1310C5.MaxLength = 3
            Me.columnIDPrescripteur.MaxLength = 50
            Me.columnG1160C1.MaxLength = 50
            Me.columnG1160C2.MaxLength = 50
            Me.columnG1321C1.MaxLength = 50
            Me.columnG1321C2.MaxLength = 50
            Me.columnG1321C3.MaxLength = 50
            Me.columnG1321C4.MaxLength = 50
            Me.columnG1321C5.MaxLength = 50
            Me.columnG1321C6.MaxLength = 50
            Me.columnG1321C7.MaxLength = 50
            Me.columnG1321C8.MaxLength = 50
            Me.columnG1321C9.MaxLength = 50
            Me.columnG1321C10.MaxLength = 50
            Me.columnG1321C11.MaxLength = 50
            Me.columnG1321C12.MaxLength = 50
            Me.columnBénéficiaire.MaxLength = 2147483647
            Me.columnAssuré.MaxLength = 2147483647
            Me.columnG1120C2.MaxLength = 1
            Me.columnFactureAcree.MaxLength = 1
            Me.columnNum_Lot_FSE.MaxLength = 50
            Me.columnNum_Lot_DRE.MaxLength = 50
            Me.columnG1330C1.MaxLength = 50
            Me.columnG1330C2.MaxLength = 34
            Me.columnG3700C1.MaxLength = 1
            Me.columnG3700C2.MaxLength = 1
            Me.columnG3730C1.MaxLength = 8
            Me.columnModeSecur.MaxLength = 1
            Me.columnDate_Lot_FSE.MaxLength = 50
            Me.columnDate_Lot_DRE.MaxLength = 50
            Me.columnComposite_Convention.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFacturesRow() As FacturesRow
            Return CType(Me.NewRow,FacturesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New FacturesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(FacturesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.FacturesRowChangedEvent) Is Nothing) Then
                RaiseEvent FacturesRowChanged(Me, New FacturesRowChangeEvent(CType(e.Row,FacturesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.FacturesRowChangingEvent) Is Nothing) Then
                RaiseEvent FacturesRowChanging(Me, New FacturesRowChangeEvent(CType(e.Row,FacturesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.FacturesRowDeletedEvent) Is Nothing) Then
                RaiseEvent FacturesRowDeleted(Me, New FacturesRowChangeEvent(CType(e.Row,FacturesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.FacturesRowDeletingEvent) Is Nothing) Then
                RaiseEvent FacturesRowDeleting(Me, New FacturesRowChangeEvent(CType(e.Row,FacturesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFacturesRow(ByVal row As FacturesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "FacturesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class FichiersSVDataTable
        Inherits Global.System.Data.TypedTableBase(Of FichiersSVRow)
        
        Private columnNomFichier As Global.System.Data.DataColumn
        
        Private columnCRF As Global.System.Data.DataColumn
        
        Private columnDateFichier As Global.System.Data.DataColumn
        
        Private columnNombreLots As Global.System.Data.DataColumn
        
        Private columnLongueur As Global.System.Data.DataColumn
        
        Private columnNombresFactures As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "FichiersSV"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NomFichierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNomFichier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CRFColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCRF
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateFichierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateFichier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NombreLotsColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNombreLots
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LongueurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLongueur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NombresFacturesColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNombresFactures
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As FichiersSVRow
            Get
                Return CType(Me.Rows(index),FichiersSVRow)
            End Get
        End Property
        
        Public Event FichiersSVRowChanging As FichiersSVRowChangeEventHandler
        
        Public Event FichiersSVRowChanged As FichiersSVRowChangeEventHandler
        
        Public Event FichiersSVRowDeleting As FichiersSVRowChangeEventHandler
        
        Public Event FichiersSVRowDeleted As FichiersSVRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFichiersSVRow(ByVal row As FichiersSVRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFichiersSVRow(ByVal NomFichier As Decimal, ByVal CRF As String, ByVal DateFichier As String, ByVal NombreLots As Decimal, ByVal Longueur As Decimal, ByVal NombresFactures As Decimal) As FichiersSVRow
            Dim rowFichiersSVRow As FichiersSVRow = CType(Me.NewRow,FichiersSVRow)
            Dim columnValuesArray() As Object = New Object() {NomFichier, CRF, DateFichier, NombreLots, Longueur, NombresFactures}
            rowFichiersSVRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFichiersSVRow)
            Return rowFichiersSVRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As FichiersSVDataTable = CType(MyBase.Clone,FichiersSVDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New FichiersSVDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNomFichier = MyBase.Columns("NomFichier")
            Me.columnCRF = MyBase.Columns("CRF")
            Me.columnDateFichier = MyBase.Columns("DateFichier")
            Me.columnNombreLots = MyBase.Columns("NombreLots")
            Me.columnLongueur = MyBase.Columns("Longueur")
            Me.columnNombresFactures = MyBase.Columns("NombresFactures")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNomFichier = New Global.System.Data.DataColumn("NomFichier", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNomFichier)
            Me.columnCRF = New Global.System.Data.DataColumn("CRF", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCRF)
            Me.columnDateFichier = New Global.System.Data.DataColumn("DateFichier", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateFichier)
            Me.columnNombreLots = New Global.System.Data.DataColumn("NombreLots", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNombreLots)
            Me.columnLongueur = New Global.System.Data.DataColumn("Longueur", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLongueur)
            Me.columnNombresFactures = New Global.System.Data.DataColumn("NombresFactures", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNombresFactures)
            Me.columnCRF.MaxLength = 64
            Me.columnDateFichier.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFichiersSVRow() As FichiersSVRow
            Return CType(Me.NewRow,FichiersSVRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New FichiersSVRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(FichiersSVRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.FichiersSVRowChangedEvent) Is Nothing) Then
                RaiseEvent FichiersSVRowChanged(Me, New FichiersSVRowChangeEvent(CType(e.Row,FichiersSVRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.FichiersSVRowChangingEvent) Is Nothing) Then
                RaiseEvent FichiersSVRowChanging(Me, New FichiersSVRowChangeEvent(CType(e.Row,FichiersSVRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.FichiersSVRowDeletedEvent) Is Nothing) Then
                RaiseEvent FichiersSVRowDeleted(Me, New FichiersSVRowChangeEvent(CType(e.Row,FichiersSVRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.FichiersSVRowDeletingEvent) Is Nothing) Then
                RaiseEvent FichiersSVRowDeleting(Me, New FichiersSVRowChangeEvent(CType(e.Row,FichiersSVRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFichiersSVRow(ByVal row As FichiersSVRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "FichiersSVDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class ActesDataTable
        Inherits Global.System.Data.TypedTableBase(Of ActesRow)
        
        Private columnNumActe As Global.System.Data.DataColumn
        
        Private columnNom As Global.System.Data.DataColumn
        
        Private columnPrénom As Global.System.Data.DataColumn
        
        Private columnDate As Global.System.Data.DataColumn
        
        Private columnTypeActe As Global.System.Data.DataColumn
        
        Private columnCIP As Global.System.Data.DataColumn
        
        Private columnEAN13 As Global.System.Data.DataColumn
        
        Private columnCodeActe As Global.System.Data.DataColumn
        
        Private columnQuantité As Global.System.Data.DataColumn
        
        Private columnTotal As Global.System.Data.DataColumn
        
        Private columnRemise As Global.System.Data.DataColumn
        
        Private columnNumFacturesSV As Global.System.Data.DataColumn
        
        Private columnNIR As Global.System.Data.DataColumn
        
        Private columnNumFactureVenteDirecte As Global.System.Data.DataColumn
        
        Private columnPrix_Unitaire As Global.System.Data.DataColumn
        
        Private columnDésignation As Global.System.Data.DataColumn
        
        Private columnTauxRmbrsmnt As Global.System.Data.DataColumn
        
        Private columnTarif_Remboursement As Global.System.Data.DataColumn
        
        Private columnLPP_Type_prestation As Global.System.Data.DataColumn
        
        Private columnLPP_Ref As Global.System.Data.DataColumn
        
        Private columnLPP_Quantité As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Actes"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumActeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumActe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NomColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNom
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrénomColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrénom
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TypeActeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTypeActe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CIPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCIP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EAN13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnEAN13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeActeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeActe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property QuantitéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnQuantité
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TotalColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTotal
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RemiseColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRemise
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumFacturesSVColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumFacturesSV
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NIRColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNIR
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumFactureVenteDirecteColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumFactureVenteDirecte
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Prix_UnitaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrix_Unitaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DésignationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDésignation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TauxRmbrsmntColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTauxRmbrsmnt
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Tarif_RemboursementColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTarif_Remboursement
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LPP_Type_prestationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLPP_Type_prestation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LPP_RefColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLPP_Ref
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LPP_QuantitéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLPP_Quantité
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As ActesRow
            Get
                Return CType(Me.Rows(index),ActesRow)
            End Get
        End Property
        
        Public Event ActesRowChanging As ActesRowChangeEventHandler
        
        Public Event ActesRowChanged As ActesRowChangeEventHandler
        
        Public Event ActesRowDeleting As ActesRowChangeEventHandler
        
        Public Event ActesRowDeleted As ActesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddActesRow(ByVal row As ActesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddActesRow( _
                    ByVal NumActe As Decimal,  _
                    ByVal Nom As String,  _
                    ByVal Prénom As String,  _
                    ByVal _Date As String,  _
                    ByVal TypeActe As String,  _
                    ByVal CIP As String,  _
                    ByVal EAN13 As String,  _
                    ByVal CodeActe As String,  _
                    ByVal Quantité As String,  _
                    ByVal Total As String,  _
                    ByVal Remise As String,  _
                    ByVal NumFacturesSV As String,  _
                    ByVal NIR As String,  _
                    ByVal NumFactureVenteDirecte As String,  _
                    ByVal Prix_Unitaire As Decimal,  _
                    ByVal Désignation As String,  _
                    ByVal TauxRmbrsmnt As Decimal,  _
                    ByVal Tarif_Remboursement As Decimal,  _
                    ByVal LPP_Type_prestation As String,  _
                    ByVal LPP_Ref As String,  _
                    ByVal LPP_Quantité As Decimal) As ActesRow
            Dim rowActesRow As ActesRow = CType(Me.NewRow,ActesRow)
            Dim columnValuesArray() As Object = New Object() {NumActe, Nom, Prénom, _Date, TypeActe, CIP, EAN13, CodeActe, Quantité, Total, Remise, NumFacturesSV, NIR, NumFactureVenteDirecte, Prix_Unitaire, Désignation, TauxRmbrsmnt, Tarif_Remboursement, LPP_Type_prestation, LPP_Ref, LPP_Quantité}
            rowActesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowActesRow)
            Return rowActesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As ActesDataTable = CType(MyBase.Clone,ActesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New ActesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNumActe = MyBase.Columns("NumActe")
            Me.columnNom = MyBase.Columns("Nom")
            Me.columnPrénom = MyBase.Columns("Prénom")
            Me.columnDate = MyBase.Columns("Date")
            Me.columnTypeActe = MyBase.Columns("TypeActe")
            Me.columnCIP = MyBase.Columns("CIP")
            Me.columnEAN13 = MyBase.Columns("EAN13")
            Me.columnCodeActe = MyBase.Columns("CodeActe")
            Me.columnQuantité = MyBase.Columns("Quantité")
            Me.columnTotal = MyBase.Columns("Total")
            Me.columnRemise = MyBase.Columns("Remise")
            Me.columnNumFacturesSV = MyBase.Columns("NumFacturesSV")
            Me.columnNIR = MyBase.Columns("NIR")
            Me.columnNumFactureVenteDirecte = MyBase.Columns("NumFactureVenteDirecte")
            Me.columnPrix_Unitaire = MyBase.Columns("Prix_Unitaire")
            Me.columnDésignation = MyBase.Columns("Désignation")
            Me.columnTauxRmbrsmnt = MyBase.Columns("TauxRmbrsmnt")
            Me.columnTarif_Remboursement = MyBase.Columns("Tarif_Remboursement")
            Me.columnLPP_Type_prestation = MyBase.Columns("LPP_Type_prestation")
            Me.columnLPP_Ref = MyBase.Columns("LPP_Ref")
            Me.columnLPP_Quantité = MyBase.Columns("LPP_Quantité")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNumActe = New Global.System.Data.DataColumn("NumActe", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumActe)
            Me.columnNom = New Global.System.Data.DataColumn("Nom", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNom)
            Me.columnPrénom = New Global.System.Data.DataColumn("Prénom", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrénom)
            Me.columnDate = New Global.System.Data.DataColumn("Date", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "DateColumn")
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columnDate")
            Me.columnDate.ExtendedProperties.Add("Generator_UserColumnName", "Date")
            MyBase.Columns.Add(Me.columnDate)
            Me.columnTypeActe = New Global.System.Data.DataColumn("TypeActe", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTypeActe)
            Me.columnCIP = New Global.System.Data.DataColumn("CIP", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCIP)
            Me.columnEAN13 = New Global.System.Data.DataColumn("EAN13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEAN13)
            Me.columnCodeActe = New Global.System.Data.DataColumn("CodeActe", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeActe)
            Me.columnQuantité = New Global.System.Data.DataColumn("Quantité", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnQuantité)
            Me.columnTotal = New Global.System.Data.DataColumn("Total", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTotal)
            Me.columnRemise = New Global.System.Data.DataColumn("Remise", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRemise)
            Me.columnNumFacturesSV = New Global.System.Data.DataColumn("NumFacturesSV", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumFacturesSV)
            Me.columnNIR = New Global.System.Data.DataColumn("NIR", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNIR)
            Me.columnNumFactureVenteDirecte = New Global.System.Data.DataColumn("NumFactureVenteDirecte", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumFactureVenteDirecte)
            Me.columnPrix_Unitaire = New Global.System.Data.DataColumn("Prix_Unitaire", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrix_Unitaire)
            Me.columnDésignation = New Global.System.Data.DataColumn("Désignation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDésignation)
            Me.columnTauxRmbrsmnt = New Global.System.Data.DataColumn("TauxRmbrsmnt", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTauxRmbrsmnt)
            Me.columnTarif_Remboursement = New Global.System.Data.DataColumn("Tarif_Remboursement", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTarif_Remboursement)
            Me.columnLPP_Type_prestation = New Global.System.Data.DataColumn("LPP_Type_prestation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLPP_Type_prestation)
            Me.columnLPP_Ref = New Global.System.Data.DataColumn("LPP_Ref", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLPP_Ref)
            Me.columnLPP_Quantité = New Global.System.Data.DataColumn("LPP_Quantité", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLPP_Quantité)
            Me.columnNumActe.AllowDBNull = false
            Me.columnNom.MaxLength = 50
            Me.columnPrénom.MaxLength = 50
            Me.columnDate.MaxLength = 50
            Me.columnTypeActe.MaxLength = 50
            Me.columnCIP.MaxLength = 50
            Me.columnEAN13.MaxLength = 50
            Me.columnCodeActe.MaxLength = 2147483647
            Me.columnQuantité.MaxLength = 50
            Me.columnTotal.MaxLength = 50
            Me.columnRemise.MaxLength = 50
            Me.columnNumFacturesSV.MaxLength = 10
            Me.columnNIR.MaxLength = 50
            Me.columnDésignation.MaxLength = 2147483647
            Me.columnLPP_Type_prestation.MaxLength = 50
            Me.columnLPP_Ref.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewActesRow() As ActesRow
            Return CType(Me.NewRow,ActesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New ActesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(ActesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.ActesRowChangedEvent) Is Nothing) Then
                RaiseEvent ActesRowChanged(Me, New ActesRowChangeEvent(CType(e.Row,ActesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.ActesRowChangingEvent) Is Nothing) Then
                RaiseEvent ActesRowChanging(Me, New ActesRowChangeEvent(CType(e.Row,ActesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.ActesRowDeletedEvent) Is Nothing) Then
                RaiseEvent ActesRowDeleted(Me, New ActesRowChangeEvent(CType(e.Row,ActesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.ActesRowDeletingEvent) Is Nothing) Then
                RaiseEvent ActesRowDeleting(Me, New ActesRowChangeEvent(CType(e.Row,ActesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveActesRow(ByVal row As ActesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "ActesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class SMTPDataTable
        Inherits Global.System.Data.TypedTableBase(Of SMTPRow)
        
        Private columncompteur As Global.System.Data.DataColumn
        
        Private columndate As Global.System.Data.DataColumn
        
        Private columnNomFichier As Global.System.Data.DataColumn
        
        Private columnSubject As Global.System.Data.DataColumn
        
        Private columnFrom_ As Global.System.Data.DataColumn
        
        Private columnTo_ As Global.System.Data.DataColumn
        
        Private columnContentType As Global.System.Data.DataColumn
        
        Private columnContentDescription As Global.System.Data.DataColumn
        
        Private columnCRF As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "SMTP"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property compteurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columncompteur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property dateColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columndate
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NomFichierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNomFichier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SubjectColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSubject
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property From_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnFrom_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property To_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnTo_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ContentTypeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnContentType
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ContentDescriptionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnContentDescription
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CRFColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCRF
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As SMTPRow
            Get
                Return CType(Me.Rows(index),SMTPRow)
            End Get
        End Property
        
        Public Event SMTPRowChanging As SMTPRowChangeEventHandler
        
        Public Event SMTPRowChanged As SMTPRowChangeEventHandler
        
        Public Event SMTPRowDeleting As SMTPRowChangeEventHandler
        
        Public Event SMTPRowDeleted As SMTPRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddSMTPRow(ByVal row As SMTPRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddSMTPRow(ByVal compteur As Decimal, ByVal _date As String, ByVal NomFichier As String, ByVal Subject As String, ByVal From_ As String, ByVal To_ As String, ByVal ContentType As String, ByVal ContentDescription As String, ByVal CRF As String) As SMTPRow
            Dim rowSMTPRow As SMTPRow = CType(Me.NewRow,SMTPRow)
            Dim columnValuesArray() As Object = New Object() {compteur, _date, NomFichier, Subject, From_, To_, ContentType, ContentDescription, CRF}
            rowSMTPRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowSMTPRow)
            Return rowSMTPRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As SMTPDataTable = CType(MyBase.Clone,SMTPDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New SMTPDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columncompteur = MyBase.Columns("compteur")
            Me.columndate = MyBase.Columns("date")
            Me.columnNomFichier = MyBase.Columns("NomFichier")
            Me.columnSubject = MyBase.Columns("Subject")
            Me.columnFrom_ = MyBase.Columns("From_")
            Me.columnTo_ = MyBase.Columns("To_")
            Me.columnContentType = MyBase.Columns("ContentType")
            Me.columnContentDescription = MyBase.Columns("ContentDescription")
            Me.columnCRF = MyBase.Columns("CRF")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columncompteur = New Global.System.Data.DataColumn("compteur", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columncompteur)
            Me.columndate = New Global.System.Data.DataColumn("date", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me.columndate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "dateColumn")
            Me.columndate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columndate")
            Me.columndate.ExtendedProperties.Add("Generator_UserColumnName", "date")
            MyBase.Columns.Add(Me.columndate)
            Me.columnNomFichier = New Global.System.Data.DataColumn("NomFichier", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNomFichier)
            Me.columnSubject = New Global.System.Data.DataColumn("Subject", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSubject)
            Me.columnFrom_ = New Global.System.Data.DataColumn("From_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFrom_)
            Me.columnTo_ = New Global.System.Data.DataColumn("To_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTo_)
            Me.columnContentType = New Global.System.Data.DataColumn("ContentType", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnContentType)
            Me.columnContentDescription = New Global.System.Data.DataColumn("ContentDescription", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnContentDescription)
            Me.columnCRF = New Global.System.Data.DataColumn("CRF", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCRF)
            Me.columndate.MaxLength = 50
            Me.columnNomFichier.MaxLength = 50
            Me.columnSubject.MaxLength = 50
            Me.columnFrom_.MaxLength = 50
            Me.columnTo_.MaxLength = 50
            Me.columnContentType.MaxLength = 50
            Me.columnContentDescription.MaxLength = 50
            Me.columnCRF.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewSMTPRow() As SMTPRow
            Return CType(Me.NewRow,SMTPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New SMTPRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(SMTPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.SMTPRowChangedEvent) Is Nothing) Then
                RaiseEvent SMTPRowChanged(Me, New SMTPRowChangeEvent(CType(e.Row,SMTPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.SMTPRowChangingEvent) Is Nothing) Then
                RaiseEvent SMTPRowChanging(Me, New SMTPRowChangeEvent(CType(e.Row,SMTPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.SMTPRowDeletedEvent) Is Nothing) Then
                RaiseEvent SMTPRowDeleted(Me, New SMTPRowChangeEvent(CType(e.Row,SMTPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.SMTPRowDeletingEvent) Is Nothing) Then
                RaiseEvent SMTPRowDeleting(Me, New SMTPRowChangeEvent(CType(e.Row,SMTPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveSMTPRow(ByVal row As SMTPRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "SMTPDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class LotsDataTable
        Inherits Global.System.Data.TypedTableBase(Of LotsRow)
        
        Private columnRéférence As Global.System.Data.DataColumn
        
        Private columnCRL As Global.System.Data.DataColumn
        
        Private columnCRF As Global.System.Data.DataColumn
        
        Private columnDate As Global.System.Data.DataColumn
        
        Private columnNombreDeFSE As Global.System.Data.DataColumn
        
        Private columnTaille As Global.System.Data.DataColumn
        
        Private columnMontant As Global.System.Data.DataColumn
        
        Private columnOrganisme As Global.System.Data.DataColumn
        
        Private columnFichierLots As Global.System.Data.DataColumn
        
        Private columnG13C1 As Global.System.Data.DataColumn
        
        Private columnG13C2 As Global.System.Data.DataColumn
        
        Private columnG13C3 As Global.System.Data.DataColumn
        
        Private columnG13C4 As Global.System.Data.DataColumn
        
        Private columnG13C5 As Global.System.Data.DataColumn
        
        Private columnG13C6 As Global.System.Data.DataColumn
        
        Private columnG13C7 As Global.System.Data.DataColumn
        
        Private columnG93C1 As Global.System.Data.DataColumn
        
        Private columnG93C2 As Global.System.Data.DataColumn
        
        Private columnG93C3 As Global.System.Data.DataColumn
        
        Private columnG93C4 As Global.System.Data.DataColumn
        
        Private columnG93C5 As Global.System.Data.DataColumn
        
        Private columnG93C6 As Global.System.Data.DataColumn
        
        Private columnG93C7 As Global.System.Data.DataColumn
        
        Private columnEtat As Global.System.Data.DataColumn
        
        Private columnARLG31C1 As Global.System.Data.DataColumn
        
        Private columnARLG31C2 As Global.System.Data.DataColumn
        
        Private columnARLG31C3 As Global.System.Data.DataColumn
        
        Private columnARLG31C4 As Global.System.Data.DataColumn
        
        Private columnARLG31C5 As Global.System.Data.DataColumn
        
        Private columnARLG31C6 As Global.System.Data.DataColumn
        
        Private columnARLG31C7 As Global.System.Data.DataColumn
        
        Private columnARLG31C8 As Global.System.Data.DataColumn
        
        Private columnARLG31C9 As Global.System.Data.DataColumn
        
        Private columnARLG31C10 As Global.System.Data.DataColumn
        
        Private columnArlIdMessage As Global.System.Data.DataColumn
        
        Private columnNombreTransmission As Global.System.Data.DataColumn
        
        Private columnDateTransmission As Global.System.Data.DataColumn
        
        Private columnRéférence_DRE As Global.System.Data.DataColumn
        
        Private columnRéférence_bdd As Global.System.Data.DataColumn
        
        Private columnRéférence_DRE_bdd As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Lots"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RéférenceColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRéférence
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CRLColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCRL
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CRFColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCRF
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NombreDeFSEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNombreDeFSE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TailleColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTaille
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MontantColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMontant
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property OrganismeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnOrganisme
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FichierLotsColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFichierLots
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G13C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG13C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G93C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG93C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EtatColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEtat
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ARLG31C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnARLG31C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ArlIdMessageColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnArlIdMessage
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NombreTransmissionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNombreTransmission
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateTransmissionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateTransmission
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Référence_DREColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRéférence_DRE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Référence_bddColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRéférence_bdd
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Référence_DRE_bddColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRéférence_DRE_bdd
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As LotsRow
            Get
                Return CType(Me.Rows(index),LotsRow)
            End Get
        End Property
        
        Public Event LotsRowChanging As LotsRowChangeEventHandler
        
        Public Event LotsRowChanged As LotsRowChangeEventHandler
        
        Public Event LotsRowDeleting As LotsRowChangeEventHandler
        
        Public Event LotsRowDeleted As LotsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddLotsRow(ByVal row As LotsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddLotsRow( _
                    ByVal Référence As Decimal,  _
                    ByVal CRL As String,  _
                    ByVal CRF As String,  _
                    ByVal _Date As String,  _
                    ByVal NombreDeFSE As Decimal,  _
                    ByVal Taille As String,  _
                    ByVal Montant As Decimal,  _
                    ByVal Organisme As String,  _
                    ByVal FichierLots As String,  _
                    ByVal G13C1 As String,  _
                    ByVal G13C2 As String,  _
                    ByVal G13C3 As String,  _
                    ByVal G13C4 As String,  _
                    ByVal G13C5 As String,  _
                    ByVal G13C6 As String,  _
                    ByVal G13C7 As String,  _
                    ByVal G93C1 As String,  _
                    ByVal G93C2 As String,  _
                    ByVal G93C3 As String,  _
                    ByVal G93C4 As String,  _
                    ByVal G93C5 As String,  _
                    ByVal G93C6 As String,  _
                    ByVal G93C7 As String,  _
                    ByVal Etat As String,  _
                    ByVal ARLG31C1 As String,  _
                    ByVal ARLG31C2 As String,  _
                    ByVal ARLG31C3 As String,  _
                    ByVal ARLG31C4 As String,  _
                    ByVal ARLG31C5 As String,  _
                    ByVal ARLG31C6 As String,  _
                    ByVal ARLG31C7 As String,  _
                    ByVal ARLG31C8 As String,  _
                    ByVal ARLG31C9 As String,  _
                    ByVal ARLG31C10 As String,  _
                    ByVal ArlIdMessage As String,  _
                    ByVal NombreTransmission As Decimal,  _
                    ByVal DateTransmission As String,  _
                    ByVal Référence_DRE As String,  _
                    ByVal Référence_bdd As Decimal,  _
                    ByVal Référence_DRE_bdd As String) As LotsRow
            Dim rowLotsRow As LotsRow = CType(Me.NewRow,LotsRow)
            Dim columnValuesArray() As Object = New Object() {Référence, CRL, CRF, _Date, NombreDeFSE, Taille, Montant, Organisme, FichierLots, G13C1, G13C2, G13C3, G13C4, G13C5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, Etat, ARLG31C1, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, ARLG31C7, ARLG31C8, ARLG31C9, ARLG31C10, ArlIdMessage, NombreTransmission, DateTransmission, Référence_DRE, Référence_bdd, Référence_DRE_bdd}
            rowLotsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowLotsRow)
            Return rowLotsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As LotsDataTable = CType(MyBase.Clone,LotsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New LotsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnRéférence = MyBase.Columns("Référence")
            Me.columnCRL = MyBase.Columns("CRL")
            Me.columnCRF = MyBase.Columns("CRF")
            Me.columnDate = MyBase.Columns("Date")
            Me.columnNombreDeFSE = MyBase.Columns("NombreDeFSE")
            Me.columnTaille = MyBase.Columns("Taille")
            Me.columnMontant = MyBase.Columns("Montant")
            Me.columnOrganisme = MyBase.Columns("Organisme")
            Me.columnFichierLots = MyBase.Columns("FichierLots")
            Me.columnG13C1 = MyBase.Columns("G13C1")
            Me.columnG13C2 = MyBase.Columns("G13C2")
            Me.columnG13C3 = MyBase.Columns("G13C3")
            Me.columnG13C4 = MyBase.Columns("G13C4")
            Me.columnG13C5 = MyBase.Columns("G13C5")
            Me.columnG13C6 = MyBase.Columns("G13C6")
            Me.columnG13C7 = MyBase.Columns("G13C7")
            Me.columnG93C1 = MyBase.Columns("G93C1")
            Me.columnG93C2 = MyBase.Columns("G93C2")
            Me.columnG93C3 = MyBase.Columns("G93C3")
            Me.columnG93C4 = MyBase.Columns("G93C4")
            Me.columnG93C5 = MyBase.Columns("G93C5")
            Me.columnG93C6 = MyBase.Columns("G93C6")
            Me.columnG93C7 = MyBase.Columns("G93C7")
            Me.columnEtat = MyBase.Columns("Etat")
            Me.columnARLG31C1 = MyBase.Columns("ARLG31C1")
            Me.columnARLG31C2 = MyBase.Columns("ARLG31C2")
            Me.columnARLG31C3 = MyBase.Columns("ARLG31C3")
            Me.columnARLG31C4 = MyBase.Columns("ARLG31C4")
            Me.columnARLG31C5 = MyBase.Columns("ARLG31C5")
            Me.columnARLG31C6 = MyBase.Columns("ARLG31C6")
            Me.columnARLG31C7 = MyBase.Columns("ARLG31C7")
            Me.columnARLG31C8 = MyBase.Columns("ARLG31C8")
            Me.columnARLG31C9 = MyBase.Columns("ARLG31C9")
            Me.columnARLG31C10 = MyBase.Columns("ARLG31C10")
            Me.columnArlIdMessage = MyBase.Columns("ArlIdMessage")
            Me.columnNombreTransmission = MyBase.Columns("NombreTransmission")
            Me.columnDateTransmission = MyBase.Columns("DateTransmission")
            Me.columnRéférence_DRE = MyBase.Columns("Référence_DRE")
            Me.columnRéférence_bdd = MyBase.Columns("Référence_bdd")
            Me.columnRéférence_DRE_bdd = MyBase.Columns("Référence_DRE_bdd")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnRéférence = New Global.System.Data.DataColumn("Référence", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRéférence)
            Me.columnCRL = New Global.System.Data.DataColumn("CRL", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCRL)
            Me.columnCRF = New Global.System.Data.DataColumn("CRF", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCRF)
            Me.columnDate = New Global.System.Data.DataColumn("Date", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "DateColumn")
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columnDate")
            Me.columnDate.ExtendedProperties.Add("Generator_UserColumnName", "Date")
            MyBase.Columns.Add(Me.columnDate)
            Me.columnNombreDeFSE = New Global.System.Data.DataColumn("NombreDeFSE", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNombreDeFSE)
            Me.columnTaille = New Global.System.Data.DataColumn("Taille", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTaille)
            Me.columnMontant = New Global.System.Data.DataColumn("Montant", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMontant)
            Me.columnOrganisme = New Global.System.Data.DataColumn("Organisme", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnOrganisme)
            Me.columnFichierLots = New Global.System.Data.DataColumn("FichierLots", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFichierLots)
            Me.columnG13C1 = New Global.System.Data.DataColumn("G13C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C1)
            Me.columnG13C2 = New Global.System.Data.DataColumn("G13C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C2)
            Me.columnG13C3 = New Global.System.Data.DataColumn("G13C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C3)
            Me.columnG13C4 = New Global.System.Data.DataColumn("G13C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C4)
            Me.columnG13C5 = New Global.System.Data.DataColumn("G13C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C5)
            Me.columnG13C6 = New Global.System.Data.DataColumn("G13C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C6)
            Me.columnG13C7 = New Global.System.Data.DataColumn("G13C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG13C7)
            Me.columnG93C1 = New Global.System.Data.DataColumn("G93C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C1)
            Me.columnG93C2 = New Global.System.Data.DataColumn("G93C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C2)
            Me.columnG93C3 = New Global.System.Data.DataColumn("G93C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C3)
            Me.columnG93C4 = New Global.System.Data.DataColumn("G93C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C4)
            Me.columnG93C5 = New Global.System.Data.DataColumn("G93C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C5)
            Me.columnG93C6 = New Global.System.Data.DataColumn("G93C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C6)
            Me.columnG93C7 = New Global.System.Data.DataColumn("G93C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG93C7)
            Me.columnEtat = New Global.System.Data.DataColumn("Etat", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEtat)
            Me.columnARLG31C1 = New Global.System.Data.DataColumn("ARLG31C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C1)
            Me.columnARLG31C2 = New Global.System.Data.DataColumn("ARLG31C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C2)
            Me.columnARLG31C3 = New Global.System.Data.DataColumn("ARLG31C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C3)
            Me.columnARLG31C4 = New Global.System.Data.DataColumn("ARLG31C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C4)
            Me.columnARLG31C5 = New Global.System.Data.DataColumn("ARLG31C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C5)
            Me.columnARLG31C6 = New Global.System.Data.DataColumn("ARLG31C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C6)
            Me.columnARLG31C7 = New Global.System.Data.DataColumn("ARLG31C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C7)
            Me.columnARLG31C8 = New Global.System.Data.DataColumn("ARLG31C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C8)
            Me.columnARLG31C9 = New Global.System.Data.DataColumn("ARLG31C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C9)
            Me.columnARLG31C10 = New Global.System.Data.DataColumn("ARLG31C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARLG31C10)
            Me.columnArlIdMessage = New Global.System.Data.DataColumn("ArlIdMessage", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnArlIdMessage)
            Me.columnNombreTransmission = New Global.System.Data.DataColumn("NombreTransmission", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNombreTransmission)
            Me.columnDateTransmission = New Global.System.Data.DataColumn("DateTransmission", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateTransmission)
            Me.columnRéférence_DRE = New Global.System.Data.DataColumn("Référence_DRE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRéférence_DRE)
            Me.columnRéférence_bdd = New Global.System.Data.DataColumn("Référence_bdd", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRéférence_bdd)
            Me.columnRéférence_DRE_bdd = New Global.System.Data.DataColumn("Référence_DRE_bdd", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRéférence_DRE_bdd)
            Me.columnCRL.MaxLength = 50
            Me.columnCRF.MaxLength = 64
            Me.columnDate.MaxLength = 50
            Me.columnTaille.MaxLength = 50
            Me.columnOrganisme.MaxLength = 50
            Me.columnFichierLots.MaxLength = 50
            Me.columnG13C1.MaxLength = 1
            Me.columnG13C2.MaxLength = 1
            Me.columnG13C3.MaxLength = 14
            Me.columnG13C4.MaxLength = 14
            Me.columnG13C5.MaxLength = 3
            Me.columnG13C6.MaxLength = 1
            Me.columnG13C7.MaxLength = 8
            Me.columnG93C1.MaxLength = 14
            Me.columnG93C2.MaxLength = 50
            Me.columnG93C3.MaxLength = 3
            Me.columnG93C4.MaxLength = 20
            Me.columnG93C5.MaxLength = 20
            Me.columnG93C6.MaxLength = 1
            Me.columnG93C7.MaxLength = 8
            Me.columnEtat.MaxLength = 50
            Me.columnARLG31C1.MaxLength = 50
            Me.columnARLG31C2.MaxLength = 50
            Me.columnARLG31C3.MaxLength = 50
            Me.columnARLG31C4.MaxLength = 50
            Me.columnARLG31C5.MaxLength = 50
            Me.columnARLG31C6.MaxLength = 50
            Me.columnARLG31C7.MaxLength = 50
            Me.columnARLG31C8.MaxLength = 50
            Me.columnARLG31C9.MaxLength = 50
            Me.columnARLG31C10.MaxLength = 1024
            Me.columnArlIdMessage.MaxLength = 50
            Me.columnDateTransmission.MaxLength = 50
            Me.columnRéférence_DRE.MaxLength = 3
            Me.columnRéférence_DRE_bdd.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewLotsRow() As LotsRow
            Return CType(Me.NewRow,LotsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New LotsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(LotsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.LotsRowChangedEvent) Is Nothing) Then
                RaiseEvent LotsRowChanged(Me, New LotsRowChangeEvent(CType(e.Row,LotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.LotsRowChangingEvent) Is Nothing) Then
                RaiseEvent LotsRowChanging(Me, New LotsRowChangeEvent(CType(e.Row,LotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.LotsRowDeletedEvent) Is Nothing) Then
                RaiseEvent LotsRowDeleted(Me, New LotsRowChangeEvent(CType(e.Row,LotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.LotsRowDeletingEvent) Is Nothing) Then
                RaiseEvent LotsRowDeleting(Me, New LotsRowChangeEvent(CType(e.Row,LotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveLotsRow(ByVal row As LotsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "LotsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Facture_DétailCodeCIPDataTable
        Inherits Global.System.Data.TypedTableBase(Of Facture_DétailCodeCIPRow)
        
        Private columnNumLigne As Global.System.Data.DataColumn
        
        Private columnG1740C1 As Global.System.Data.DataColumn
        
        Private columnG1740C2 As Global.System.Data.DataColumn
        
        Private columnG1740C3 As Global.System.Data.DataColumn
        
        Private columnG1740C4 As Global.System.Data.DataColumn
        
        Private columnG1740C5 As Global.System.Data.DataColumn
        
        Private columnG1740C6 As Global.System.Data.DataColumn
        
        Private columnG1740C7 As Global.System.Data.DataColumn
        
        Private columnG1740C8 As Global.System.Data.DataColumn
        
        Private columnG1740C9 As Global.System.Data.DataColumn
        
        Private columnG1740C10 As Global.System.Data.DataColumn
        
        Private columnG1740C11 As Global.System.Data.DataColumn
        
        Private columnG1740C12 As Global.System.Data.DataColumn
        
        Private columnG1740C13 As Global.System.Data.DataColumn
        
        Private columnG1740C14 As Global.System.Data.DataColumn
        
        Private columnG1740C15 As Global.System.Data.DataColumn
        
        Private columnG1110C1 As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Facture_DétailCodeCIP"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumLigneColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumLigne
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C12Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C12
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C14Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C14
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1740C15Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1740C15
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1110C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1110C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Facture_DétailCodeCIPRow
            Get
                Return CType(Me.Rows(index),Facture_DétailCodeCIPRow)
            End Get
        End Property
        
        Public Event Facture_DétailCodeCIPRowChanging As Facture_DétailCodeCIPRowChangeEventHandler
        
        Public Event Facture_DétailCodeCIPRowChanged As Facture_DétailCodeCIPRowChangeEventHandler
        
        Public Event Facture_DétailCodeCIPRowDeleting As Facture_DétailCodeCIPRowChangeEventHandler
        
        Public Event Facture_DétailCodeCIPRowDeleted As Facture_DétailCodeCIPRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFacture_DétailCodeCIPRow(ByVal row As Facture_DétailCodeCIPRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFacture_DétailCodeCIPRow( _
                    ByVal NumLigne As String,  _
                    ByVal G1740C1 As String,  _
                    ByVal G1740C2 As String,  _
                    ByVal G1740C3 As String,  _
                    ByVal G1740C4 As String,  _
                    ByVal G1740C5 As String,  _
                    ByVal G1740C6 As String,  _
                    ByVal G1740C7 As String,  _
                    ByVal G1740C8 As String,  _
                    ByVal G1740C9 As String,  _
                    ByVal G1740C10 As String,  _
                    ByVal G1740C11 As String,  _
                    ByVal G1740C12 As String,  _
                    ByVal G1740C13 As String,  _
                    ByVal G1740C14 As String,  _
                    ByVal G1740C15 As String,  _
                    ByVal G1110C1 As String) As Facture_DétailCodeCIPRow
            Dim rowFacture_DétailCodeCIPRow As Facture_DétailCodeCIPRow = CType(Me.NewRow,Facture_DétailCodeCIPRow)
            Dim columnValuesArray() As Object = New Object() {NumLigne, G1740C1, G1740C2, G1740C3, G1740C4, G1740C5, G1740C6, G1740C7, G1740C8, G1740C9, G1740C10, G1740C11, G1740C12, G1740C13, G1740C14, G1740C15, G1110C1}
            rowFacture_DétailCodeCIPRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFacture_DétailCodeCIPRow)
            Return rowFacture_DétailCodeCIPRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Facture_DétailCodeCIPDataTable = CType(MyBase.Clone,Facture_DétailCodeCIPDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Facture_DétailCodeCIPDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNumLigne = MyBase.Columns("NumLigne")
            Me.columnG1740C1 = MyBase.Columns("G1740C1")
            Me.columnG1740C2 = MyBase.Columns("G1740C2")
            Me.columnG1740C3 = MyBase.Columns("G1740C3")
            Me.columnG1740C4 = MyBase.Columns("G1740C4")
            Me.columnG1740C5 = MyBase.Columns("G1740C5")
            Me.columnG1740C6 = MyBase.Columns("G1740C6")
            Me.columnG1740C7 = MyBase.Columns("G1740C7")
            Me.columnG1740C8 = MyBase.Columns("G1740C8")
            Me.columnG1740C9 = MyBase.Columns("G1740C9")
            Me.columnG1740C10 = MyBase.Columns("G1740C10")
            Me.columnG1740C11 = MyBase.Columns("G1740C11")
            Me.columnG1740C12 = MyBase.Columns("G1740C12")
            Me.columnG1740C13 = MyBase.Columns("G1740C13")
            Me.columnG1740C14 = MyBase.Columns("G1740C14")
            Me.columnG1740C15 = MyBase.Columns("G1740C15")
            Me.columnG1110C1 = MyBase.Columns("G1110C1")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNumLigne = New Global.System.Data.DataColumn("NumLigne", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumLigne)
            Me.columnG1740C1 = New Global.System.Data.DataColumn("G1740C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C1)
            Me.columnG1740C2 = New Global.System.Data.DataColumn("G1740C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C2)
            Me.columnG1740C3 = New Global.System.Data.DataColumn("G1740C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C3)
            Me.columnG1740C4 = New Global.System.Data.DataColumn("G1740C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C4)
            Me.columnG1740C5 = New Global.System.Data.DataColumn("G1740C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C5)
            Me.columnG1740C6 = New Global.System.Data.DataColumn("G1740C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C6)
            Me.columnG1740C7 = New Global.System.Data.DataColumn("G1740C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C7)
            Me.columnG1740C8 = New Global.System.Data.DataColumn("G1740C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C8)
            Me.columnG1740C9 = New Global.System.Data.DataColumn("G1740C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C9)
            Me.columnG1740C10 = New Global.System.Data.DataColumn("G1740C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C10)
            Me.columnG1740C11 = New Global.System.Data.DataColumn("G1740C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C11)
            Me.columnG1740C12 = New Global.System.Data.DataColumn("G1740C12", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C12)
            Me.columnG1740C13 = New Global.System.Data.DataColumn("G1740C13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C13)
            Me.columnG1740C14 = New Global.System.Data.DataColumn("G1740C14", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C14)
            Me.columnG1740C15 = New Global.System.Data.DataColumn("G1740C15", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1740C15)
            Me.columnG1110C1 = New Global.System.Data.DataColumn("G1110C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1110C1)
            Me.columnNumLigne.MaxLength = 50
            Me.columnG1740C1.MaxLength = 50
            Me.columnG1740C2.MaxLength = 50
            Me.columnG1740C3.MaxLength = 50
            Me.columnG1740C4.MaxLength = 50
            Me.columnG1740C5.MaxLength = 50
            Me.columnG1740C6.MaxLength = 50
            Me.columnG1740C7.MaxLength = 50
            Me.columnG1740C8.MaxLength = 50
            Me.columnG1740C9.MaxLength = 50
            Me.columnG1740C10.MaxLength = 50
            Me.columnG1740C11.MaxLength = 50
            Me.columnG1740C12.MaxLength = 50
            Me.columnG1740C13.MaxLength = 50
            Me.columnG1740C14.MaxLength = 50
            Me.columnG1740C15.MaxLength = 50
            Me.columnG1110C1.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFacture_DétailCodeCIPRow() As Facture_DétailCodeCIPRow
            Return CType(Me.NewRow,Facture_DétailCodeCIPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Facture_DétailCodeCIPRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Facture_DétailCodeCIPRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Facture_DétailCodeCIPRowChangedEvent) Is Nothing) Then
                RaiseEvent Facture_DétailCodeCIPRowChanged(Me, New Facture_DétailCodeCIPRowChangeEvent(CType(e.Row,Facture_DétailCodeCIPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Facture_DétailCodeCIPRowChangingEvent) Is Nothing) Then
                RaiseEvent Facture_DétailCodeCIPRowChanging(Me, New Facture_DétailCodeCIPRowChangeEvent(CType(e.Row,Facture_DétailCodeCIPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Facture_DétailCodeCIPRowDeletedEvent) Is Nothing) Then
                RaiseEvent Facture_DétailCodeCIPRowDeleted(Me, New Facture_DétailCodeCIPRowChangeEvent(CType(e.Row,Facture_DétailCodeCIPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Facture_DétailCodeCIPRowDeletingEvent) Is Nothing) Then
                RaiseEvent Facture_DétailCodeCIPRowDeleting(Me, New Facture_DétailCodeCIPRowChangeEvent(CType(e.Row,Facture_DétailCodeCIPRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFacture_DétailCodeCIPRow(ByVal row As Facture_DétailCodeCIPRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Facture_DétailCodeCIPDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Facture_DétailLppDataTable
        Inherits Global.System.Data.TypedTableBase(Of Facture_DétailLppRow)
        
        Private columnNumLigne As Global.System.Data.DataColumn
        
        Private columnG1730C1 As Global.System.Data.DataColumn
        
        Private columnG1730C2 As Global.System.Data.DataColumn
        
        Private columnG1730C3 As Global.System.Data.DataColumn
        
        Private columnG1730C4 As Global.System.Data.DataColumn
        
        Private columnG1730C5 As Global.System.Data.DataColumn
        
        Private columnG1730C6 As Global.System.Data.DataColumn
        
        Private columnG1730C7 As Global.System.Data.DataColumn
        
        Private columnG1730C8 As Global.System.Data.DataColumn
        
        Private columnG1730C9 As Global.System.Data.DataColumn
        
        Private columnG1730C10 As Global.System.Data.DataColumn
        
        Private columnG1730C11 As Global.System.Data.DataColumn
        
        Private columnG1110C1 As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Facture_DétailLpp"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumLigneColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumLigne
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1730C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1730C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1110C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1110C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Facture_DétailLppRow
            Get
                Return CType(Me.Rows(index),Facture_DétailLppRow)
            End Get
        End Property
        
        Public Event Facture_DétailLppRowChanging As Facture_DétailLppRowChangeEventHandler
        
        Public Event Facture_DétailLppRowChanged As Facture_DétailLppRowChangeEventHandler
        
        Public Event Facture_DétailLppRowDeleting As Facture_DétailLppRowChangeEventHandler
        
        Public Event Facture_DétailLppRowDeleted As Facture_DétailLppRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFacture_DétailLppRow(ByVal row As Facture_DétailLppRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFacture_DétailLppRow(ByVal NumLigne As String, ByVal G1730C1 As String, ByVal G1730C2 As String, ByVal G1730C3 As String, ByVal G1730C4 As String, ByVal G1730C5 As String, ByVal G1730C6 As String, ByVal G1730C7 As String, ByVal G1730C8 As String, ByVal G1730C9 As String, ByVal G1730C10 As String, ByVal G1730C11 As String, ByVal G1110C1 As String) As Facture_DétailLppRow
            Dim rowFacture_DétailLppRow As Facture_DétailLppRow = CType(Me.NewRow,Facture_DétailLppRow)
            Dim columnValuesArray() As Object = New Object() {NumLigne, G1730C1, G1730C2, G1730C3, G1730C4, G1730C5, G1730C6, G1730C7, G1730C8, G1730C9, G1730C10, G1730C11, G1110C1}
            rowFacture_DétailLppRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFacture_DétailLppRow)
            Return rowFacture_DétailLppRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Facture_DétailLppDataTable = CType(MyBase.Clone,Facture_DétailLppDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Facture_DétailLppDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNumLigne = MyBase.Columns("NumLigne")
            Me.columnG1730C1 = MyBase.Columns("G1730C1")
            Me.columnG1730C2 = MyBase.Columns("G1730C2")
            Me.columnG1730C3 = MyBase.Columns("G1730C3")
            Me.columnG1730C4 = MyBase.Columns("G1730C4")
            Me.columnG1730C5 = MyBase.Columns("G1730C5")
            Me.columnG1730C6 = MyBase.Columns("G1730C6")
            Me.columnG1730C7 = MyBase.Columns("G1730C7")
            Me.columnG1730C8 = MyBase.Columns("G1730C8")
            Me.columnG1730C9 = MyBase.Columns("G1730C9")
            Me.columnG1730C10 = MyBase.Columns("G1730C10")
            Me.columnG1730C11 = MyBase.Columns("G1730C11")
            Me.columnG1110C1 = MyBase.Columns("G1110C1")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNumLigne = New Global.System.Data.DataColumn("NumLigne", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumLigne)
            Me.columnG1730C1 = New Global.System.Data.DataColumn("G1730C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C1)
            Me.columnG1730C2 = New Global.System.Data.DataColumn("G1730C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C2)
            Me.columnG1730C3 = New Global.System.Data.DataColumn("G1730C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C3)
            Me.columnG1730C4 = New Global.System.Data.DataColumn("G1730C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C4)
            Me.columnG1730C5 = New Global.System.Data.DataColumn("G1730C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C5)
            Me.columnG1730C6 = New Global.System.Data.DataColumn("G1730C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C6)
            Me.columnG1730C7 = New Global.System.Data.DataColumn("G1730C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C7)
            Me.columnG1730C8 = New Global.System.Data.DataColumn("G1730C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C8)
            Me.columnG1730C9 = New Global.System.Data.DataColumn("G1730C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C9)
            Me.columnG1730C10 = New Global.System.Data.DataColumn("G1730C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C10)
            Me.columnG1730C11 = New Global.System.Data.DataColumn("G1730C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1730C11)
            Me.columnG1110C1 = New Global.System.Data.DataColumn("G1110C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1110C1)
            Me.columnNumLigne.MaxLength = 50
            Me.columnG1730C1.MaxLength = 50
            Me.columnG1730C2.MaxLength = 50
            Me.columnG1730C3.MaxLength = 50
            Me.columnG1730C4.MaxLength = 50
            Me.columnG1730C5.MaxLength = 50
            Me.columnG1730C6.MaxLength = 50
            Me.columnG1730C7.MaxLength = 50
            Me.columnG1730C8.MaxLength = 50
            Me.columnG1730C9.MaxLength = 50
            Me.columnG1730C10.MaxLength = 50
            Me.columnG1730C11.MaxLength = 50
            Me.columnG1110C1.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFacture_DétailLppRow() As Facture_DétailLppRow
            Return CType(Me.NewRow,Facture_DétailLppRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Facture_DétailLppRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Facture_DétailLppRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Facture_DétailLppRowChangedEvent) Is Nothing) Then
                RaiseEvent Facture_DétailLppRowChanged(Me, New Facture_DétailLppRowChangeEvent(CType(e.Row,Facture_DétailLppRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Facture_DétailLppRowChangingEvent) Is Nothing) Then
                RaiseEvent Facture_DétailLppRowChanging(Me, New Facture_DétailLppRowChangeEvent(CType(e.Row,Facture_DétailLppRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Facture_DétailLppRowDeletedEvent) Is Nothing) Then
                RaiseEvent Facture_DétailLppRowDeleted(Me, New Facture_DétailLppRowChangeEvent(CType(e.Row,Facture_DétailLppRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Facture_DétailLppRowDeletingEvent) Is Nothing) Then
                RaiseEvent Facture_DétailLppRowDeleting(Me, New Facture_DétailLppRowChangeEvent(CType(e.Row,Facture_DétailLppRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFacture_DétailLppRow(ByVal row As Facture_DétailLppRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Facture_DétailLppDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Facture_LigneFactureDataTable
        Inherits Global.System.Data.TypedTableBase(Of Facture_LigneFactureRow)
        
        Private columnNumLigne As Global.System.Data.DataColumn
        
        Private columnG1610C1 As Global.System.Data.DataColumn
        
        Private columnG1610C2 As Global.System.Data.DataColumn
        
        Private columnG1610C3 As Global.System.Data.DataColumn
        
        Private columnG1610C4 As Global.System.Data.DataColumn
        
        Private columnG1610C5 As Global.System.Data.DataColumn
        
        Private columnG1610C6 As Global.System.Data.DataColumn
        
        Private columnG1610C7 As Global.System.Data.DataColumn
        
        Private columnG1610C8 As Global.System.Data.DataColumn
        
        Private columnG1610C9 As Global.System.Data.DataColumn
        
        Private columnG1610C10 As Global.System.Data.DataColumn
        
        Private columnG1610C11 As Global.System.Data.DataColumn
        
        Private columnG1610C12 As Global.System.Data.DataColumn
        
        Private columnG1610C13 As Global.System.Data.DataColumn
        
        Private columnG1610C14 As Global.System.Data.DataColumn
        
        Private columnG1610C15 As Global.System.Data.DataColumn
        
        Private columnG1610C16 As Global.System.Data.DataColumn
        
        Private columnG1820C2 As Global.System.Data.DataColumn
        
        Private columnG1850C2 As Global.System.Data.DataColumn
        
        Private columnG1840C2 As Global.System.Data.DataColumn
        
        Private columnG1840C3 As Global.System.Data.DataColumn
        
        Private columnG1840C4 As Global.System.Data.DataColumn
        
        Private columnG2000C2 As Global.System.Data.DataColumn
        
        Private columnG2010C2 As Global.System.Data.DataColumn
        
        Private columnG2030C2 As Global.System.Data.DataColumn
        
        Private columnG2030C3 As Global.System.Data.DataColumn
        
        Private columnG3710C2 As Global.System.Data.DataColumn
        
        Private columnG3710C3 As Global.System.Data.DataColumn
        
        Private columnG3710_Paramètes As Global.System.Data.DataColumn
        
        Private columnNum_Facture As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Facture_LigneFacture"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumLigneColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumLigne
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C5Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C5
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C6Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C6
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C8Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C8
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C9Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C9
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C10Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C10
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C11Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C11
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C12Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C12
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C14Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C14
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C15Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C15
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1610C16Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1610C16
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1820C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1820C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1850C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1850C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1840C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1840C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1840C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1840C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G1840C4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG1840C4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G2000C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG2000C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G2010C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG2010C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G2030C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG2030C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G2030C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG2030C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G3710C2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG3710C2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G3710C3Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnG3710C3
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property G3710_ParamètesColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnG3710_Paramètes
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_FactureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_Facture
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Facture_LigneFactureRow
            Get
                Return CType(Me.Rows(index),Facture_LigneFactureRow)
            End Get
        End Property
        
        Public Event Facture_LigneFactureRowChanging As Facture_LigneFactureRowChangeEventHandler
        
        Public Event Facture_LigneFactureRowChanged As Facture_LigneFactureRowChangeEventHandler
        
        Public Event Facture_LigneFactureRowDeleting As Facture_LigneFactureRowChangeEventHandler
        
        Public Event Facture_LigneFactureRowDeleted As Facture_LigneFactureRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFacture_LigneFactureRow(ByVal row As Facture_LigneFactureRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFacture_LigneFactureRow( _
                    ByVal NumLigne As String,  _
                    ByVal G1610C1 As String,  _
                    ByVal G1610C2 As String,  _
                    ByVal G1610C3 As String,  _
                    ByVal G1610C4 As String,  _
                    ByVal G1610C5 As String,  _
                    ByVal G1610C6 As String,  _
                    ByVal G1610C7 As String,  _
                    ByVal G1610C8 As String,  _
                    ByVal G1610C9 As String,  _
                    ByVal G1610C10 As String,  _
                    ByVal G1610C11 As String,  _
                    ByVal G1610C12 As String,  _
                    ByVal G1610C13 As String,  _
                    ByVal G1610C14 As String,  _
                    ByVal G1610C15 As String,  _
                    ByVal G1610C16 As String,  _
                    ByVal G1820C2 As String,  _
                    ByVal G1850C2 As String,  _
                    ByVal G1840C2 As String,  _
                    ByVal G1840C3 As String,  _
                    ByVal G1840C4 As String,  _
                    ByVal G2000C2 As String,  _
                    ByVal G2010C2 As String,  _
                    ByVal G2030C2 As String,  _
                    ByVal G2030C3 As String,  _
                    ByVal G3710C2 As String,  _
                    ByVal G3710C3 As String,  _
                    ByVal G3710_Paramètes As String,  _
                    ByVal Num_Facture As String) As Facture_LigneFactureRow
            Dim rowFacture_LigneFactureRow As Facture_LigneFactureRow = CType(Me.NewRow,Facture_LigneFactureRow)
            Dim columnValuesArray() As Object = New Object() {NumLigne, G1610C1, G1610C2, G1610C3, G1610C4, G1610C5, G1610C6, G1610C7, G1610C8, G1610C9, G1610C10, G1610C11, G1610C12, G1610C13, G1610C14, G1610C15, G1610C16, G1820C2, G1850C2, G1840C2, G1840C3, G1840C4, G2000C2, G2010C2, G2030C2, G2030C3, G3710C2, G3710C3, G3710_Paramètes, Num_Facture}
            rowFacture_LigneFactureRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFacture_LigneFactureRow)
            Return rowFacture_LigneFactureRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Facture_LigneFactureDataTable = CType(MyBase.Clone,Facture_LigneFactureDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Facture_LigneFactureDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNumLigne = MyBase.Columns("NumLigne")
            Me.columnG1610C1 = MyBase.Columns("G1610C1")
            Me.columnG1610C2 = MyBase.Columns("G1610C2")
            Me.columnG1610C3 = MyBase.Columns("G1610C3")
            Me.columnG1610C4 = MyBase.Columns("G1610C4")
            Me.columnG1610C5 = MyBase.Columns("G1610C5")
            Me.columnG1610C6 = MyBase.Columns("G1610C6")
            Me.columnG1610C7 = MyBase.Columns("G1610C7")
            Me.columnG1610C8 = MyBase.Columns("G1610C8")
            Me.columnG1610C9 = MyBase.Columns("G1610C9")
            Me.columnG1610C10 = MyBase.Columns("G1610C10")
            Me.columnG1610C11 = MyBase.Columns("G1610C11")
            Me.columnG1610C12 = MyBase.Columns("G1610C12")
            Me.columnG1610C13 = MyBase.Columns("G1610C13")
            Me.columnG1610C14 = MyBase.Columns("G1610C14")
            Me.columnG1610C15 = MyBase.Columns("G1610C15")
            Me.columnG1610C16 = MyBase.Columns("G1610C16")
            Me.columnG1820C2 = MyBase.Columns("G1820C2")
            Me.columnG1850C2 = MyBase.Columns("G1850C2")
            Me.columnG1840C2 = MyBase.Columns("G1840C2")
            Me.columnG1840C3 = MyBase.Columns("G1840C3")
            Me.columnG1840C4 = MyBase.Columns("G1840C4")
            Me.columnG2000C2 = MyBase.Columns("G2000C2")
            Me.columnG2010C2 = MyBase.Columns("G2010C2")
            Me.columnG2030C2 = MyBase.Columns("G2030C2")
            Me.columnG2030C3 = MyBase.Columns("G2030C3")
            Me.columnG3710C2 = MyBase.Columns("G3710C2")
            Me.columnG3710C3 = MyBase.Columns("G3710C3")
            Me.columnG3710_Paramètes = MyBase.Columns("G3710_Paramètes")
            Me.columnNum_Facture = MyBase.Columns("Num_Facture")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNumLigne = New Global.System.Data.DataColumn("NumLigne", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumLigne)
            Me.columnG1610C1 = New Global.System.Data.DataColumn("G1610C1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C1)
            Me.columnG1610C2 = New Global.System.Data.DataColumn("G1610C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C2)
            Me.columnG1610C3 = New Global.System.Data.DataColumn("G1610C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C3)
            Me.columnG1610C4 = New Global.System.Data.DataColumn("G1610C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C4)
            Me.columnG1610C5 = New Global.System.Data.DataColumn("G1610C5", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C5)
            Me.columnG1610C6 = New Global.System.Data.DataColumn("G1610C6", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C6)
            Me.columnG1610C7 = New Global.System.Data.DataColumn("G1610C7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C7)
            Me.columnG1610C8 = New Global.System.Data.DataColumn("G1610C8", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C8)
            Me.columnG1610C9 = New Global.System.Data.DataColumn("G1610C9", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C9)
            Me.columnG1610C10 = New Global.System.Data.DataColumn("G1610C10", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C10)
            Me.columnG1610C11 = New Global.System.Data.DataColumn("G1610C11", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C11)
            Me.columnG1610C12 = New Global.System.Data.DataColumn("G1610C12", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C12)
            Me.columnG1610C13 = New Global.System.Data.DataColumn("G1610C13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C13)
            Me.columnG1610C14 = New Global.System.Data.DataColumn("G1610C14", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C14)
            Me.columnG1610C15 = New Global.System.Data.DataColumn("G1610C15", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C15)
            Me.columnG1610C16 = New Global.System.Data.DataColumn("G1610C16", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1610C16)
            Me.columnG1820C2 = New Global.System.Data.DataColumn("G1820C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1820C2)
            Me.columnG1850C2 = New Global.System.Data.DataColumn("G1850C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1850C2)
            Me.columnG1840C2 = New Global.System.Data.DataColumn("G1840C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1840C2)
            Me.columnG1840C3 = New Global.System.Data.DataColumn("G1840C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1840C3)
            Me.columnG1840C4 = New Global.System.Data.DataColumn("G1840C4", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG1840C4)
            Me.columnG2000C2 = New Global.System.Data.DataColumn("G2000C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG2000C2)
            Me.columnG2010C2 = New Global.System.Data.DataColumn("G2010C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG2010C2)
            Me.columnG2030C2 = New Global.System.Data.DataColumn("G2030C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG2030C2)
            Me.columnG2030C3 = New Global.System.Data.DataColumn("G2030C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG2030C3)
            Me.columnG3710C2 = New Global.System.Data.DataColumn("G3710C2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG3710C2)
            Me.columnG3710C3 = New Global.System.Data.DataColumn("G3710C3", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG3710C3)
            Me.columnG3710_Paramètes = New Global.System.Data.DataColumn("G3710_Paramètes", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnG3710_Paramètes)
            Me.columnNum_Facture = New Global.System.Data.DataColumn("Num_Facture", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_Facture)
            Me.columnNumLigne.MaxLength = 50
            Me.columnG1610C1.MaxLength = 50
            Me.columnG1610C2.MaxLength = 50
            Me.columnG1610C3.MaxLength = 50
            Me.columnG1610C4.MaxLength = 50
            Me.columnG1610C5.MaxLength = 50
            Me.columnG1610C6.MaxLength = 50
            Me.columnG1610C7.MaxLength = 50
            Me.columnG1610C8.MaxLength = 50
            Me.columnG1610C9.MaxLength = 50
            Me.columnG1610C10.MaxLength = 50
            Me.columnG1610C11.MaxLength = 50
            Me.columnG1610C12.MaxLength = 50
            Me.columnG1610C13.MaxLength = 50
            Me.columnG1610C14.MaxLength = 50
            Me.columnG1610C15.MaxLength = 50
            Me.columnG1610C16.MaxLength = 50
            Me.columnG1820C2.MaxLength = 1
            Me.columnG1850C2.MaxLength = 2
            Me.columnG1840C2.MaxLength = 1
            Me.columnG1840C3.MaxLength = 12
            Me.columnG1840C4.MaxLength = 15
            Me.columnG2000C2.MaxLength = 1
            Me.columnG2010C2.MaxLength = 1
            Me.columnG2030C2.MaxLength = 1
            Me.columnG2030C3.MaxLength = 2
            Me.columnG3710C2.MaxLength = 3
            Me.columnG3710C3.MaxLength = 2
            Me.columnG3710_Paramètes.MaxLength = 2147483647
            Me.columnNum_Facture.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFacture_LigneFactureRow() As Facture_LigneFactureRow
            Return CType(Me.NewRow,Facture_LigneFactureRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Facture_LigneFactureRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Facture_LigneFactureRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Facture_LigneFactureRowChangedEvent) Is Nothing) Then
                RaiseEvent Facture_LigneFactureRowChanged(Me, New Facture_LigneFactureRowChangeEvent(CType(e.Row,Facture_LigneFactureRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Facture_LigneFactureRowChangingEvent) Is Nothing) Then
                RaiseEvent Facture_LigneFactureRowChanging(Me, New Facture_LigneFactureRowChangeEvent(CType(e.Row,Facture_LigneFactureRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Facture_LigneFactureRowDeletedEvent) Is Nothing) Then
                RaiseEvent Facture_LigneFactureRowDeleted(Me, New Facture_LigneFactureRowChangeEvent(CType(e.Row,Facture_LigneFactureRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Facture_LigneFactureRowDeletingEvent) Is Nothing) Then
                RaiseEvent Facture_LigneFactureRowDeleting(Me, New Facture_LigneFactureRowChangeEvent(CType(e.Row,Facture_LigneFactureRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFacture_LigneFactureRow(ByVal row As Facture_LigneFactureRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Facture_LigneFactureDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class _AMC__Organismes_Contrat_Type_DataTable
        Inherits Global.System.Data.TypedTableBase(Of _AMC__Organismes_Contrat_Type_Row)
        
        Private columnNumAMC As Global.System.Data.DataColumn
        
        Private columnId_Contrat_Type As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "AMC_(Organismes/Contrat_Type)"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumAMCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumAMC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Id_Contrat_TypeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnId_Contrat_Type
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As _AMC__Organismes_Contrat_Type_Row
            Get
                Return CType(Me.Rows(index),_AMC__Organismes_Contrat_Type_Row)
            End Get
        End Property
        
        Public Event _AMC__Organismes_Contrat_Type_RowChanging As _AMC__Organismes_Contrat_Type_RowChangeEventHandler
        
        Public Event _AMC__Organismes_Contrat_Type_RowChanged As _AMC__Organismes_Contrat_Type_RowChangeEventHandler
        
        Public Event _AMC__Organismes_Contrat_Type_RowDeleting As _AMC__Organismes_Contrat_Type_RowChangeEventHandler
        
        Public Event _AMC__Organismes_Contrat_Type_RowDeleted As _AMC__Organismes_Contrat_Type_RowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub Add_AMC__Organismes_Contrat_Type_Row(ByVal row As _AMC__Organismes_Contrat_Type_Row)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function Add_AMC__Organismes_Contrat_Type_Row(ByVal NumAMC As String, ByVal Id_Contrat_Type As String) As _AMC__Organismes_Contrat_Type_Row
            Dim row_AMC__Organismes_Contrat_Type_Row As _AMC__Organismes_Contrat_Type_Row = CType(Me.NewRow,_AMC__Organismes_Contrat_Type_Row)
            Dim columnValuesArray() As Object = New Object() {NumAMC, Id_Contrat_Type}
            row_AMC__Organismes_Contrat_Type_Row.ItemArray = columnValuesArray
            Me.Rows.Add(row_AMC__Organismes_Contrat_Type_Row)
            Return row_AMC__Organismes_Contrat_Type_Row
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As _AMC__Organismes_Contrat_Type_DataTable = CType(MyBase.Clone,_AMC__Organismes_Contrat_Type_DataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New _AMC__Organismes_Contrat_Type_DataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNumAMC = MyBase.Columns("NumAMC")
            Me.columnId_Contrat_Type = MyBase.Columns("Id_Contrat_Type")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNumAMC = New Global.System.Data.DataColumn("NumAMC", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumAMC)
            Me.columnId_Contrat_Type = New Global.System.Data.DataColumn("Id_Contrat_Type", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnId_Contrat_Type)
            Me.columnNumAMC.MaxLength = 50
            Me.columnId_Contrat_Type.MaxLength = 50
            Me.ExtendedProperties.Add("Generator_TableVarName", "_tableAMC__Organismes_Contrat_Type_")
            Me.ExtendedProperties.Add("Generator_UserTableName", "AMC_(Organismes/Contrat_Type)")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function New_AMC__Organismes_Contrat_Type_Row() As _AMC__Organismes_Contrat_Type_Row
            Return CType(Me.NewRow,_AMC__Organismes_Contrat_Type_Row)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New _AMC__Organismes_Contrat_Type_Row(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(_AMC__Organismes_Contrat_Type_Row)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me._AMC__Organismes_Contrat_Type_RowChangedEvent) Is Nothing) Then
                RaiseEvent _AMC__Organismes_Contrat_Type_RowChanged(Me, New _AMC__Organismes_Contrat_Type_RowChangeEvent(CType(e.Row,_AMC__Organismes_Contrat_Type_Row), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me._AMC__Organismes_Contrat_Type_RowChangingEvent) Is Nothing) Then
                RaiseEvent _AMC__Organismes_Contrat_Type_RowChanging(Me, New _AMC__Organismes_Contrat_Type_RowChangeEvent(CType(e.Row,_AMC__Organismes_Contrat_Type_Row), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me._AMC__Organismes_Contrat_Type_RowDeletedEvent) Is Nothing) Then
                RaiseEvent _AMC__Organismes_Contrat_Type_RowDeleted(Me, New _AMC__Organismes_Contrat_Type_RowChangeEvent(CType(e.Row,_AMC__Organismes_Contrat_Type_Row), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me._AMC__Organismes_Contrat_Type_RowDeletingEvent) Is Nothing) Then
                RaiseEvent _AMC__Organismes_Contrat_Type_RowDeleting(Me, New _AMC__Organismes_Contrat_Type_RowChangeEvent(CType(e.Row,_AMC__Organismes_Contrat_Type_Row), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Remove_AMC__Organismes_Contrat_Type_Row(ByVal row As _AMC__Organismes_Contrat_Type_Row)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "_AMC__Organismes_Contrat_Type_DataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class AMC_Contrat_TypeDataTable
        Inherits Global.System.Data.TypedTableBase(Of AMC_Contrat_TypeRow)
        
        Private columnId As Global.System.Data.DataColumn
        
        Private columnIntitulé As Global.System.Data.DataColumn
        
        Private columnAAD As Global.System.Data.DataColumn
        
        Private columnAAR As Global.System.Data.DataColumn
        
        Private columnARO As Global.System.Data.DataColumn
        
        Private columnB As Global.System.Data.DataColumn
        
        Private columnCPH As Global.System.Data.DataColumn
        
        Private columnMAC As Global.System.Data.DataColumn
        
        Private columnMAD As Global.System.Data.DataColumn
        
        Private columnMHU As Global.System.Data.DataColumn
        
        Private columnMPI As Global.System.Data.DataColumn
        
        Private columnPA As Global.System.Data.DataColumn
        
        Private columnPAN As Global.System.Data.DataColumn
        
        Private columnPDM As Global.System.Data.DataColumn
        
        Private columnPG7 As Global.System.Data.DataColumn
        
        Private columnPH1 As Global.System.Data.DataColumn
        
        Private columnPH2 As Global.System.Data.DataColumn
        
        Private columnPH4 As Global.System.Data.DataColumn
        
        Private columnPH7 As Global.System.Data.DataColumn
        
        Private columnPHA As Global.System.Data.DataColumn
        
        Private columnPHN As Global.System.Data.DataColumn
        
        Private columnPII As Global.System.Data.DataColumn
        
        Private columnPM2 As Global.System.Data.DataColumn
        
        Private columnPM4 As Global.System.Data.DataColumn
        
        Private columnPMR As Global.System.Data.DataColumn
        
        Private columnSNG As Global.System.Data.DataColumn
        
        Private columnUPH As Global.System.Data.DataColumn
        
        Private columnCOR As Global.System.Data.DataColumn
        
        Private columnGLU As Global.System.Data.DataColumn
        
        Private columnLEN As Global.System.Data.DataColumn
        
        Private columnLUN As Global.System.Data.DataColumn
        
        Private columnOPT As Global.System.Data.DataColumn
        
        Private columnORP As Global.System.Data.DataColumn
        
        Private columnPAU As Global.System.Data.DataColumn
        
        Private columnPEX As Global.System.Data.DataColumn
        
        Private columnPOC As Global.System.Data.DataColumn
        
        Private columnTNS As Global.System.Data.DataColumn
        
        Private columnVEH As Global.System.Data.DataColumn
        
        Private columnVER As Global.System.Data.DataColumn
        
        Private columnATL As Global.System.Data.DataColumn
        
        Private columnDPS As Global.System.Data.DataColumn
        
        Private columnDVO As Global.System.Data.DataColumn
        
        Private columnKGP As Global.System.Data.DataColumn
        
        Private columnPMH As Global.System.Data.DataColumn
        
        Private columnSGN As Global.System.Data.DataColumn
        
        Private columnSGS As Global.System.Data.DataColumn
        
        Private columnPPI As Global.System.Data.DataColumn
        
        Private columnTop_CMU As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "AMC_Contrat_Type"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IdColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnId
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IntituléColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIntitulé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AADColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAAD
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AARColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAAR
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AROColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnARO
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property BColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnB
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CPHColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCPH
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MACColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMAC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MADColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMAD
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MHUColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMHU
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MPIColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMPI
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PAColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPA
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PANColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPAN
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PDMColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPDM
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PG7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPG7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PH1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPH1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PH2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPH2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PH4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPH4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PH7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPH7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PHAColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPHA
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PHNColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPHN
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PIIColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPII
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PM2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPM2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PM4Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnPM4
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PMRColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPMR
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SNGColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSNG
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property UPHColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnUPH
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CORColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCOR
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property GLUColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnGLU
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LENColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLEN
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LUNColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLUN
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property OPTColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnOPT
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ORPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnORP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PAUColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPAU
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PEXColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPEX
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property POCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPOC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TNSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTNS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property VEHColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnVEH
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property VERColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnVER
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ATLColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnATL
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DPSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDPS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DVOColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDVO
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property KGPColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnKGP
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PMHColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPMH
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SGNColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSGN
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SGSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSGS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PPIColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPPI
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Top_CMUColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTop_CMU
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As AMC_Contrat_TypeRow
            Get
                Return CType(Me.Rows(index),AMC_Contrat_TypeRow)
            End Get
        End Property
        
        Public Event AMC_Contrat_TypeRowChanging As AMC_Contrat_TypeRowChangeEventHandler
        
        Public Event AMC_Contrat_TypeRowChanged As AMC_Contrat_TypeRowChangeEventHandler
        
        Public Event AMC_Contrat_TypeRowDeleting As AMC_Contrat_TypeRowChangeEventHandler
        
        Public Event AMC_Contrat_TypeRowDeleted As AMC_Contrat_TypeRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddAMC_Contrat_TypeRow(ByVal row As AMC_Contrat_TypeRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddAMC_Contrat_TypeRow( _
                    ByVal Id As String,  _
                    ByVal Intitulé As String,  _
                    ByVal AAD As Decimal,  _
                    ByVal AAR As Decimal,  _
                    ByVal ARO As Decimal,  _
                    ByVal B As Decimal,  _
                    ByVal CPH As Decimal,  _
                    ByVal MAC As Decimal,  _
                    ByVal MAD As Decimal,  _
                    ByVal MHU As Decimal,  _
                    ByVal MPI As Decimal,  _
                    ByVal PA As Decimal,  _
                    ByVal PAN As Decimal,  _
                    ByVal PDM As Decimal,  _
                    ByVal PG7 As Decimal,  _
                    ByVal PH1 As Decimal,  _
                    ByVal PH2 As Decimal,  _
                    ByVal PH4 As Decimal,  _
                    ByVal PH7 As Decimal,  _
                    ByVal PHA As Decimal,  _
                    ByVal PHN As Decimal,  _
                    ByVal PII As Decimal,  _
                    ByVal PM2 As Decimal,  _
                    ByVal PM4 As Decimal,  _
                    ByVal PMR As Decimal,  _
                    ByVal SNG As Decimal,  _
                    ByVal UPH As Decimal,  _
                    ByVal COR As Decimal,  _
                    ByVal GLU As Decimal,  _
                    ByVal LEN As Decimal,  _
                    ByVal LUN As Decimal,  _
                    ByVal OPT As Decimal,  _
                    ByVal ORP As Decimal,  _
                    ByVal PAU As Decimal,  _
                    ByVal PEX As Decimal,  _
                    ByVal POC As Decimal,  _
                    ByVal TNS As Decimal,  _
                    ByVal VEH As Decimal,  _
                    ByVal VER As Decimal,  _
                    ByVal ATL As Decimal,  _
                    ByVal DPS As Decimal,  _
                    ByVal DVO As Decimal,  _
                    ByVal KGP As Decimal,  _
                    ByVal PMH As Decimal,  _
                    ByVal SGN As Decimal,  _
                    ByVal SGS As Decimal,  _
                    ByVal PPI As Decimal,  _
                    ByVal Top_CMU As String) As AMC_Contrat_TypeRow
            Dim rowAMC_Contrat_TypeRow As AMC_Contrat_TypeRow = CType(Me.NewRow,AMC_Contrat_TypeRow)
            Dim columnValuesArray() As Object = New Object() {Id, Intitulé, AAD, AAR, ARO, B, CPH, MAC, MAD, MHU, MPI, PA, PAN, PDM, PG7, PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM4, PMR, SNG, UPH, COR, GLU, LEN, LUN, OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, ATL, DPS, DVO, KGP, PMH, SGN, SGS, PPI, Top_CMU}
            rowAMC_Contrat_TypeRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowAMC_Contrat_TypeRow)
            Return rowAMC_Contrat_TypeRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindById(ByVal Id As String) As AMC_Contrat_TypeRow
            Return CType(Me.Rows.Find(New Object() {Id}),AMC_Contrat_TypeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As AMC_Contrat_TypeDataTable = CType(MyBase.Clone,AMC_Contrat_TypeDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New AMC_Contrat_TypeDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnId = MyBase.Columns("Id")
            Me.columnIntitulé = MyBase.Columns("Intitulé")
            Me.columnAAD = MyBase.Columns("AAD")
            Me.columnAAR = MyBase.Columns("AAR")
            Me.columnARO = MyBase.Columns("ARO")
            Me.columnB = MyBase.Columns("B")
            Me.columnCPH = MyBase.Columns("CPH")
            Me.columnMAC = MyBase.Columns("MAC")
            Me.columnMAD = MyBase.Columns("MAD")
            Me.columnMHU = MyBase.Columns("MHU")
            Me.columnMPI = MyBase.Columns("MPI")
            Me.columnPA = MyBase.Columns("PA")
            Me.columnPAN = MyBase.Columns("PAN")
            Me.columnPDM = MyBase.Columns("PDM")
            Me.columnPG7 = MyBase.Columns("PG7")
            Me.columnPH1 = MyBase.Columns("PH1")
            Me.columnPH2 = MyBase.Columns("PH2")
            Me.columnPH4 = MyBase.Columns("PH4")
            Me.columnPH7 = MyBase.Columns("PH7")
            Me.columnPHA = MyBase.Columns("PHA")
            Me.columnPHN = MyBase.Columns("PHN")
            Me.columnPII = MyBase.Columns("PII")
            Me.columnPM2 = MyBase.Columns("PM2")
            Me.columnPM4 = MyBase.Columns("PM4")
            Me.columnPMR = MyBase.Columns("PMR")
            Me.columnSNG = MyBase.Columns("SNG")
            Me.columnUPH = MyBase.Columns("UPH")
            Me.columnCOR = MyBase.Columns("COR")
            Me.columnGLU = MyBase.Columns("GLU")
            Me.columnLEN = MyBase.Columns("LEN")
            Me.columnLUN = MyBase.Columns("LUN")
            Me.columnOPT = MyBase.Columns("OPT")
            Me.columnORP = MyBase.Columns("ORP")
            Me.columnPAU = MyBase.Columns("PAU")
            Me.columnPEX = MyBase.Columns("PEX")
            Me.columnPOC = MyBase.Columns("POC")
            Me.columnTNS = MyBase.Columns("TNS")
            Me.columnVEH = MyBase.Columns("VEH")
            Me.columnVER = MyBase.Columns("VER")
            Me.columnATL = MyBase.Columns("ATL")
            Me.columnDPS = MyBase.Columns("DPS")
            Me.columnDVO = MyBase.Columns("DVO")
            Me.columnKGP = MyBase.Columns("KGP")
            Me.columnPMH = MyBase.Columns("PMH")
            Me.columnSGN = MyBase.Columns("SGN")
            Me.columnSGS = MyBase.Columns("SGS")
            Me.columnPPI = MyBase.Columns("PPI")
            Me.columnTop_CMU = MyBase.Columns("Top_CMU")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnId = New Global.System.Data.DataColumn("Id", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnId)
            Me.columnIntitulé = New Global.System.Data.DataColumn("Intitulé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIntitulé)
            Me.columnAAD = New Global.System.Data.DataColumn("AAD", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAAD)
            Me.columnAAR = New Global.System.Data.DataColumn("AAR", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAAR)
            Me.columnARO = New Global.System.Data.DataColumn("ARO", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnARO)
            Me.columnB = New Global.System.Data.DataColumn("B", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnB)
            Me.columnCPH = New Global.System.Data.DataColumn("CPH", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCPH)
            Me.columnMAC = New Global.System.Data.DataColumn("MAC", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMAC)
            Me.columnMAD = New Global.System.Data.DataColumn("MAD", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMAD)
            Me.columnMHU = New Global.System.Data.DataColumn("MHU", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMHU)
            Me.columnMPI = New Global.System.Data.DataColumn("MPI", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMPI)
            Me.columnPA = New Global.System.Data.DataColumn("PA", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPA)
            Me.columnPAN = New Global.System.Data.DataColumn("PAN", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPAN)
            Me.columnPDM = New Global.System.Data.DataColumn("PDM", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPDM)
            Me.columnPG7 = New Global.System.Data.DataColumn("PG7", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPG7)
            Me.columnPH1 = New Global.System.Data.DataColumn("PH1", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPH1)
            Me.columnPH2 = New Global.System.Data.DataColumn("PH2", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPH2)
            Me.columnPH4 = New Global.System.Data.DataColumn("PH4", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPH4)
            Me.columnPH7 = New Global.System.Data.DataColumn("PH7", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPH7)
            Me.columnPHA = New Global.System.Data.DataColumn("PHA", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPHA)
            Me.columnPHN = New Global.System.Data.DataColumn("PHN", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPHN)
            Me.columnPII = New Global.System.Data.DataColumn("PII", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPII)
            Me.columnPM2 = New Global.System.Data.DataColumn("PM2", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPM2)
            Me.columnPM4 = New Global.System.Data.DataColumn("PM4", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPM4)
            Me.columnPMR = New Global.System.Data.DataColumn("PMR", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPMR)
            Me.columnSNG = New Global.System.Data.DataColumn("SNG", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSNG)
            Me.columnUPH = New Global.System.Data.DataColumn("UPH", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnUPH)
            Me.columnCOR = New Global.System.Data.DataColumn("COR", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCOR)
            Me.columnGLU = New Global.System.Data.DataColumn("GLU", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnGLU)
            Me.columnLEN = New Global.System.Data.DataColumn("LEN", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLEN)
            Me.columnLUN = New Global.System.Data.DataColumn("LUN", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLUN)
            Me.columnOPT = New Global.System.Data.DataColumn("OPT", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnOPT)
            Me.columnORP = New Global.System.Data.DataColumn("ORP", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnORP)
            Me.columnPAU = New Global.System.Data.DataColumn("PAU", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPAU)
            Me.columnPEX = New Global.System.Data.DataColumn("PEX", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPEX)
            Me.columnPOC = New Global.System.Data.DataColumn("POC", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPOC)
            Me.columnTNS = New Global.System.Data.DataColumn("TNS", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTNS)
            Me.columnVEH = New Global.System.Data.DataColumn("VEH", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnVEH)
            Me.columnVER = New Global.System.Data.DataColumn("VER", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnVER)
            Me.columnATL = New Global.System.Data.DataColumn("ATL", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnATL)
            Me.columnDPS = New Global.System.Data.DataColumn("DPS", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDPS)
            Me.columnDVO = New Global.System.Data.DataColumn("DVO", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDVO)
            Me.columnKGP = New Global.System.Data.DataColumn("KGP", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnKGP)
            Me.columnPMH = New Global.System.Data.DataColumn("PMH", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPMH)
            Me.columnSGN = New Global.System.Data.DataColumn("SGN", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSGN)
            Me.columnSGS = New Global.System.Data.DataColumn("SGS", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSGS)
            Me.columnPPI = New Global.System.Data.DataColumn("PPI", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPPI)
            Me.columnTop_CMU = New Global.System.Data.DataColumn("Top_CMU", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTop_CMU)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnId}, true))
            Me.columnId.AllowDBNull = false
            Me.columnId.Unique = true
            Me.columnIntitulé.MaxLength = 2147483647
            Me.columnTop_CMU.MaxLength = 1
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewAMC_Contrat_TypeRow() As AMC_Contrat_TypeRow
            Return CType(Me.NewRow,AMC_Contrat_TypeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New AMC_Contrat_TypeRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(AMC_Contrat_TypeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.AMC_Contrat_TypeRowChangedEvent) Is Nothing) Then
                RaiseEvent AMC_Contrat_TypeRowChanged(Me, New AMC_Contrat_TypeRowChangeEvent(CType(e.Row,AMC_Contrat_TypeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.AMC_Contrat_TypeRowChangingEvent) Is Nothing) Then
                RaiseEvent AMC_Contrat_TypeRowChanging(Me, New AMC_Contrat_TypeRowChangeEvent(CType(e.Row,AMC_Contrat_TypeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.AMC_Contrat_TypeRowDeletedEvent) Is Nothing) Then
                RaiseEvent AMC_Contrat_TypeRowDeleted(Me, New AMC_Contrat_TypeRowChangeEvent(CType(e.Row,AMC_Contrat_TypeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.AMC_Contrat_TypeRowDeletingEvent) Is Nothing) Then
                RaiseEvent AMC_Contrat_TypeRowDeleting(Me, New AMC_Contrat_TypeRowChangeEvent(CType(e.Row,AMC_Contrat_TypeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveAMC_Contrat_TypeRow(ByVal row As AMC_Contrat_TypeRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "AMC_Contrat_TypeDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class AMC_OrganismesDataTable
        Inherits Global.System.Data.TypedTableBase(Of AMC_OrganismesRow)
        
        Private columnNum As Global.System.Data.DataColumn
        
        Private columnIntitulé As Global.System.Data.DataColumn
        
        Private columnAdresse As Global.System.Data.DataColumn
        
        Private columnTelephone As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "AMC_Organismes"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IntituléColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIntitulé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AdresseColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAdresse
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TelephoneColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTelephone
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As AMC_OrganismesRow
            Get
                Return CType(Me.Rows(index),AMC_OrganismesRow)
            End Get
        End Property
        
        Public Event AMC_OrganismesRowChanging As AMC_OrganismesRowChangeEventHandler
        
        Public Event AMC_OrganismesRowChanged As AMC_OrganismesRowChangeEventHandler
        
        Public Event AMC_OrganismesRowDeleting As AMC_OrganismesRowChangeEventHandler
        
        Public Event AMC_OrganismesRowDeleted As AMC_OrganismesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddAMC_OrganismesRow(ByVal row As AMC_OrganismesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddAMC_OrganismesRow(ByVal Num As String, ByVal Intitulé As String, ByVal Adresse As String, ByVal Telephone As String) As AMC_OrganismesRow
            Dim rowAMC_OrganismesRow As AMC_OrganismesRow = CType(Me.NewRow,AMC_OrganismesRow)
            Dim columnValuesArray() As Object = New Object() {Num, Intitulé, Adresse, Telephone}
            rowAMC_OrganismesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowAMC_OrganismesRow)
            Return rowAMC_OrganismesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As AMC_OrganismesDataTable = CType(MyBase.Clone,AMC_OrganismesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New AMC_OrganismesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNum = MyBase.Columns("Num")
            Me.columnIntitulé = MyBase.Columns("Intitulé")
            Me.columnAdresse = MyBase.Columns("Adresse")
            Me.columnTelephone = MyBase.Columns("Telephone")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNum = New Global.System.Data.DataColumn("Num", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum)
            Me.columnIntitulé = New Global.System.Data.DataColumn("Intitulé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIntitulé)
            Me.columnAdresse = New Global.System.Data.DataColumn("Adresse", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAdresse)
            Me.columnTelephone = New Global.System.Data.DataColumn("Telephone", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTelephone)
            Me.columnNum.MaxLength = 1024
            Me.columnIntitulé.MaxLength = 1024
            Me.columnAdresse.MaxLength = 1024
            Me.columnTelephone.MaxLength = 1024
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewAMC_OrganismesRow() As AMC_OrganismesRow
            Return CType(Me.NewRow,AMC_OrganismesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New AMC_OrganismesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(AMC_OrganismesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.AMC_OrganismesRowChangedEvent) Is Nothing) Then
                RaiseEvent AMC_OrganismesRowChanged(Me, New AMC_OrganismesRowChangeEvent(CType(e.Row,AMC_OrganismesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.AMC_OrganismesRowChangingEvent) Is Nothing) Then
                RaiseEvent AMC_OrganismesRowChanging(Me, New AMC_OrganismesRowChangeEvent(CType(e.Row,AMC_OrganismesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.AMC_OrganismesRowDeletedEvent) Is Nothing) Then
                RaiseEvent AMC_OrganismesRowDeleted(Me, New AMC_OrganismesRowChangeEvent(CType(e.Row,AMC_OrganismesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.AMC_OrganismesRowDeletingEvent) Is Nothing) Then
                RaiseEvent AMC_OrganismesRowDeleting(Me, New AMC_OrganismesRowChangeEvent(CType(e.Row,AMC_OrganismesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveAMC_OrganismesRow(ByVal row As AMC_OrganismesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "AMC_OrganismesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class CodePrestationsDataTable
        Inherits Global.System.Data.TypedTableBase(Of CodePrestationsRow)
        
        Private columnCode As Global.System.Data.DataColumn
        
        Private columnSignification As Global.System.Data.DataColumn
        
        Private columnTypeNomenclature As Global.System.Data.DataColumn
        
        Private columnCompatiblePharma As Global.System.Data.DataColumn
        
        Private columnCompatibleTable1 As Global.System.Data.DataColumn
        
        Private columnTop_Codage_Affiné As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "CodePrestations"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCode
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SignificationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSignification
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TypeNomenclatureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTypeNomenclature
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CompatiblePharmaColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCompatiblePharma
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CompatibleTable1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnCompatibleTable1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Top_Codage_AffinéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTop_Codage_Affiné
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As CodePrestationsRow
            Get
                Return CType(Me.Rows(index),CodePrestationsRow)
            End Get
        End Property
        
        Public Event CodePrestationsRowChanging As CodePrestationsRowChangeEventHandler
        
        Public Event CodePrestationsRowChanged As CodePrestationsRowChangeEventHandler
        
        Public Event CodePrestationsRowDeleting As CodePrestationsRowChangeEventHandler
        
        Public Event CodePrestationsRowDeleted As CodePrestationsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddCodePrestationsRow(ByVal row As CodePrestationsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddCodePrestationsRow(ByVal Code As String, ByVal Signification As String, ByVal TypeNomenclature As String, ByVal CompatiblePharma As Boolean, ByVal CompatibleTable1 As Boolean, ByVal Top_Codage_Affiné As Boolean) As CodePrestationsRow
            Dim rowCodePrestationsRow As CodePrestationsRow = CType(Me.NewRow,CodePrestationsRow)
            Dim columnValuesArray() As Object = New Object() {Code, Signification, TypeNomenclature, CompatiblePharma, CompatibleTable1, Top_Codage_Affiné}
            rowCodePrestationsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowCodePrestationsRow)
            Return rowCodePrestationsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByCode(ByVal Code As String) As CodePrestationsRow
            Return CType(Me.Rows.Find(New Object() {Code}),CodePrestationsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As CodePrestationsDataTable = CType(MyBase.Clone,CodePrestationsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New CodePrestationsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCode = MyBase.Columns("Code")
            Me.columnSignification = MyBase.Columns("Signification")
            Me.columnTypeNomenclature = MyBase.Columns("TypeNomenclature")
            Me.columnCompatiblePharma = MyBase.Columns("CompatiblePharma")
            Me.columnCompatibleTable1 = MyBase.Columns("CompatibleTable1")
            Me.columnTop_Codage_Affiné = MyBase.Columns("Top_Codage_Affiné")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCode = New Global.System.Data.DataColumn("Code", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCode)
            Me.columnSignification = New Global.System.Data.DataColumn("Signification", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSignification)
            Me.columnTypeNomenclature = New Global.System.Data.DataColumn("TypeNomenclature", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTypeNomenclature)
            Me.columnCompatiblePharma = New Global.System.Data.DataColumn("CompatiblePharma", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCompatiblePharma)
            Me.columnCompatibleTable1 = New Global.System.Data.DataColumn("CompatibleTable1", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCompatibleTable1)
            Me.columnTop_Codage_Affiné = New Global.System.Data.DataColumn("Top_Codage_Affiné", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTop_Codage_Affiné)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnCode}, true))
            Me.columnCode.AllowDBNull = false
            Me.columnCode.Unique = true
            Me.columnCode.MaxLength = 50
            Me.columnSignification.MaxLength = 2147483647
            Me.columnTypeNomenclature.MaxLength = 50
            Me.columnCompatibleTable1.AllowDBNull = false
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewCodePrestationsRow() As CodePrestationsRow
            Return CType(Me.NewRow,CodePrestationsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New CodePrestationsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(CodePrestationsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.CodePrestationsRowChangedEvent) Is Nothing) Then
                RaiseEvent CodePrestationsRowChanged(Me, New CodePrestationsRowChangeEvent(CType(e.Row,CodePrestationsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.CodePrestationsRowChangingEvent) Is Nothing) Then
                RaiseEvent CodePrestationsRowChanging(Me, New CodePrestationsRowChangeEvent(CType(e.Row,CodePrestationsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.CodePrestationsRowDeletedEvent) Is Nothing) Then
                RaiseEvent CodePrestationsRowDeleted(Me, New CodePrestationsRowChangeEvent(CType(e.Row,CodePrestationsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.CodePrestationsRowDeletingEvent) Is Nothing) Then
                RaiseEvent CodePrestationsRowDeleting(Me, New CodePrestationsRowChangeEvent(CType(e.Row,CodePrestationsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveCodePrestationsRow(ByVal row As CodePrestationsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "CodePrestationsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class ARLDataTable
        Inherits Global.System.Data.TypedTableBase(Of ARLRow)
        
        Private columnMessageId As Global.System.Data.DataColumn
        
        Private columnInReplyTo As Global.System.Data.DataColumn
        
        Private columnSubject As Global.System.Data.DataColumn
        
        Private columnFrom_ As Global.System.Data.DataColumn
        
        Private columnFichierPieceJointe As Global.System.Data.DataColumn
        
        Private columnContent_Description As Global.System.Data.DataColumn
        
        Private columnNuméro As Global.System.Data.DataColumn
        
        Private columnDateCréation As Global.System.Data.DataColumn
        
        Private columnDateRéception As Global.System.Data.DataColumn
        
        Private columnEmetteurLot As Global.System.Data.DataColumn
        
        Private columnNumDestinataire As Global.System.Data.DataColumn
        
        Private columnRefLot As Global.System.Data.DataColumn
        
        Private columnDateLot As Global.System.Data.DataColumn
        
        Private columnTypeCodeTraitementLot As Global.System.Data.DataColumn
        
        Private columnCodeTraitementLot As Global.System.Data.DataColumn
        
        Private columnLibelléTraitementLot As Global.System.Data.DataColumn
        
        Private columnTo_ As Global.System.Data.DataColumn
        
        Private columnContent_Type As Global.System.Data.DataColumn
        
        Private columnCodeErreurTraduireARL As Global.System.Data.DataColumn
        
        Private columnTypeNumEmetteurLot As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "ARL"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MessageIdColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMessageId
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property InReplyToColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnInReplyTo
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SubjectColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSubject
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property From_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnFrom_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FichierPieceJointeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFichierPieceJointe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Content_DescriptionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnContent_Description
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NuméroColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNuméro
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateCréationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateCréation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateRéceptionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateRéception
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EmetteurLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEmetteurLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumDestinataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumDestinataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RefLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRefLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TypeCodeTraitementLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTypeCodeTraitementLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeTraitementLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeTraitementLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LibelléTraitementLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLibelléTraitementLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property To_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnTo_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Content_TypeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnContent_Type
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeErreurTraduireARLColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeErreurTraduireARL
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TypeNumEmetteurLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTypeNumEmetteurLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As ARLRow
            Get
                Return CType(Me.Rows(index),ARLRow)
            End Get
        End Property
        
        Public Event ARLRowChanging As ARLRowChangeEventHandler
        
        Public Event ARLRowChanged As ARLRowChangeEventHandler
        
        Public Event ARLRowDeleting As ARLRowChangeEventHandler
        
        Public Event ARLRowDeleted As ARLRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddARLRow(ByVal row As ARLRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddARLRow( _
                    ByVal MessageId As String,  _
                    ByVal InReplyTo As String,  _
                    ByVal Subject As String,  _
                    ByVal From_ As String,  _
                    ByVal FichierPieceJointe As Decimal,  _
                    ByVal Content_Description As String,  _
                    ByVal Numéro As String,  _
                    ByVal DateCréation As String,  _
                    ByVal DateRéception As String,  _
                    ByVal EmetteurLot As String,  _
                    ByVal NumDestinataire As String,  _
                    ByVal RefLot As String,  _
                    ByVal DateLot As String,  _
                    ByVal TypeCodeTraitementLot As String,  _
                    ByVal CodeTraitementLot As String,  _
                    ByVal LibelléTraitementLot As String,  _
                    ByVal To_ As String,  _
                    ByVal Content_Type As String,  _
                    ByVal CodeErreurTraduireARL As String,  _
                    ByVal TypeNumEmetteurLot As String) As ARLRow
            Dim rowARLRow As ARLRow = CType(Me.NewRow,ARLRow)
            Dim columnValuesArray() As Object = New Object() {MessageId, InReplyTo, Subject, From_, FichierPieceJointe, Content_Description, Numéro, DateCréation, DateRéception, EmetteurLot, NumDestinataire, RefLot, DateLot, TypeCodeTraitementLot, CodeTraitementLot, LibelléTraitementLot, To_, Content_Type, CodeErreurTraduireARL, TypeNumEmetteurLot}
            rowARLRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowARLRow)
            Return rowARLRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As ARLDataTable = CType(MyBase.Clone,ARLDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New ARLDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnMessageId = MyBase.Columns("MessageId")
            Me.columnInReplyTo = MyBase.Columns("InReplyTo")
            Me.columnSubject = MyBase.Columns("Subject")
            Me.columnFrom_ = MyBase.Columns("From_")
            Me.columnFichierPieceJointe = MyBase.Columns("FichierPieceJointe")
            Me.columnContent_Description = MyBase.Columns("Content_Description")
            Me.columnNuméro = MyBase.Columns("Numéro")
            Me.columnDateCréation = MyBase.Columns("DateCréation")
            Me.columnDateRéception = MyBase.Columns("DateRéception")
            Me.columnEmetteurLot = MyBase.Columns("EmetteurLot")
            Me.columnNumDestinataire = MyBase.Columns("NumDestinataire")
            Me.columnRefLot = MyBase.Columns("RefLot")
            Me.columnDateLot = MyBase.Columns("DateLot")
            Me.columnTypeCodeTraitementLot = MyBase.Columns("TypeCodeTraitementLot")
            Me.columnCodeTraitementLot = MyBase.Columns("CodeTraitementLot")
            Me.columnLibelléTraitementLot = MyBase.Columns("LibelléTraitementLot")
            Me.columnTo_ = MyBase.Columns("To_")
            Me.columnContent_Type = MyBase.Columns("Content_Type")
            Me.columnCodeErreurTraduireARL = MyBase.Columns("CodeErreurTraduireARL")
            Me.columnTypeNumEmetteurLot = MyBase.Columns("TypeNumEmetteurLot")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnMessageId = New Global.System.Data.DataColumn("MessageId", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMessageId)
            Me.columnInReplyTo = New Global.System.Data.DataColumn("InReplyTo", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnInReplyTo)
            Me.columnSubject = New Global.System.Data.DataColumn("Subject", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSubject)
            Me.columnFrom_ = New Global.System.Data.DataColumn("From_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFrom_)
            Me.columnFichierPieceJointe = New Global.System.Data.DataColumn("FichierPieceJointe", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFichierPieceJointe)
            Me.columnContent_Description = New Global.System.Data.DataColumn("Content_Description", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnContent_Description)
            Me.columnNuméro = New Global.System.Data.DataColumn("Numéro", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNuméro)
            Me.columnDateCréation = New Global.System.Data.DataColumn("DateCréation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateCréation)
            Me.columnDateRéception = New Global.System.Data.DataColumn("DateRéception", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateRéception)
            Me.columnEmetteurLot = New Global.System.Data.DataColumn("EmetteurLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEmetteurLot)
            Me.columnNumDestinataire = New Global.System.Data.DataColumn("NumDestinataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumDestinataire)
            Me.columnRefLot = New Global.System.Data.DataColumn("RefLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRefLot)
            Me.columnDateLot = New Global.System.Data.DataColumn("DateLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateLot)
            Me.columnTypeCodeTraitementLot = New Global.System.Data.DataColumn("TypeCodeTraitementLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTypeCodeTraitementLot)
            Me.columnCodeTraitementLot = New Global.System.Data.DataColumn("CodeTraitementLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeTraitementLot)
            Me.columnLibelléTraitementLot = New Global.System.Data.DataColumn("LibelléTraitementLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLibelléTraitementLot)
            Me.columnTo_ = New Global.System.Data.DataColumn("To_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTo_)
            Me.columnContent_Type = New Global.System.Data.DataColumn("Content_Type", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnContent_Type)
            Me.columnCodeErreurTraduireARL = New Global.System.Data.DataColumn("CodeErreurTraduireARL", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeErreurTraduireARL)
            Me.columnTypeNumEmetteurLot = New Global.System.Data.DataColumn("TypeNumEmetteurLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTypeNumEmetteurLot)
            Me.columnMessageId.MaxLength = 50
            Me.columnInReplyTo.MaxLength = 50
            Me.columnSubject.MaxLength = 50
            Me.columnFrom_.MaxLength = 50
            Me.columnContent_Description.MaxLength = 50
            Me.columnNuméro.MaxLength = 50
            Me.columnDateCréation.MaxLength = 50
            Me.columnDateRéception.MaxLength = 50
            Me.columnEmetteurLot.MaxLength = 50
            Me.columnNumDestinataire.MaxLength = 50
            Me.columnRefLot.MaxLength = 50
            Me.columnDateLot.MaxLength = 50
            Me.columnTypeCodeTraitementLot.MaxLength = 50
            Me.columnCodeTraitementLot.MaxLength = 50
            Me.columnLibelléTraitementLot.MaxLength = 2147483647
            Me.columnTo_.MaxLength = 50
            Me.columnContent_Type.MaxLength = 50
            Me.columnCodeErreurTraduireARL.MaxLength = 50
            Me.columnTypeNumEmetteurLot.MaxLength = 1
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewARLRow() As ARLRow
            Return CType(Me.NewRow,ARLRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New ARLRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(ARLRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.ARLRowChangedEvent) Is Nothing) Then
                RaiseEvent ARLRowChanged(Me, New ARLRowChangeEvent(CType(e.Row,ARLRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.ARLRowChangingEvent) Is Nothing) Then
                RaiseEvent ARLRowChanging(Me, New ARLRowChangeEvent(CType(e.Row,ARLRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.ARLRowDeletedEvent) Is Nothing) Then
                RaiseEvent ARLRowDeleted(Me, New ARLRowChangeEvent(CType(e.Row,ARLRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.ARLRowDeletingEvent) Is Nothing) Then
                RaiseEvent ARLRowDeleting(Me, New ARLRowChangeEvent(CType(e.Row,ARLRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveARLRow(ByVal row As ARLRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "ARLDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class AMODataTable
        Inherits Global.System.Data.TypedTableBase(Of AMORow)
        
        Private columnCodeRégime As Global.System.Data.DataColumn
        
        Private columnCaisseGestionnaire As Global.System.Data.DataColumn
        
        Private columnCentreGestionnaire As Global.System.Data.DataColumn
        
        Private columnOrganismeDestinataire As Global.System.Data.DataColumn
        
        Private columnCentreInformatique As Global.System.Data.DataColumn
        
        Private columnlibellé As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "AMO"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeRégimeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeRégime
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CaisseGestionnaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCaisseGestionnaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CentreGestionnaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCentreGestionnaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property OrganismeDestinataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnOrganismeDestinataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CentreInformatiqueColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCentreInformatique
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property libelléColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnlibellé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As AMORow
            Get
                Return CType(Me.Rows(index),AMORow)
            End Get
        End Property
        
        Public Event AMORowChanging As AMORowChangeEventHandler
        
        Public Event AMORowChanged As AMORowChangeEventHandler
        
        Public Event AMORowDeleting As AMORowChangeEventHandler
        
        Public Event AMORowDeleted As AMORowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddAMORow(ByVal row As AMORow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddAMORow(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String, ByVal OrganismeDestinataire As String, ByVal CentreInformatique As String, ByVal libellé As String) As AMORow
            Dim rowAMORow As AMORow = CType(Me.NewRow,AMORow)
            Dim columnValuesArray() As Object = New Object() {CodeRégime, CaisseGestionnaire, CentreGestionnaire, OrganismeDestinataire, CentreInformatique, libellé}
            rowAMORow.ItemArray = columnValuesArray
            Me.Rows.Add(rowAMORow)
            Return rowAMORow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As AMODataTable = CType(MyBase.Clone,AMODataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New AMODataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCodeRégime = MyBase.Columns("CodeRégime")
            Me.columnCaisseGestionnaire = MyBase.Columns("CaisseGestionnaire")
            Me.columnCentreGestionnaire = MyBase.Columns("CentreGestionnaire")
            Me.columnOrganismeDestinataire = MyBase.Columns("OrganismeDestinataire")
            Me.columnCentreInformatique = MyBase.Columns("CentreInformatique")
            Me.columnlibellé = MyBase.Columns("libellé")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCodeRégime = New Global.System.Data.DataColumn("CodeRégime", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeRégime)
            Me.columnCaisseGestionnaire = New Global.System.Data.DataColumn("CaisseGestionnaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCaisseGestionnaire)
            Me.columnCentreGestionnaire = New Global.System.Data.DataColumn("CentreGestionnaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCentreGestionnaire)
            Me.columnOrganismeDestinataire = New Global.System.Data.DataColumn("OrganismeDestinataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnOrganismeDestinataire)
            Me.columnCentreInformatique = New Global.System.Data.DataColumn("CentreInformatique", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCentreInformatique)
            Me.columnlibellé = New Global.System.Data.DataColumn("libellé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnlibellé)
            Me.columnCodeRégime.AllowDBNull = false
            Me.columnCodeRégime.MaxLength = 2
            Me.columnCaisseGestionnaire.AllowDBNull = false
            Me.columnCaisseGestionnaire.MaxLength = 3
            Me.columnCentreGestionnaire.AllowDBNull = false
            Me.columnCentreGestionnaire.MaxLength = 4
            Me.columnOrganismeDestinataire.AllowDBNull = false
            Me.columnOrganismeDestinataire.MaxLength = 3
            Me.columnCentreInformatique.AllowDBNull = false
            Me.columnCentreInformatique.MaxLength = 3
            Me.columnlibellé.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewAMORow() As AMORow
            Return CType(Me.NewRow,AMORow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New AMORow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(AMORow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.AMORowChangedEvent) Is Nothing) Then
                RaiseEvent AMORowChanged(Me, New AMORowChangeEvent(CType(e.Row,AMORow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.AMORowChangingEvent) Is Nothing) Then
                RaiseEvent AMORowChanging(Me, New AMORowChangeEvent(CType(e.Row,AMORow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.AMORowDeletedEvent) Is Nothing) Then
                RaiseEvent AMORowDeleted(Me, New AMORowChangeEvent(CType(e.Row,AMORow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.AMORowDeletingEvent) Is Nothing) Then
                RaiseEvent AMORowDeleting(Me, New AMORowChangeEvent(CType(e.Row,AMORow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveAMORow(ByVal row As AMORow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "AMODataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Facture_VenteDirecteDataTable
        Inherits Global.System.Data.TypedTableBase(Of Facture_VenteDirecteRow)
        
        Private columnNum As Global.System.Data.DataColumn
        
        Private columnNir As Global.System.Data.DataColumn
        
        Private columnNom As Global.System.Data.DataColumn
        
        Private columnPrénom As Global.System.Data.DataColumn
        
        Private columnDate_ As Global.System.Data.DataColumn
        
        Private columnTotal As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Facture_VenteDirecte"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NirColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNir
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NomColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNom
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PrénomColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrénom
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Date_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TotalColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTotal
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Facture_VenteDirecteRow
            Get
                Return CType(Me.Rows(index),Facture_VenteDirecteRow)
            End Get
        End Property
        
        Public Event Facture_VenteDirecteRowChanging As Facture_VenteDirecteRowChangeEventHandler
        
        Public Event Facture_VenteDirecteRowChanged As Facture_VenteDirecteRowChangeEventHandler
        
        Public Event Facture_VenteDirecteRowDeleting As Facture_VenteDirecteRowChangeEventHandler
        
        Public Event Facture_VenteDirecteRowDeleted As Facture_VenteDirecteRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddFacture_VenteDirecteRow(ByVal row As Facture_VenteDirecteRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddFacture_VenteDirecteRow(ByVal Num As Decimal, ByVal Nir As String, ByVal Nom As String, ByVal Prénom As String, ByVal Date_ As String, ByVal Total As Decimal) As Facture_VenteDirecteRow
            Dim rowFacture_VenteDirecteRow As Facture_VenteDirecteRow = CType(Me.NewRow,Facture_VenteDirecteRow)
            Dim columnValuesArray() As Object = New Object() {Num, Nir, Nom, Prénom, Date_, Total}
            rowFacture_VenteDirecteRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowFacture_VenteDirecteRow)
            Return rowFacture_VenteDirecteRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function FindByNum(ByVal Num As Decimal) As Facture_VenteDirecteRow
            Return CType(Me.Rows.Find(New Object() {Num}),Facture_VenteDirecteRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Facture_VenteDirecteDataTable = CType(MyBase.Clone,Facture_VenteDirecteDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Facture_VenteDirecteDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNum = MyBase.Columns("Num")
            Me.columnNir = MyBase.Columns("Nir")
            Me.columnNom = MyBase.Columns("Nom")
            Me.columnPrénom = MyBase.Columns("Prénom")
            Me.columnDate_ = MyBase.Columns("Date_")
            Me.columnTotal = MyBase.Columns("Total")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNum = New Global.System.Data.DataColumn("Num", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum)
            Me.columnNir = New Global.System.Data.DataColumn("Nir", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNir)
            Me.columnNom = New Global.System.Data.DataColumn("Nom", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNom)
            Me.columnPrénom = New Global.System.Data.DataColumn("Prénom", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrénom)
            Me.columnDate_ = New Global.System.Data.DataColumn("Date_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDate_)
            Me.columnTotal = New Global.System.Data.DataColumn("Total", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTotal)
            Me.Constraints.Add(New Global.System.Data.UniqueConstraint("Constraint1", New Global.System.Data.DataColumn() {Me.columnNum}, true))
            Me.columnNum.AllowDBNull = false
            Me.columnNum.Unique = true
            Me.columnNir.MaxLength = 50
            Me.columnNom.MaxLength = 50
            Me.columnPrénom.MaxLength = 50
            Me.columnDate_.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewFacture_VenteDirecteRow() As Facture_VenteDirecteRow
            Return CType(Me.NewRow,Facture_VenteDirecteRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Facture_VenteDirecteRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Facture_VenteDirecteRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Facture_VenteDirecteRowChangedEvent) Is Nothing) Then
                RaiseEvent Facture_VenteDirecteRowChanged(Me, New Facture_VenteDirecteRowChangeEvent(CType(e.Row,Facture_VenteDirecteRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Facture_VenteDirecteRowChangingEvent) Is Nothing) Then
                RaiseEvent Facture_VenteDirecteRowChanging(Me, New Facture_VenteDirecteRowChangeEvent(CType(e.Row,Facture_VenteDirecteRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Facture_VenteDirecteRowDeletedEvent) Is Nothing) Then
                RaiseEvent Facture_VenteDirecteRowDeleted(Me, New Facture_VenteDirecteRowChangeEvent(CType(e.Row,Facture_VenteDirecteRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Facture_VenteDirecteRowDeletingEvent) Is Nothing) Then
                RaiseEvent Facture_VenteDirecteRowDeleting(Me, New Facture_VenteDirecteRowChangeEvent(CType(e.Row,Facture_VenteDirecteRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveFacture_VenteDirecteRow(ByVal row As Facture_VenteDirecteRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Facture_VenteDirecteDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Pop_Allowed_ListDataTable
        Inherits Global.System.Data.TypedTableBase(Of Pop_Allowed_ListRow)
        
        Private columnAdresse As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Pop_Allowed_List"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AdresseColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAdresse
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Pop_Allowed_ListRow
            Get
                Return CType(Me.Rows(index),Pop_Allowed_ListRow)
            End Get
        End Property
        
        Public Event Pop_Allowed_ListRowChanging As Pop_Allowed_ListRowChangeEventHandler
        
        Public Event Pop_Allowed_ListRowChanged As Pop_Allowed_ListRowChangeEventHandler
        
        Public Event Pop_Allowed_ListRowDeleting As Pop_Allowed_ListRowChangeEventHandler
        
        Public Event Pop_Allowed_ListRowDeleted As Pop_Allowed_ListRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddPop_Allowed_ListRow(ByVal row As Pop_Allowed_ListRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddPop_Allowed_ListRow(ByVal Adresse As String) As Pop_Allowed_ListRow
            Dim rowPop_Allowed_ListRow As Pop_Allowed_ListRow = CType(Me.NewRow,Pop_Allowed_ListRow)
            Dim columnValuesArray() As Object = New Object() {Adresse}
            rowPop_Allowed_ListRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowPop_Allowed_ListRow)
            Return rowPop_Allowed_ListRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Pop_Allowed_ListDataTable = CType(MyBase.Clone,Pop_Allowed_ListDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Pop_Allowed_ListDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnAdresse = MyBase.Columns("Adresse")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnAdresse = New Global.System.Data.DataColumn("Adresse", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAdresse)
            Me.columnAdresse.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewPop_Allowed_ListRow() As Pop_Allowed_ListRow
            Return CType(Me.NewRow,Pop_Allowed_ListRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Pop_Allowed_ListRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Pop_Allowed_ListRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Pop_Allowed_ListRowChangedEvent) Is Nothing) Then
                RaiseEvent Pop_Allowed_ListRowChanged(Me, New Pop_Allowed_ListRowChangeEvent(CType(e.Row,Pop_Allowed_ListRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Pop_Allowed_ListRowChangingEvent) Is Nothing) Then
                RaiseEvent Pop_Allowed_ListRowChanging(Me, New Pop_Allowed_ListRowChangeEvent(CType(e.Row,Pop_Allowed_ListRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Pop_Allowed_ListRowDeletedEvent) Is Nothing) Then
                RaiseEvent Pop_Allowed_ListRowDeleted(Me, New Pop_Allowed_ListRowChangeEvent(CType(e.Row,Pop_Allowed_ListRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Pop_Allowed_ListRowDeletingEvent) Is Nothing) Then
                RaiseEvent Pop_Allowed_ListRowDeleting(Me, New Pop_Allowed_ListRowChangeEvent(CType(e.Row,Pop_Allowed_ListRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemovePop_Allowed_ListRow(ByVal row As Pop_Allowed_ListRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Pop_Allowed_ListDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Convention_Table_correspondanceDataTable
        Inherits Global.System.Data.TypedTableBase(Of Convention_Table_correspondanceRow)
        
        Private columnNum_org_complémentaire As Global.System.Data.DataColumn
        
        Private columnMUTNUM As Global.System.Data.DataColumn
        
        Private columncode_organisme_obligatoire_associé As Global.System.Data.DataColumn
        
        Private columnlibellé_organisme_complémentaire As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Convention_Table_correspondance"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_org_complémentaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_org_complémentaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MUTNUMColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMUTNUM
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property code_organisme_obligatoire_associéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columncode_organisme_obligatoire_associé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property libellé_organisme_complémentaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnlibellé_organisme_complémentaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Convention_Table_correspondanceRow
            Get
                Return CType(Me.Rows(index),Convention_Table_correspondanceRow)
            End Get
        End Property
        
        Public Event Convention_Table_correspondanceRowChanging As Convention_Table_correspondanceRowChangeEventHandler
        
        Public Event Convention_Table_correspondanceRowChanged As Convention_Table_correspondanceRowChangeEventHandler
        
        Public Event Convention_Table_correspondanceRowDeleting As Convention_Table_correspondanceRowChangeEventHandler
        
        Public Event Convention_Table_correspondanceRowDeleted As Convention_Table_correspondanceRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddConvention_Table_correspondanceRow(ByVal row As Convention_Table_correspondanceRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddConvention_Table_correspondanceRow(ByVal Num_org_complémentaire As String, ByVal MUTNUM As String, ByVal code_organisme_obligatoire_associé As String, ByVal libellé_organisme_complémentaire As String) As Convention_Table_correspondanceRow
            Dim rowConvention_Table_correspondanceRow As Convention_Table_correspondanceRow = CType(Me.NewRow,Convention_Table_correspondanceRow)
            Dim columnValuesArray() As Object = New Object() {Num_org_complémentaire, MUTNUM, code_organisme_obligatoire_associé, libellé_organisme_complémentaire}
            rowConvention_Table_correspondanceRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowConvention_Table_correspondanceRow)
            Return rowConvention_Table_correspondanceRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Convention_Table_correspondanceDataTable = CType(MyBase.Clone,Convention_Table_correspondanceDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Convention_Table_correspondanceDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNum_org_complémentaire = MyBase.Columns("Num_org_complémentaire")
            Me.columnMUTNUM = MyBase.Columns("MUTNUM")
            Me.columncode_organisme_obligatoire_associé = MyBase.Columns("code_organisme_obligatoire_associé")
            Me.columnlibellé_organisme_complémentaire = MyBase.Columns("libellé_organisme_complémentaire")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNum_org_complémentaire = New Global.System.Data.DataColumn("Num_org_complémentaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_org_complémentaire)
            Me.columnMUTNUM = New Global.System.Data.DataColumn("MUTNUM", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMUTNUM)
            Me.columncode_organisme_obligatoire_associé = New Global.System.Data.DataColumn("code_organisme_obligatoire_associé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columncode_organisme_obligatoire_associé)
            Me.columnlibellé_organisme_complémentaire = New Global.System.Data.DataColumn("libellé_organisme_complémentaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnlibellé_organisme_complémentaire)
            Me.columnNum_org_complémentaire.MaxLength = 50
            Me.columnMUTNUM.MaxLength = 50
            Me.columncode_organisme_obligatoire_associé.MaxLength = 50
            Me.columnlibellé_organisme_complémentaire.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewConvention_Table_correspondanceRow() As Convention_Table_correspondanceRow
            Return CType(Me.NewRow,Convention_Table_correspondanceRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Convention_Table_correspondanceRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Convention_Table_correspondanceRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Convention_Table_correspondanceRowChangedEvent) Is Nothing) Then
                RaiseEvent Convention_Table_correspondanceRowChanged(Me, New Convention_Table_correspondanceRowChangeEvent(CType(e.Row,Convention_Table_correspondanceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Convention_Table_correspondanceRowChangingEvent) Is Nothing) Then
                RaiseEvent Convention_Table_correspondanceRowChanging(Me, New Convention_Table_correspondanceRowChangeEvent(CType(e.Row,Convention_Table_correspondanceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Convention_Table_correspondanceRowDeletedEvent) Is Nothing) Then
                RaiseEvent Convention_Table_correspondanceRowDeleted(Me, New Convention_Table_correspondanceRowChangeEvent(CType(e.Row,Convention_Table_correspondanceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Convention_Table_correspondanceRowDeletingEvent) Is Nothing) Then
                RaiseEvent Convention_Table_correspondanceRowDeleting(Me, New Convention_Table_correspondanceRowChangeEvent(CType(e.Row,Convention_Table_correspondanceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveConvention_Table_correspondanceRow(ByVal row As Convention_Table_correspondanceRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Convention_Table_correspondanceDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Convention_Table_ConventionsDataTable
        Inherits Global.System.Data.TypedTableBase(Of Convention_Table_ConventionsRow)
        
        Private columnCode_action As Global.System.Data.DataColumn
        
        Private columnCode_catégorie As Global.System.Data.DataColumn
        
        Private columnSpécialité As Global.System.Data.DataColumn
        
        Private columnRéférence_de_convention As Global.System.Data.DataColumn
        
        Private columnMessage As Global.System.Data.DataColumn
        
        Private columnIdentifiant_org_signataire As Global.System.Data.DataColumn
        
        Private columnLibellé_org_signataire As Global.System.Data.DataColumn
        
        Private columnindicateur_convention_groupée As Global.System.Data.DataColumn
        
        Private columntype_Identifiant_org_signataire As Global.System.Data.DataColumn
        
        Private columncritère_secondaire As Global.System.Data.DataColumn
        
        Private columntype_Accord As Global.System.Data.DataColumn
        
        Private columnNum_AMC As Global.System.Data.DataColumn
        
        Private columnlibellé_Org_complémentaire As Global.System.Data.DataColumn
        
        Private columnindic_desactivation_STS As Global.System.Data.DataColumn
        
        Private columnCode_aiguillage_STS As Global.System.Data.DataColumn
        
        Private columnusage_attestation_papier As Global.System.Data.DataColumn
        
        Private columnAccepatation_DRE_Annulation As Global.System.Data.DataColumn
        
        Private columnAcceptation_DRE_Rectification As Global.System.Data.DataColumn
        
        Private columnIdentifiant_Opérateur_règlement As Global.System.Data.DataColumn
        
        Private columnCode_routage As Global.System.Data.DataColumn
        
        Private columnidentifiant_hôte As Global.System.Data.DataColumn
        
        Private columnnom_domaine As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Convention_Table_Conventions"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Code_actionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCode_action
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Code_catégorieColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCode_catégorie
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SpécialitéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSpécialité
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Référence_de_conventionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRéférence_de_convention
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MessageColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMessage
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Identifiant_org_signataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIdentifiant_org_signataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Libellé_org_signataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLibellé_org_signataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property indicateur_convention_groupéeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnindicateur_convention_groupée
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property type_Identifiant_org_signataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columntype_Identifiant_org_signataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property critère_secondaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columncritère_secondaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property type_AccordColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columntype_Accord
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_AMCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_AMC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property libellé_Org_complémentaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnlibellé_Org_complémentaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property indic_desactivation_STSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnindic_desactivation_STS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Code_aiguillage_STSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCode_aiguillage_STS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property usage_attestation_papierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnusage_attestation_papier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Accepatation_DRE_AnnulationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAccepatation_DRE_Annulation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Acceptation_DRE_RectificationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAcceptation_DRE_Rectification
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Identifiant_Opérateur_règlementColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIdentifiant_Opérateur_règlement
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Code_routageColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCode_routage
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property identifiant_hôteColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnidentifiant_hôte
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property nom_domaineColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnnom_domaine
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Convention_Table_ConventionsRow
            Get
                Return CType(Me.Rows(index),Convention_Table_ConventionsRow)
            End Get
        End Property
        
        Public Event Convention_Table_ConventionsRowChanging As Convention_Table_ConventionsRowChangeEventHandler
        
        Public Event Convention_Table_ConventionsRowChanged As Convention_Table_ConventionsRowChangeEventHandler
        
        Public Event Convention_Table_ConventionsRowDeleting As Convention_Table_ConventionsRowChangeEventHandler
        
        Public Event Convention_Table_ConventionsRowDeleted As Convention_Table_ConventionsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddConvention_Table_ConventionsRow(ByVal row As Convention_Table_ConventionsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddConvention_Table_ConventionsRow( _
                    ByVal Code_action As String,  _
                    ByVal Code_catégorie As String,  _
                    ByVal Spécialité As String,  _
                    ByVal Référence_de_convention As String,  _
                    ByVal Message As String,  _
                    ByVal Identifiant_org_signataire As String,  _
                    ByVal Libellé_org_signataire As String,  _
                    ByVal indicateur_convention_groupée As String,  _
                    ByVal type_Identifiant_org_signataire As String,  _
                    ByVal critère_secondaire As String,  _
                    ByVal type_Accord As String,  _
                    ByVal Num_AMC As String,  _
                    ByVal libellé_Org_complémentaire As String,  _
                    ByVal indic_desactivation_STS As String,  _
                    ByVal Code_aiguillage_STS As String,  _
                    ByVal usage_attestation_papier As String,  _
                    ByVal Accepatation_DRE_Annulation As String,  _
                    ByVal Acceptation_DRE_Rectification As String,  _
                    ByVal Identifiant_Opérateur_règlement As String,  _
                    ByVal Code_routage As String,  _
                    ByVal identifiant_hôte As String,  _
                    ByVal nom_domaine As String) As Convention_Table_ConventionsRow
            Dim rowConvention_Table_ConventionsRow As Convention_Table_ConventionsRow = CType(Me.NewRow,Convention_Table_ConventionsRow)
            Dim columnValuesArray() As Object = New Object() {Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message, Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_groupée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, libellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_attestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, Identifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine}
            rowConvention_Table_ConventionsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowConvention_Table_ConventionsRow)
            Return rowConvention_Table_ConventionsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Convention_Table_ConventionsDataTable = CType(MyBase.Clone,Convention_Table_ConventionsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Convention_Table_ConventionsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCode_action = MyBase.Columns("Code_action")
            Me.columnCode_catégorie = MyBase.Columns("Code_catégorie")
            Me.columnSpécialité = MyBase.Columns("Spécialité")
            Me.columnRéférence_de_convention = MyBase.Columns("Référence_de_convention")
            Me.columnMessage = MyBase.Columns("Message")
            Me.columnIdentifiant_org_signataire = MyBase.Columns("Identifiant_org_signataire")
            Me.columnLibellé_org_signataire = MyBase.Columns("Libellé_org_signataire")
            Me.columnindicateur_convention_groupée = MyBase.Columns("indicateur_convention_groupée")
            Me.columntype_Identifiant_org_signataire = MyBase.Columns("type_Identifiant_org_signataire")
            Me.columncritère_secondaire = MyBase.Columns("critère_secondaire")
            Me.columntype_Accord = MyBase.Columns("type_Accord")
            Me.columnNum_AMC = MyBase.Columns("Num_AMC")
            Me.columnlibellé_Org_complémentaire = MyBase.Columns("libellé_Org_complémentaire")
            Me.columnindic_desactivation_STS = MyBase.Columns("indic_desactivation_STS")
            Me.columnCode_aiguillage_STS = MyBase.Columns("Code_aiguillage_STS")
            Me.columnusage_attestation_papier = MyBase.Columns("usage_attestation_papier")
            Me.columnAccepatation_DRE_Annulation = MyBase.Columns("Accepatation_DRE_Annulation")
            Me.columnAcceptation_DRE_Rectification = MyBase.Columns("Acceptation_DRE_Rectification")
            Me.columnIdentifiant_Opérateur_règlement = MyBase.Columns("Identifiant_Opérateur_règlement")
            Me.columnCode_routage = MyBase.Columns("Code_routage")
            Me.columnidentifiant_hôte = MyBase.Columns("identifiant_hôte")
            Me.columnnom_domaine = MyBase.Columns("nom_domaine")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCode_action = New Global.System.Data.DataColumn("Code_action", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCode_action)
            Me.columnCode_catégorie = New Global.System.Data.DataColumn("Code_catégorie", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCode_catégorie)
            Me.columnSpécialité = New Global.System.Data.DataColumn("Spécialité", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSpécialité)
            Me.columnRéférence_de_convention = New Global.System.Data.DataColumn("Référence_de_convention", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRéférence_de_convention)
            Me.columnMessage = New Global.System.Data.DataColumn("Message", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMessage)
            Me.columnIdentifiant_org_signataire = New Global.System.Data.DataColumn("Identifiant_org_signataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIdentifiant_org_signataire)
            Me.columnLibellé_org_signataire = New Global.System.Data.DataColumn("Libellé_org_signataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLibellé_org_signataire)
            Me.columnindicateur_convention_groupée = New Global.System.Data.DataColumn("indicateur_convention_groupée", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnindicateur_convention_groupée)
            Me.columntype_Identifiant_org_signataire = New Global.System.Data.DataColumn("type_Identifiant_org_signataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columntype_Identifiant_org_signataire)
            Me.columncritère_secondaire = New Global.System.Data.DataColumn("critère_secondaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columncritère_secondaire)
            Me.columntype_Accord = New Global.System.Data.DataColumn("type_Accord", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columntype_Accord)
            Me.columnNum_AMC = New Global.System.Data.DataColumn("Num_AMC", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_AMC)
            Me.columnlibellé_Org_complémentaire = New Global.System.Data.DataColumn("libellé_Org_complémentaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnlibellé_Org_complémentaire)
            Me.columnindic_desactivation_STS = New Global.System.Data.DataColumn("indic_desactivation_STS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnindic_desactivation_STS)
            Me.columnCode_aiguillage_STS = New Global.System.Data.DataColumn("Code_aiguillage_STS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCode_aiguillage_STS)
            Me.columnusage_attestation_papier = New Global.System.Data.DataColumn("usage_attestation_papier", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnusage_attestation_papier)
            Me.columnAccepatation_DRE_Annulation = New Global.System.Data.DataColumn("Accepatation_DRE_Annulation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAccepatation_DRE_Annulation)
            Me.columnAcceptation_DRE_Rectification = New Global.System.Data.DataColumn("Acceptation_DRE_Rectification", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAcceptation_DRE_Rectification)
            Me.columnIdentifiant_Opérateur_règlement = New Global.System.Data.DataColumn("Identifiant_Opérateur_règlement", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIdentifiant_Opérateur_règlement)
            Me.columnCode_routage = New Global.System.Data.DataColumn("Code_routage", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCode_routage)
            Me.columnidentifiant_hôte = New Global.System.Data.DataColumn("identifiant_hôte", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnidentifiant_hôte)
            Me.columnnom_domaine = New Global.System.Data.DataColumn("nom_domaine", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnnom_domaine)
            Me.columnCode_action.MaxLength = 50
            Me.columnCode_catégorie.MaxLength = 50
            Me.columnSpécialité.MaxLength = 50
            Me.columnRéférence_de_convention.MaxLength = 50
            Me.columnMessage.MaxLength = 2147483647
            Me.columnIdentifiant_org_signataire.MaxLength = 50
            Me.columnLibellé_org_signataire.MaxLength = 2147483647
            Me.columnindicateur_convention_groupée.MaxLength = 50
            Me.columntype_Identifiant_org_signataire.MaxLength = 50
            Me.columncritère_secondaire.MaxLength = 50
            Me.columntype_Accord.MaxLength = 50
            Me.columnNum_AMC.MaxLength = 50
            Me.columnlibellé_Org_complémentaire.MaxLength = 50
            Me.columnindic_desactivation_STS.MaxLength = 1
            Me.columnCode_aiguillage_STS.MaxLength = 50
            Me.columnusage_attestation_papier.MaxLength = 1
            Me.columnAccepatation_DRE_Annulation.MaxLength = 50
            Me.columnAcceptation_DRE_Rectification.MaxLength = 50
            Me.columnIdentifiant_Opérateur_règlement.MaxLength = 50
            Me.columnCode_routage.MaxLength = 50
            Me.columnidentifiant_hôte.MaxLength = 50
            Me.columnnom_domaine.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewConvention_Table_ConventionsRow() As Convention_Table_ConventionsRow
            Return CType(Me.NewRow,Convention_Table_ConventionsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Convention_Table_ConventionsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Convention_Table_ConventionsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Convention_Table_ConventionsRowChangedEvent) Is Nothing) Then
                RaiseEvent Convention_Table_ConventionsRowChanged(Me, New Convention_Table_ConventionsRowChangeEvent(CType(e.Row,Convention_Table_ConventionsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Convention_Table_ConventionsRowChangingEvent) Is Nothing) Then
                RaiseEvent Convention_Table_ConventionsRowChanging(Me, New Convention_Table_ConventionsRowChangeEvent(CType(e.Row,Convention_Table_ConventionsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Convention_Table_ConventionsRowDeletedEvent) Is Nothing) Then
                RaiseEvent Convention_Table_ConventionsRowDeleted(Me, New Convention_Table_ConventionsRowChangeEvent(CType(e.Row,Convention_Table_ConventionsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Convention_Table_ConventionsRowDeletingEvent) Is Nothing) Then
                RaiseEvent Convention_Table_ConventionsRowDeleting(Me, New Convention_Table_ConventionsRowChangeEvent(CType(e.Row,Convention_Table_ConventionsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveConvention_Table_ConventionsRow(ByVal row As Convention_Table_ConventionsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Convention_Table_ConventionsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class Convention_Table_RegroupementsDataTable
        Inherits Global.System.Data.TypedTableBase(Of Convention_Table_RegroupementsRow)
        
        Private columnAction As Global.System.Data.DataColumn
        
        Private columncatégorie As Global.System.Data.DataColumn
        
        Private columnSpécialité As Global.System.Data.DataColumn
        
        Private columnNum_Org_Complémentaire As Global.System.Data.DataColumn
        
        Private columnlibellé_organisme_complémentaire As Global.System.Data.DataColumn
        
        Private columnType_convention As Global.System.Data.DataColumn
        
        Private columnlibellé_Type_convention As Global.System.Data.DataColumn
        
        Private columncritère_secondaire As Global.System.Data.DataColumn
        
        Private columnId_org_signataire As Global.System.Data.DataColumn
        
        Private columnLibellé_org_signataire As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Convention_Table_Regroupements"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ActionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAction
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property catégorieColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columncatégorie
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SpécialitéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSpécialité
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_Org_ComplémentaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_Org_Complémentaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property libellé_organisme_complémentaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnlibellé_organisme_complémentaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Type_conventionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnType_convention
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property libellé_Type_conventionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnlibellé_Type_convention
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property critère_secondaireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columncritère_secondaire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Id_org_signataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnId_org_signataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Libellé_org_signataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLibellé_org_signataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As Convention_Table_RegroupementsRow
            Get
                Return CType(Me.Rows(index),Convention_Table_RegroupementsRow)
            End Get
        End Property
        
        Public Event Convention_Table_RegroupementsRowChanging As Convention_Table_RegroupementsRowChangeEventHandler
        
        Public Event Convention_Table_RegroupementsRowChanged As Convention_Table_RegroupementsRowChangeEventHandler
        
        Public Event Convention_Table_RegroupementsRowDeleting As Convention_Table_RegroupementsRowChangeEventHandler
        
        Public Event Convention_Table_RegroupementsRowDeleted As Convention_Table_RegroupementsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddConvention_Table_RegroupementsRow(ByVal row As Convention_Table_RegroupementsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddConvention_Table_RegroupementsRow(ByVal Action As String, ByVal catégorie As String, ByVal Spécialité As String, ByVal Num_Org_Complémentaire As String, ByVal libellé_organisme_complémentaire As String, ByVal Type_convention As String, ByVal libellé_Type_convention As String, ByVal critère_secondaire As String, ByVal Id_org_signataire As String, ByVal Libellé_org_signataire As String) As Convention_Table_RegroupementsRow
            Dim rowConvention_Table_RegroupementsRow As Convention_Table_RegroupementsRow = CType(Me.NewRow,Convention_Table_RegroupementsRow)
            Dim columnValuesArray() As Object = New Object() {Action, catégorie, Spécialité, Num_Org_Complémentaire, libellé_organisme_complémentaire, Type_convention, libellé_Type_convention, critère_secondaire, Id_org_signataire, Libellé_org_signataire}
            rowConvention_Table_RegroupementsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowConvention_Table_RegroupementsRow)
            Return rowConvention_Table_RegroupementsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As Convention_Table_RegroupementsDataTable = CType(MyBase.Clone,Convention_Table_RegroupementsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New Convention_Table_RegroupementsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnAction = MyBase.Columns("Action")
            Me.columncatégorie = MyBase.Columns("catégorie")
            Me.columnSpécialité = MyBase.Columns("Spécialité")
            Me.columnNum_Org_Complémentaire = MyBase.Columns("Num_Org_Complémentaire")
            Me.columnlibellé_organisme_complémentaire = MyBase.Columns("libellé_organisme_complémentaire")
            Me.columnType_convention = MyBase.Columns("Type_convention")
            Me.columnlibellé_Type_convention = MyBase.Columns("libellé_Type_convention")
            Me.columncritère_secondaire = MyBase.Columns("critère_secondaire")
            Me.columnId_org_signataire = MyBase.Columns("Id_org_signataire")
            Me.columnLibellé_org_signataire = MyBase.Columns("Libellé_org_signataire")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnAction = New Global.System.Data.DataColumn("Action", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAction)
            Me.columncatégorie = New Global.System.Data.DataColumn("catégorie", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columncatégorie)
            Me.columnSpécialité = New Global.System.Data.DataColumn("Spécialité", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSpécialité)
            Me.columnNum_Org_Complémentaire = New Global.System.Data.DataColumn("Num_Org_Complémentaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_Org_Complémentaire)
            Me.columnlibellé_organisme_complémentaire = New Global.System.Data.DataColumn("libellé_organisme_complémentaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnlibellé_organisme_complémentaire)
            Me.columnType_convention = New Global.System.Data.DataColumn("Type_convention", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnType_convention)
            Me.columnlibellé_Type_convention = New Global.System.Data.DataColumn("libellé_Type_convention", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnlibellé_Type_convention)
            Me.columncritère_secondaire = New Global.System.Data.DataColumn("critère_secondaire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columncritère_secondaire)
            Me.columnId_org_signataire = New Global.System.Data.DataColumn("Id_org_signataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnId_org_signataire)
            Me.columnLibellé_org_signataire = New Global.System.Data.DataColumn("Libellé_org_signataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLibellé_org_signataire)
            Me.columnAction.MaxLength = 50
            Me.columncatégorie.MaxLength = 50
            Me.columnSpécialité.MaxLength = 50
            Me.columnNum_Org_Complémentaire.MaxLength = 50
            Me.columnlibellé_organisme_complémentaire.MaxLength = 2147483647
            Me.columnType_convention.MaxLength = 50
            Me.columnlibellé_Type_convention.MaxLength = 2147483647
            Me.columncritère_secondaire.MaxLength = 50
            Me.columnId_org_signataire.MaxLength = 50
            Me.columnLibellé_org_signataire.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewConvention_Table_RegroupementsRow() As Convention_Table_RegroupementsRow
            Return CType(Me.NewRow,Convention_Table_RegroupementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New Convention_Table_RegroupementsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(Convention_Table_RegroupementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.Convention_Table_RegroupementsRowChangedEvent) Is Nothing) Then
                RaiseEvent Convention_Table_RegroupementsRowChanged(Me, New Convention_Table_RegroupementsRowChangeEvent(CType(e.Row,Convention_Table_RegroupementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.Convention_Table_RegroupementsRowChangingEvent) Is Nothing) Then
                RaiseEvent Convention_Table_RegroupementsRowChanging(Me, New Convention_Table_RegroupementsRowChangeEvent(CType(e.Row,Convention_Table_RegroupementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.Convention_Table_RegroupementsRowDeletedEvent) Is Nothing) Then
                RaiseEvent Convention_Table_RegroupementsRowDeleted(Me, New Convention_Table_RegroupementsRowChangeEvent(CType(e.Row,Convention_Table_RegroupementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.Convention_Table_RegroupementsRowDeletingEvent) Is Nothing) Then
                RaiseEvent Convention_Table_RegroupementsRowDeleting(Me, New Convention_Table_RegroupementsRowChangeEvent(CType(e.Row,Convention_Table_RegroupementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveConvention_Table_RegroupementsRow(ByVal row As Convention_Table_RegroupementsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "Convention_Table_RegroupementsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class _Taux_CodeRégimeDataTable
        Inherits Global.System.Data.TypedTableBase(Of _Taux_CodeRégimeRow)
        
        Private columnCodeRégime As Global.System.Data.DataColumn
        
        Private columnCodeActe As Global.System.Data.DataColumn
        
        Private columnTaux As Global.System.Data.DataColumn
        
        Private columnDateMin As Global.System.Data.DataColumn
        
        Private columnDateMax As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Taux/CodeRégime"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeRégimeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeRégime
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeActeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeActe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TauxColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTaux
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateMinColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateMin
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateMaxColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateMax
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As _Taux_CodeRégimeRow
            Get
                Return CType(Me.Rows(index),_Taux_CodeRégimeRow)
            End Get
        End Property
        
        Public Event _Taux_CodeRégimeRowChanging As _Taux_CodeRégimeRowChangeEventHandler
        
        Public Event _Taux_CodeRégimeRowChanged As _Taux_CodeRégimeRowChangeEventHandler
        
        Public Event _Taux_CodeRégimeRowDeleting As _Taux_CodeRégimeRowChangeEventHandler
        
        Public Event _Taux_CodeRégimeRowDeleted As _Taux_CodeRégimeRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub Add_Taux_CodeRégimeRow(ByVal row As _Taux_CodeRégimeRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function Add_Taux_CodeRégimeRow(ByVal CodeRégime As String, ByVal CodeActe As String, ByVal Taux As Double, ByVal DateMin As String, ByVal DateMax As String) As _Taux_CodeRégimeRow
            Dim row_Taux_CodeRégimeRow As _Taux_CodeRégimeRow = CType(Me.NewRow,_Taux_CodeRégimeRow)
            Dim columnValuesArray() As Object = New Object() {CodeRégime, CodeActe, Taux, DateMin, DateMax}
            row_Taux_CodeRégimeRow.ItemArray = columnValuesArray
            Me.Rows.Add(row_Taux_CodeRégimeRow)
            Return row_Taux_CodeRégimeRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As _Taux_CodeRégimeDataTable = CType(MyBase.Clone,_Taux_CodeRégimeDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New _Taux_CodeRégimeDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCodeRégime = MyBase.Columns("CodeRégime")
            Me.columnCodeActe = MyBase.Columns("CodeActe")
            Me.columnTaux = MyBase.Columns("Taux")
            Me.columnDateMin = MyBase.Columns("DateMin")
            Me.columnDateMax = MyBase.Columns("DateMax")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCodeRégime = New Global.System.Data.DataColumn("CodeRégime", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeRégime)
            Me.columnCodeActe = New Global.System.Data.DataColumn("CodeActe", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeActe)
            Me.columnTaux = New Global.System.Data.DataColumn("Taux", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTaux)
            Me.columnDateMin = New Global.System.Data.DataColumn("DateMin", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateMin)
            Me.columnDateMax = New Global.System.Data.DataColumn("DateMax", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateMax)
            Me.columnCodeRégime.AllowDBNull = false
            Me.columnCodeRégime.MaxLength = 2
            Me.columnCodeActe.AllowDBNull = false
            Me.columnCodeActe.MaxLength = 2147483647
            Me.columnTaux.AllowDBNull = false
            Me.columnDateMin.MaxLength = 8
            Me.columnDateMax.MaxLength = 8
            Me.ExtendedProperties.Add("Generator_TableVarName", "_tableTaux_CodeRégime")
            Me.ExtendedProperties.Add("Generator_UserTableName", "Taux/CodeRégime")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function New_Taux_CodeRégimeRow() As _Taux_CodeRégimeRow
            Return CType(Me.NewRow,_Taux_CodeRégimeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New _Taux_CodeRégimeRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(_Taux_CodeRégimeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me._Taux_CodeRégimeRowChangedEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeRégimeRowChanged(Me, New _Taux_CodeRégimeRowChangeEvent(CType(e.Row,_Taux_CodeRégimeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me._Taux_CodeRégimeRowChangingEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeRégimeRowChanging(Me, New _Taux_CodeRégimeRowChangeEvent(CType(e.Row,_Taux_CodeRégimeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me._Taux_CodeRégimeRowDeletedEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeRégimeRowDeleted(Me, New _Taux_CodeRégimeRowChangeEvent(CType(e.Row,_Taux_CodeRégimeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me._Taux_CodeRégimeRowDeletingEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeRégimeRowDeleting(Me, New _Taux_CodeRégimeRowChangeEvent(CType(e.Row,_Taux_CodeRégimeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Remove_Taux_CodeRégimeRow(ByVal row As _Taux_CodeRégimeRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "_Taux_CodeRégimeDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class _Taux_CodeSituationDataTable
        Inherits Global.System.Data.TypedTableBase(Of _Taux_CodeSituationRow)
        
        Private columnCodeSituation As Global.System.Data.DataColumn
        
        Private columnCodeActe As Global.System.Data.DataColumn
        
        Private columnTaux As Global.System.Data.DataColumn
        
        Private columnDateMin As Global.System.Data.DataColumn
        
        Private columnDateMax As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Taux/CodeSituation"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeSituationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeSituation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodeActeColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodeActe
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property TauxColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnTaux
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateMinColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateMin
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateMaxColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDateMax
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As _Taux_CodeSituationRow
            Get
                Return CType(Me.Rows(index),_Taux_CodeSituationRow)
            End Get
        End Property
        
        Public Event _Taux_CodeSituationRowChanging As _Taux_CodeSituationRowChangeEventHandler
        
        Public Event _Taux_CodeSituationRowChanged As _Taux_CodeSituationRowChangeEventHandler
        
        Public Event _Taux_CodeSituationRowDeleting As _Taux_CodeSituationRowChangeEventHandler
        
        Public Event _Taux_CodeSituationRowDeleted As _Taux_CodeSituationRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub Add_Taux_CodeSituationRow(ByVal row As _Taux_CodeSituationRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function Add_Taux_CodeSituationRow(ByVal CodeSituation As String, ByVal CodeActe As String, ByVal Taux As Double, ByVal DateMin As String, ByVal DateMax As String) As _Taux_CodeSituationRow
            Dim row_Taux_CodeSituationRow As _Taux_CodeSituationRow = CType(Me.NewRow,_Taux_CodeSituationRow)
            Dim columnValuesArray() As Object = New Object() {CodeSituation, CodeActe, Taux, DateMin, DateMax}
            row_Taux_CodeSituationRow.ItemArray = columnValuesArray
            Me.Rows.Add(row_Taux_CodeSituationRow)
            Return row_Taux_CodeSituationRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As _Taux_CodeSituationDataTable = CType(MyBase.Clone,_Taux_CodeSituationDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New _Taux_CodeSituationDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCodeSituation = MyBase.Columns("CodeSituation")
            Me.columnCodeActe = MyBase.Columns("CodeActe")
            Me.columnTaux = MyBase.Columns("Taux")
            Me.columnDateMin = MyBase.Columns("DateMin")
            Me.columnDateMax = MyBase.Columns("DateMax")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCodeSituation = New Global.System.Data.DataColumn("CodeSituation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeSituation)
            Me.columnCodeActe = New Global.System.Data.DataColumn("CodeActe", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodeActe)
            Me.columnTaux = New Global.System.Data.DataColumn("Taux", GetType(Double), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTaux)
            Me.columnDateMin = New Global.System.Data.DataColumn("DateMin", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateMin)
            Me.columnDateMax = New Global.System.Data.DataColumn("DateMax", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDateMax)
            Me.columnCodeSituation.AllowDBNull = false
            Me.columnCodeSituation.MaxLength = 4
            Me.columnCodeActe.AllowDBNull = false
            Me.columnCodeActe.MaxLength = 2147483647
            Me.columnTaux.AllowDBNull = false
            Me.columnDateMin.AllowDBNull = false
            Me.columnDateMin.MaxLength = 8
            Me.columnDateMax.AllowDBNull = false
            Me.columnDateMax.MaxLength = 8
            Me.ExtendedProperties.Add("Generator_TableVarName", "_tableTaux_CodeSituation")
            Me.ExtendedProperties.Add("Generator_UserTableName", "Taux/CodeSituation")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function New_Taux_CodeSituationRow() As _Taux_CodeSituationRow
            Return CType(Me.NewRow,_Taux_CodeSituationRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New _Taux_CodeSituationRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(_Taux_CodeSituationRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me._Taux_CodeSituationRowChangedEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeSituationRowChanged(Me, New _Taux_CodeSituationRowChangeEvent(CType(e.Row,_Taux_CodeSituationRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me._Taux_CodeSituationRowChangingEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeSituationRowChanging(Me, New _Taux_CodeSituationRowChangeEvent(CType(e.Row,_Taux_CodeSituationRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me._Taux_CodeSituationRowDeletedEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeSituationRowDeleted(Me, New _Taux_CodeSituationRowChangeEvent(CType(e.Row,_Taux_CodeSituationRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me._Taux_CodeSituationRowDeletingEvent) Is Nothing) Then
                RaiseEvent _Taux_CodeSituationRowDeleting(Me, New _Taux_CodeSituationRowChangeEvent(CType(e.Row,_Taux_CodeSituationRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Remove_Taux_CodeSituationRow(ByVal row As _Taux_CodeSituationRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "_Taux_CodeSituationDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class AR_PDataTable
        Inherits Global.System.Data.TypedTableBase(Of AR_PRow)
        
        Private columnNum As Global.System.Data.DataColumn
        
        Private columnFrom_ As Global.System.Data.DataColumn
        
        Private columnTo_ As Global.System.Data.DataColumn
        
        Private columnSubject As Global.System.Data.DataColumn
        
        Private columnIn_Reply_To As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "AR_P"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property From_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnFrom_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property To_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnTo_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SubjectColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSubject
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property In_Reply_ToColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIn_Reply_To
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As AR_PRow
            Get
                Return CType(Me.Rows(index),AR_PRow)
            End Get
        End Property
        
        Public Event AR_PRowChanging As AR_PRowChangeEventHandler
        
        Public Event AR_PRowChanged As AR_PRowChangeEventHandler
        
        Public Event AR_PRowDeleting As AR_PRowChangeEventHandler
        
        Public Event AR_PRowDeleted As AR_PRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddAR_PRow(ByVal row As AR_PRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddAR_PRow(ByVal Num As Decimal, ByVal From_ As String, ByVal To_ As String, ByVal Subject As String, ByVal In_Reply_To As String) As AR_PRow
            Dim rowAR_PRow As AR_PRow = CType(Me.NewRow,AR_PRow)
            Dim columnValuesArray() As Object = New Object() {Num, From_, To_, Subject, In_Reply_To}
            rowAR_PRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowAR_PRow)
            Return rowAR_PRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As AR_PDataTable = CType(MyBase.Clone,AR_PDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New AR_PDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNum = MyBase.Columns("Num")
            Me.columnFrom_ = MyBase.Columns("From_")
            Me.columnTo_ = MyBase.Columns("To_")
            Me.columnSubject = MyBase.Columns("Subject")
            Me.columnIn_Reply_To = MyBase.Columns("In_Reply_To")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNum = New Global.System.Data.DataColumn("Num", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum)
            Me.columnFrom_ = New Global.System.Data.DataColumn("From_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFrom_)
            Me.columnTo_ = New Global.System.Data.DataColumn("To_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTo_)
            Me.columnSubject = New Global.System.Data.DataColumn("Subject", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSubject)
            Me.columnIn_Reply_To = New Global.System.Data.DataColumn("In_Reply_To", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIn_Reply_To)
            Me.columnFrom_.MaxLength = 2147483647
            Me.columnTo_.MaxLength = 2147483647
            Me.columnSubject.MaxLength = 2147483647
            Me.columnIn_Reply_To.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewAR_PRow() As AR_PRow
            Return CType(Me.NewRow,AR_PRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New AR_PRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(AR_PRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.AR_PRowChangedEvent) Is Nothing) Then
                RaiseEvent AR_PRowChanged(Me, New AR_PRowChangeEvent(CType(e.Row,AR_PRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.AR_PRowChangingEvent) Is Nothing) Then
                RaiseEvent AR_PRowChanging(Me, New AR_PRowChangeEvent(CType(e.Row,AR_PRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.AR_PRowDeletedEvent) Is Nothing) Then
                RaiseEvent AR_PRowDeleted(Me, New AR_PRowChangeEvent(CType(e.Row,AR_PRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.AR_PRowDeletingEvent) Is Nothing) Then
                RaiseEvent AR_PRowDeleting(Me, New AR_PRowChangeEvent(CType(e.Row,AR_PRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveAR_PRow(ByVal row As AR_PRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "AR_PDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class _Service_RejetDataTable
        Inherits Global.System.Data.TypedTableBase(Of _Service_RejetRow)
        
        Private columnFichier As Global.System.Data.DataColumn
        
        Private columnFrom_ As Global.System.Data.DataColumn
        
        Private columnTo_ As Global.System.Data.DataColumn
        
        Private columnSubject As Global.System.Data.DataColumn
        
        Private columnIn_Reply_To As Global.System.Data.DataColumn
        
        Private columnContent_Description As Global.System.Data.DataColumn
        
        Private columnNum As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "Service/Rejet"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FichierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFichier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property From_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnFrom_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property To_Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnTo_
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SubjectColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSubject
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property In_Reply_ToColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnIn_Reply_To
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Content_DescriptionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnContent_Description
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As _Service_RejetRow
            Get
                Return CType(Me.Rows(index),_Service_RejetRow)
            End Get
        End Property
        
        Public Event _Service_RejetRowChanging As _Service_RejetRowChangeEventHandler
        
        Public Event _Service_RejetRowChanged As _Service_RejetRowChangeEventHandler
        
        Public Event _Service_RejetRowDeleting As _Service_RejetRowChangeEventHandler
        
        Public Event _Service_RejetRowDeleted As _Service_RejetRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub Add_Service_RejetRow(ByVal row As _Service_RejetRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function Add_Service_RejetRow(ByVal Fichier As String, ByVal From_ As String, ByVal To_ As String, ByVal Subject As String, ByVal In_Reply_To As String, ByVal Content_Description As String, ByVal Num As Decimal) As _Service_RejetRow
            Dim row_Service_RejetRow As _Service_RejetRow = CType(Me.NewRow,_Service_RejetRow)
            Dim columnValuesArray() As Object = New Object() {Fichier, From_, To_, Subject, In_Reply_To, Content_Description, Num}
            row_Service_RejetRow.ItemArray = columnValuesArray
            Me.Rows.Add(row_Service_RejetRow)
            Return row_Service_RejetRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As _Service_RejetDataTable = CType(MyBase.Clone,_Service_RejetDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New _Service_RejetDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnFichier = MyBase.Columns("Fichier")
            Me.columnFrom_ = MyBase.Columns("From_")
            Me.columnTo_ = MyBase.Columns("To_")
            Me.columnSubject = MyBase.Columns("Subject")
            Me.columnIn_Reply_To = MyBase.Columns("In_Reply_To")
            Me.columnContent_Description = MyBase.Columns("Content_Description")
            Me.columnNum = MyBase.Columns("Num")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnFichier = New Global.System.Data.DataColumn("Fichier", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFichier)
            Me.columnFrom_ = New Global.System.Data.DataColumn("From_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFrom_)
            Me.columnTo_ = New Global.System.Data.DataColumn("To_", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnTo_)
            Me.columnSubject = New Global.System.Data.DataColumn("Subject", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSubject)
            Me.columnIn_Reply_To = New Global.System.Data.DataColumn("In_Reply_To", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnIn_Reply_To)
            Me.columnContent_Description = New Global.System.Data.DataColumn("Content_Description", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnContent_Description)
            Me.columnNum = New Global.System.Data.DataColumn("Num", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum)
            Me.columnFichier.MaxLength = 2147483647
            Me.columnFrom_.MaxLength = 2147483647
            Me.columnTo_.MaxLength = 2147483647
            Me.columnSubject.MaxLength = 2147483647
            Me.columnIn_Reply_To.MaxLength = 2147483647
            Me.columnContent_Description.MaxLength = 2147483647
            Me.ExtendedProperties.Add("Generator_TableVarName", "_tableService_Rejet")
            Me.ExtendedProperties.Add("Generator_UserTableName", "Service/Rejet")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function New_Service_RejetRow() As _Service_RejetRow
            Return CType(Me.NewRow,_Service_RejetRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New _Service_RejetRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(_Service_RejetRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me._Service_RejetRowChangedEvent) Is Nothing) Then
                RaiseEvent _Service_RejetRowChanged(Me, New _Service_RejetRowChangeEvent(CType(e.Row,_Service_RejetRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me._Service_RejetRowChangingEvent) Is Nothing) Then
                RaiseEvent _Service_RejetRowChanging(Me, New _Service_RejetRowChangeEvent(CType(e.Row,_Service_RejetRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me._Service_RejetRowDeletedEvent) Is Nothing) Then
                RaiseEvent _Service_RejetRowDeleted(Me, New _Service_RejetRowChangeEvent(CType(e.Row,_Service_RejetRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me._Service_RejetRowDeletingEvent) Is Nothing) Then
                RaiseEvent _Service_RejetRowDeleting(Me, New _Service_RejetRowChangeEvent(CType(e.Row,_Service_RejetRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Remove_Service_RejetRow(ByVal row As _Service_RejetRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "_Service_RejetDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class RSP_LIGNE_REJETDataTable
        Inherits Global.System.Data.TypedTableBase(Of RSP_LIGNE_REJETRow)
        
        Private columnNum As Global.System.Data.DataColumn
        
        Private columnNumFacture As Global.System.Data.DataColumn
        
        Private columnNumLot As Global.System.Data.DataColumn
        
        Private columnCODIFICATION As Global.System.Data.DataColumn
        
        Private columnLIBELLE As Global.System.Data.DataColumn
        
        Private columnNIVEAU As Global.System.Data.DataColumn
        
        Private columnPART_CONCERNE As Global.System.Data.DataColumn
        
        Private columnNATURE_DE_PRESTATION As Global.System.Data.DataColumn
        
        Private columnDATE_DES_SOINS As Global.System.Data.DataColumn
        
        Private _columnN__EXECUTANT As Global.System.Data.DataColumn
        
        Private _columnN__DE_LIGNE As Global.System.Data.DataColumn
        
        Private columnRANG_DU_REJET As Global.System.Data.DataColumn
        
        Private columnINFORMATION_COMPLEMENTAIRE As Global.System.Data.DataColumn
        
        Private columnAcquitement As Global.System.Data.DataColumn
        
        Private columnOrg_emetteur As Global.System.Data.DataColumn
        
        Private columnnum_destinataire As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "RSP_LIGNE_REJET"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumFactureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumFacture
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CODIFICATIONColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCODIFICATION
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property LIBELLEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnLIBELLE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NIVEAUColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNIVEAU
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PART_CONCERNEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPART_CONCERNE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NATURE_DE_PRESTATIONColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNATURE_DE_PRESTATION
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DATE_DES_SOINSColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDATE_DES_SOINS
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property _N__EXECUTANTColumn() As Global.System.Data.DataColumn
            Get
                Return Me._columnN__EXECUTANT
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property _N__DE_LIGNEColumn() As Global.System.Data.DataColumn
            Get
                Return Me._columnN__DE_LIGNE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property RANG_DU_REJETColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnRANG_DU_REJET
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property INFORMATION_COMPLEMENTAIREColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnINFORMATION_COMPLEMENTAIRE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AcquitementColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAcquitement
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Org_emetteurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnOrg_emetteur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property num_destinataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnnum_destinataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As RSP_LIGNE_REJETRow
            Get
                Return CType(Me.Rows(index),RSP_LIGNE_REJETRow)
            End Get
        End Property
        
        Public Event RSP_LIGNE_REJETRowChanging As RSP_LIGNE_REJETRowChangeEventHandler
        
        Public Event RSP_LIGNE_REJETRowChanged As RSP_LIGNE_REJETRowChangeEventHandler
        
        Public Event RSP_LIGNE_REJETRowDeleting As RSP_LIGNE_REJETRowChangeEventHandler
        
        Public Event RSP_LIGNE_REJETRowDeleted As RSP_LIGNE_REJETRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddRSP_LIGNE_REJETRow(ByVal row As RSP_LIGNE_REJETRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddRSP_LIGNE_REJETRow( _
                    ByVal Num As Decimal,  _
                    ByVal NumFacture As String,  _
                    ByVal NumLot As String,  _
                    ByVal CODIFICATION As String,  _
                    ByVal LIBELLE As String,  _
                    ByVal NIVEAU As String,  _
                    ByVal PART_CONCERNE As String,  _
                    ByVal NATURE_DE_PRESTATION As String,  _
                    ByVal DATE_DES_SOINS As String,  _
                    ByVal _N__EXECUTANT As String,  _
                    ByVal _N__DE_LIGNE As String,  _
                    ByVal RANG_DU_REJET As String,  _
                    ByVal INFORMATION_COMPLEMENTAIRE As String,  _
                    ByVal Acquitement As Boolean,  _
                    ByVal Org_emetteur As String,  _
                    ByVal num_destinataire As String) As RSP_LIGNE_REJETRow
            Dim rowRSP_LIGNE_REJETRow As RSP_LIGNE_REJETRow = CType(Me.NewRow,RSP_LIGNE_REJETRow)
            Dim columnValuesArray() As Object = New Object() {Num, NumFacture, NumLot, CODIFICATION, LIBELLE, NIVEAU, PART_CONCERNE, NATURE_DE_PRESTATION, DATE_DES_SOINS, _N__EXECUTANT, _N__DE_LIGNE, RANG_DU_REJET, INFORMATION_COMPLEMENTAIRE, Acquitement, Org_emetteur, num_destinataire}
            rowRSP_LIGNE_REJETRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowRSP_LIGNE_REJETRow)
            Return rowRSP_LIGNE_REJETRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As RSP_LIGNE_REJETDataTable = CType(MyBase.Clone,RSP_LIGNE_REJETDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New RSP_LIGNE_REJETDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnNum = MyBase.Columns("Num")
            Me.columnNumFacture = MyBase.Columns("NumFacture")
            Me.columnNumLot = MyBase.Columns("NumLot")
            Me.columnCODIFICATION = MyBase.Columns("CODIFICATION")
            Me.columnLIBELLE = MyBase.Columns("LIBELLE")
            Me.columnNIVEAU = MyBase.Columns("NIVEAU")
            Me.columnPART_CONCERNE = MyBase.Columns("PART CONCERNE")
            Me.columnNATURE_DE_PRESTATION = MyBase.Columns("NATURE DE PRESTATION")
            Me.columnDATE_DES_SOINS = MyBase.Columns("DATE DES SOINS")
            Me._columnN__EXECUTANT = MyBase.Columns("N° EXECUTANT")
            Me._columnN__DE_LIGNE = MyBase.Columns("N° DE LIGNE")
            Me.columnRANG_DU_REJET = MyBase.Columns("RANG DU REJET")
            Me.columnINFORMATION_COMPLEMENTAIRE = MyBase.Columns("INFORMATION COMPLEMENTAIRE")
            Me.columnAcquitement = MyBase.Columns("Acquitement")
            Me.columnOrg_emetteur = MyBase.Columns("Org_emetteur")
            Me.columnnum_destinataire = MyBase.Columns("num_destinataire")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnNum = New Global.System.Data.DataColumn("Num", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum)
            Me.columnNumFacture = New Global.System.Data.DataColumn("NumFacture", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumFacture)
            Me.columnNumLot = New Global.System.Data.DataColumn("NumLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumLot)
            Me.columnCODIFICATION = New Global.System.Data.DataColumn("CODIFICATION", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCODIFICATION)
            Me.columnLIBELLE = New Global.System.Data.DataColumn("LIBELLE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLIBELLE)
            Me.columnNIVEAU = New Global.System.Data.DataColumn("NIVEAU", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNIVEAU)
            Me.columnPART_CONCERNE = New Global.System.Data.DataColumn("PART CONCERNE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPART_CONCERNE)
            Me.columnNATURE_DE_PRESTATION = New Global.System.Data.DataColumn("NATURE DE PRESTATION", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNATURE_DE_PRESTATION)
            Me.columnDATE_DES_SOINS = New Global.System.Data.DataColumn("DATE DES SOINS", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnDATE_DES_SOINS)
            Me._columnN__EXECUTANT = New Global.System.Data.DataColumn("N° EXECUTANT", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me._columnN__EXECUTANT.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "_columnN__EXECUTANT")
            Me._columnN__EXECUTANT.ExtendedProperties.Add("Generator_UserColumnName", "N° EXECUTANT")
            MyBase.Columns.Add(Me._columnN__EXECUTANT)
            Me._columnN__DE_LIGNE = New Global.System.Data.DataColumn("N° DE LIGNE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me._columnN__DE_LIGNE.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "_columnN__DE_LIGNE")
            Me._columnN__DE_LIGNE.ExtendedProperties.Add("Generator_UserColumnName", "N° DE LIGNE")
            MyBase.Columns.Add(Me._columnN__DE_LIGNE)
            Me.columnRANG_DU_REJET = New Global.System.Data.DataColumn("RANG DU REJET", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnRANG_DU_REJET)
            Me.columnINFORMATION_COMPLEMENTAIRE = New Global.System.Data.DataColumn("INFORMATION COMPLEMENTAIRE", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnINFORMATION_COMPLEMENTAIRE)
            Me.columnAcquitement = New Global.System.Data.DataColumn("Acquitement", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAcquitement)
            Me.columnOrg_emetteur = New Global.System.Data.DataColumn("Org_emetteur", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnOrg_emetteur)
            Me.columnnum_destinataire = New Global.System.Data.DataColumn("num_destinataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnnum_destinataire)
            Me.columnNumFacture.MaxLength = 9
            Me.columnNumLot.MaxLength = 3
            Me.columnCODIFICATION.MaxLength = 50
            Me.columnLIBELLE.MaxLength = 80
            Me.columnNIVEAU.MaxLength = 1
            Me.columnPART_CONCERNE.MaxLength = 1
            Me.columnNATURE_DE_PRESTATION.MaxLength = 5
            Me.columnDATE_DES_SOINS.MaxLength = 6
            Me._columnN__EXECUTANT.MaxLength = 9
            Me._columnN__DE_LIGNE.MaxLength = 3
            Me.columnRANG_DU_REJET.MaxLength = 2
            Me.columnINFORMATION_COMPLEMENTAIRE.MaxLength = 30
            Me.columnOrg_emetteur.MaxLength = 9
            Me.columnnum_destinataire.MaxLength = 14
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewRSP_LIGNE_REJETRow() As RSP_LIGNE_REJETRow
            Return CType(Me.NewRow,RSP_LIGNE_REJETRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New RSP_LIGNE_REJETRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(RSP_LIGNE_REJETRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.RSP_LIGNE_REJETRowChangedEvent) Is Nothing) Then
                RaiseEvent RSP_LIGNE_REJETRowChanged(Me, New RSP_LIGNE_REJETRowChangeEvent(CType(e.Row,RSP_LIGNE_REJETRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.RSP_LIGNE_REJETRowChangingEvent) Is Nothing) Then
                RaiseEvent RSP_LIGNE_REJETRowChanging(Me, New RSP_LIGNE_REJETRowChangeEvent(CType(e.Row,RSP_LIGNE_REJETRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.RSP_LIGNE_REJETRowDeletedEvent) Is Nothing) Then
                RaiseEvent RSP_LIGNE_REJETRowDeleted(Me, New RSP_LIGNE_REJETRowChangeEvent(CType(e.Row,RSP_LIGNE_REJETRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.RSP_LIGNE_REJETRowDeletingEvent) Is Nothing) Then
                RaiseEvent RSP_LIGNE_REJETRowDeleting(Me, New RSP_LIGNE_REJETRowChangeEvent(CType(e.Row,RSP_LIGNE_REJETRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveRSP_LIGNE_REJETRow(ByVal row As RSP_LIGNE_REJETRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "RSP_LIGNE_REJETDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class RSP_PaiementsDataTable
        Inherits Global.System.Data.TypedTableBase(Of RSP_PaiementsRow)
        
        Private columnDate As Global.System.Data.DataColumn
        
        Private columnLibellé_Ligne_1 As Global.System.Data.DataColumn
        
        Private columnLibellé_Ligne_2 As Global.System.Data.DataColumn
        
        Private columnOrg_Payeur As Global.System.Data.DataColumn
        
        Private columnPart As Global.System.Data.DataColumn
        
        Private columnMontant_Demandé As Global.System.Data.DataColumn
        
        Private columnEtat_Paiement As Global.System.Data.DataColumn
        
        Private columnMontant_Payé As Global.System.Data.DataColumn
        
        Private columnNumFacture As Global.System.Data.DataColumn
        
        Private columnNumLot As Global.System.Data.DataColumn
        
        Private columnFichier As Global.System.Data.DataColumn
        
        Private columnOrg_emetteur As Global.System.Data.DataColumn
        
        Private columnnum_destinataire As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "RSP_Paiements"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Libellé_Ligne_1Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnLibellé_Ligne_1
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Libellé_Ligne_2Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnLibellé_Ligne_2
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Org_PayeurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnOrg_Payeur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property PartColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPart
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Montant_DemandéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMontant_Demandé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Etat_PaiementColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEtat_Paiement
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Montant_PayéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMontant_Payé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumFactureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumFacture
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FichierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFichier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Org_emetteurColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnOrg_emetteur
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property num_destinataireColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnnum_destinataire
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As RSP_PaiementsRow
            Get
                Return CType(Me.Rows(index),RSP_PaiementsRow)
            End Get
        End Property
        
        Public Event RSP_PaiementsRowChanging As RSP_PaiementsRowChangeEventHandler
        
        Public Event RSP_PaiementsRowChanged As RSP_PaiementsRowChangeEventHandler
        
        Public Event RSP_PaiementsRowDeleting As RSP_PaiementsRowChangeEventHandler
        
        Public Event RSP_PaiementsRowDeleted As RSP_PaiementsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddRSP_PaiementsRow(ByVal row As RSP_PaiementsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddRSP_PaiementsRow(ByVal _Date As String, ByVal Libellé_Ligne_1 As String, ByVal Libellé_Ligne_2 As String, ByVal Org_Payeur As String, ByVal Part As String, ByVal Montant_Demandé As String, ByVal Etat_Paiement As String, ByVal Montant_Payé As String, ByVal NumFacture As String, ByVal NumLot As String, ByVal Fichier As String, ByVal Org_emetteur As String, ByVal num_destinataire As String) As RSP_PaiementsRow
            Dim rowRSP_PaiementsRow As RSP_PaiementsRow = CType(Me.NewRow,RSP_PaiementsRow)
            Dim columnValuesArray() As Object = New Object() {_Date, Libellé_Ligne_1, Libellé_Ligne_2, Org_Payeur, Part, Montant_Demandé, Etat_Paiement, Montant_Payé, NumFacture, NumLot, Fichier, Org_emetteur, num_destinataire}
            rowRSP_PaiementsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowRSP_PaiementsRow)
            Return rowRSP_PaiementsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As RSP_PaiementsDataTable = CType(MyBase.Clone,RSP_PaiementsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New RSP_PaiementsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnDate = MyBase.Columns("Date")
            Me.columnLibellé_Ligne_1 = MyBase.Columns("Libellé_Ligne_1")
            Me.columnLibellé_Ligne_2 = MyBase.Columns("Libellé_Ligne_2")
            Me.columnOrg_Payeur = MyBase.Columns("Org_Payeur")
            Me.columnPart = MyBase.Columns("Part")
            Me.columnMontant_Demandé = MyBase.Columns("Montant_Demandé")
            Me.columnEtat_Paiement = MyBase.Columns("Etat_Paiement")
            Me.columnMontant_Payé = MyBase.Columns("Montant_Payé")
            Me.columnNumFacture = MyBase.Columns("NumFacture")
            Me.columnNumLot = MyBase.Columns("NumLot")
            Me.columnFichier = MyBase.Columns("Fichier")
            Me.columnOrg_emetteur = MyBase.Columns("Org_emetteur")
            Me.columnnum_destinataire = MyBase.Columns("num_destinataire")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnDate = New Global.System.Data.DataColumn("Date", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "DateColumn")
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columnDate")
            Me.columnDate.ExtendedProperties.Add("Generator_UserColumnName", "Date")
            MyBase.Columns.Add(Me.columnDate)
            Me.columnLibellé_Ligne_1 = New Global.System.Data.DataColumn("Libellé_Ligne_1", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLibellé_Ligne_1)
            Me.columnLibellé_Ligne_2 = New Global.System.Data.DataColumn("Libellé_Ligne_2", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnLibellé_Ligne_2)
            Me.columnOrg_Payeur = New Global.System.Data.DataColumn("Org_Payeur", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnOrg_Payeur)
            Me.columnPart = New Global.System.Data.DataColumn("Part", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPart)
            Me.columnMontant_Demandé = New Global.System.Data.DataColumn("Montant_Demandé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMontant_Demandé)
            Me.columnEtat_Paiement = New Global.System.Data.DataColumn("Etat_Paiement", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEtat_Paiement)
            Me.columnMontant_Payé = New Global.System.Data.DataColumn("Montant_Payé", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMontant_Payé)
            Me.columnNumFacture = New Global.System.Data.DataColumn("NumFacture", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumFacture)
            Me.columnNumLot = New Global.System.Data.DataColumn("NumLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumLot)
            Me.columnFichier = New Global.System.Data.DataColumn("Fichier", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFichier)
            Me.columnOrg_emetteur = New Global.System.Data.DataColumn("Org_emetteur", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnOrg_emetteur)
            Me.columnnum_destinataire = New Global.System.Data.DataColumn("num_destinataire", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnnum_destinataire)
            Me.columnDate.MaxLength = 6
            Me.columnLibellé_Ligne_1.MaxLength = 32
            Me.columnLibellé_Ligne_2.MaxLength = 32
            Me.columnOrg_Payeur.MaxLength = 50
            Me.columnPart.MaxLength = 3
            Me.columnMontant_Demandé.MaxLength = 8
            Me.columnEtat_Paiement.MaxLength = 1
            Me.columnMontant_Payé.MaxLength = 8
            Me.columnNumFacture.MaxLength = 9
            Me.columnNumLot.MaxLength = 3
            Me.columnFichier.MaxLength = 500
            Me.columnOrg_emetteur.MaxLength = 9
            Me.columnnum_destinataire.MaxLength = 14
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewRSP_PaiementsRow() As RSP_PaiementsRow
            Return CType(Me.NewRow,RSP_PaiementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New RSP_PaiementsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(RSP_PaiementsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.RSP_PaiementsRowChangedEvent) Is Nothing) Then
                RaiseEvent RSP_PaiementsRowChanged(Me, New RSP_PaiementsRowChangeEvent(CType(e.Row,RSP_PaiementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.RSP_PaiementsRowChangingEvent) Is Nothing) Then
                RaiseEvent RSP_PaiementsRowChanging(Me, New RSP_PaiementsRowChangeEvent(CType(e.Row,RSP_PaiementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.RSP_PaiementsRowDeletedEvent) Is Nothing) Then
                RaiseEvent RSP_PaiementsRowDeleted(Me, New RSP_PaiementsRowChangeEvent(CType(e.Row,RSP_PaiementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.RSP_PaiementsRowDeletingEvent) Is Nothing) Then
                RaiseEvent RSP_PaiementsRowDeleting(Me, New RSP_PaiementsRowChangeEvent(CType(e.Row,RSP_PaiementsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveRSP_PaiementsRow(ByVal row As RSP_PaiementsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "RSP_PaiementsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class LOI_DemandeDataTable
        Inherits Global.System.Data.TypedTableBase(Of LOI_DemandeRow)
        
        Private columndate As Global.System.Data.DataColumn
        
        Private columnheure As Global.System.Data.DataColumn
        
        Private columnref_loi As Global.System.Data.DataColumn
        
        Private columncode_resultat_incr_prec As Global.System.Data.DataColumn
        
        Private columnSubject As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "LOI_Demande"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property dateColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columndate
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property heureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnheure
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ref_loiColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnref_loi
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property code_resultat_incr_precColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columncode_resultat_incr_prec
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SubjectColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSubject
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As LOI_DemandeRow
            Get
                Return CType(Me.Rows(index),LOI_DemandeRow)
            End Get
        End Property
        
        Public Event LOI_DemandeRowChanging As LOI_DemandeRowChangeEventHandler
        
        Public Event LOI_DemandeRowChanged As LOI_DemandeRowChangeEventHandler
        
        Public Event LOI_DemandeRowDeleting As LOI_DemandeRowChangeEventHandler
        
        Public Event LOI_DemandeRowDeleted As LOI_DemandeRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddLOI_DemandeRow(ByVal row As LOI_DemandeRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddLOI_DemandeRow(ByVal _date As String, ByVal heure As String, ByVal ref_loi As String, ByVal code_resultat_incr_prec As String, ByVal Subject As String) As LOI_DemandeRow
            Dim rowLOI_DemandeRow As LOI_DemandeRow = CType(Me.NewRow,LOI_DemandeRow)
            Dim columnValuesArray() As Object = New Object() {_date, heure, ref_loi, code_resultat_incr_prec, Subject}
            rowLOI_DemandeRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowLOI_DemandeRow)
            Return rowLOI_DemandeRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As LOI_DemandeDataTable = CType(MyBase.Clone,LOI_DemandeDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New LOI_DemandeDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columndate = MyBase.Columns("date")
            Me.columnheure = MyBase.Columns("heure")
            Me.columnref_loi = MyBase.Columns("ref_loi")
            Me.columncode_resultat_incr_prec = MyBase.Columns("code_resultat_incr_prec")
            Me.columnSubject = MyBase.Columns("Subject")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columndate = New Global.System.Data.DataColumn("date", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me.columndate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "dateColumn")
            Me.columndate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columndate")
            Me.columndate.ExtendedProperties.Add("Generator_UserColumnName", "date")
            MyBase.Columns.Add(Me.columndate)
            Me.columnheure = New Global.System.Data.DataColumn("heure", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnheure)
            Me.columnref_loi = New Global.System.Data.DataColumn("ref_loi", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnref_loi)
            Me.columncode_resultat_incr_prec = New Global.System.Data.DataColumn("code_resultat_incr_prec", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columncode_resultat_incr_prec)
            Me.columnSubject = New Global.System.Data.DataColumn("Subject", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSubject)
            Me.columndate.MaxLength = 2147483647
            Me.columnheure.MaxLength = 2147483647
            Me.columnref_loi.MaxLength = 2147483647
            Me.columncode_resultat_incr_prec.MaxLength = 2147483647
            Me.columnSubject.MaxLength = 2147483647
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewLOI_DemandeRow() As LOI_DemandeRow
            Return CType(Me.NewRow,LOI_DemandeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New LOI_DemandeRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(LOI_DemandeRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.LOI_DemandeRowChangedEvent) Is Nothing) Then
                RaiseEvent LOI_DemandeRowChanged(Me, New LOI_DemandeRowChangeEvent(CType(e.Row,LOI_DemandeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.LOI_DemandeRowChangingEvent) Is Nothing) Then
                RaiseEvent LOI_DemandeRowChanging(Me, New LOI_DemandeRowChangeEvent(CType(e.Row,LOI_DemandeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.LOI_DemandeRowDeletedEvent) Is Nothing) Then
                RaiseEvent LOI_DemandeRowDeleted(Me, New LOI_DemandeRowChangeEvent(CType(e.Row,LOI_DemandeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.LOI_DemandeRowDeletingEvent) Is Nothing) Then
                RaiseEvent LOI_DemandeRowDeleting(Me, New LOI_DemandeRowChangeEvent(CType(e.Row,LOI_DemandeRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveLOI_DemandeRow(ByVal row As LOI_DemandeRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "LOI_DemandeDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class SCOR_PJDataTable
        Inherits Global.System.Data.TypedTableBase(Of SCOR_PJRow)
        
        Private columnFichier As Global.System.Data.DataColumn
        
        Private columnID As Global.System.Data.DataColumn
        
        Private columnStatut_Transmission As Global.System.Data.DataColumn
        
        Private columnNum_Facture As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "SCOR_PJ"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property FichierColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnFichier
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property IDColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnID
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Statut_TransmissionColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnStatut_Transmission
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Num_FactureColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNum_Facture
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As SCOR_PJRow
            Get
                Return CType(Me.Rows(index),SCOR_PJRow)
            End Get
        End Property
        
        Public Event SCOR_PJRowChanging As SCOR_PJRowChangeEventHandler
        
        Public Event SCOR_PJRowChanged As SCOR_PJRowChangeEventHandler
        
        Public Event SCOR_PJRowDeleting As SCOR_PJRowChangeEventHandler
        
        Public Event SCOR_PJRowDeleted As SCOR_PJRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddSCOR_PJRow(ByVal row As SCOR_PJRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddSCOR_PJRow(ByVal Fichier As String, ByVal ID As String, ByVal Statut_Transmission As String, ByVal Num_Facture As String) As SCOR_PJRow
            Dim rowSCOR_PJRow As SCOR_PJRow = CType(Me.NewRow,SCOR_PJRow)
            Dim columnValuesArray() As Object = New Object() {Fichier, ID, Statut_Transmission, Num_Facture}
            rowSCOR_PJRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowSCOR_PJRow)
            Return rowSCOR_PJRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As SCOR_PJDataTable = CType(MyBase.Clone,SCOR_PJDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New SCOR_PJDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnFichier = MyBase.Columns("Fichier")
            Me.columnID = MyBase.Columns("ID")
            Me.columnStatut_Transmission = MyBase.Columns("Statut_Transmission")
            Me.columnNum_Facture = MyBase.Columns("Num_Facture")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnFichier = New Global.System.Data.DataColumn("Fichier", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnFichier)
            Me.columnID = New Global.System.Data.DataColumn("ID", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnID)
            Me.columnStatut_Transmission = New Global.System.Data.DataColumn("Statut_Transmission", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnStatut_Transmission)
            Me.columnNum_Facture = New Global.System.Data.DataColumn("Num_Facture", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNum_Facture)
            Me.columnFichier.MaxLength = 50
            Me.columnID.MaxLength = 2147483647
            Me.columnStatut_Transmission.MaxLength = 50
            Me.columnNum_Facture.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewSCOR_PJRow() As SCOR_PJRow
            Return CType(Me.NewRow,SCOR_PJRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New SCOR_PJRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(SCOR_PJRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.SCOR_PJRowChangedEvent) Is Nothing) Then
                RaiseEvent SCOR_PJRowChanged(Me, New SCOR_PJRowChangeEvent(CType(e.Row,SCOR_PJRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.SCOR_PJRowChangingEvent) Is Nothing) Then
                RaiseEvent SCOR_PJRowChanging(Me, New SCOR_PJRowChangeEvent(CType(e.Row,SCOR_PJRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.SCOR_PJRowDeletedEvent) Is Nothing) Then
                RaiseEvent SCOR_PJRowDeleted(Me, New SCOR_PJRowChangeEvent(CType(e.Row,SCOR_PJRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.SCOR_PJRowDeletingEvent) Is Nothing) Then
                RaiseEvent SCOR_PJRowDeleting(Me, New SCOR_PJRowChangeEvent(CType(e.Row,SCOR_PJRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveSCOR_PJRow(ByVal row As SCOR_PJRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "SCOR_PJDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class SCOR_lotsDataTable
        Inherits Global.System.Data.TypedTableBase(Of SCOR_lotsRow)
        
        Private columnEnTete As Global.System.Data.DataColumn
        
        Private columnNumLot As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "SCOR_lots"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EnTeteColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEnTete
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property NumLotColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnNumLot
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As SCOR_lotsRow
            Get
                Return CType(Me.Rows(index),SCOR_lotsRow)
            End Get
        End Property
        
        Public Event SCOR_lotsRowChanging As SCOR_lotsRowChangeEventHandler
        
        Public Event SCOR_lotsRowChanged As SCOR_lotsRowChangeEventHandler
        
        Public Event SCOR_lotsRowDeleting As SCOR_lotsRowChangeEventHandler
        
        Public Event SCOR_lotsRowDeleted As SCOR_lotsRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddSCOR_lotsRow(ByVal row As SCOR_lotsRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddSCOR_lotsRow(ByVal EnTete As String, ByVal NumLot As String) As SCOR_lotsRow
            Dim rowSCOR_lotsRow As SCOR_lotsRow = CType(Me.NewRow,SCOR_lotsRow)
            Dim columnValuesArray() As Object = New Object() {EnTete, NumLot}
            rowSCOR_lotsRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowSCOR_lotsRow)
            Return rowSCOR_lotsRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As SCOR_lotsDataTable = CType(MyBase.Clone,SCOR_lotsDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New SCOR_lotsDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnEnTete = MyBase.Columns("EnTete")
            Me.columnNumLot = MyBase.Columns("NumLot")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnEnTete = New Global.System.Data.DataColumn("EnTete", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEnTete)
            Me.columnNumLot = New Global.System.Data.DataColumn("NumLot", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnNumLot)
            Me.columnEnTete.MaxLength = 50
            Me.columnNumLot.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewSCOR_lotsRow() As SCOR_lotsRow
            Return CType(Me.NewRow,SCOR_lotsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New SCOR_lotsRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(SCOR_lotsRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.SCOR_lotsRowChangedEvent) Is Nothing) Then
                RaiseEvent SCOR_lotsRowChanged(Me, New SCOR_lotsRowChangeEvent(CType(e.Row,SCOR_lotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.SCOR_lotsRowChangingEvent) Is Nothing) Then
                RaiseEvent SCOR_lotsRowChanging(Me, New SCOR_lotsRowChangeEvent(CType(e.Row,SCOR_lotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.SCOR_lotsRowDeletedEvent) Is Nothing) Then
                RaiseEvent SCOR_lotsRowDeleted(Me, New SCOR_lotsRowChangeEvent(CType(e.Row,SCOR_lotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.SCOR_lotsRowDeletingEvent) Is Nothing) Then
                RaiseEvent SCOR_lotsRowDeleting(Me, New SCOR_lotsRowChangeEvent(CType(e.Row,SCOR_lotsRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveSCOR_lotsRow(ByVal row As SCOR_lotsRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "SCOR_lotsDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class compatibilités__codes_prestation__qualité_bénéficiaireDataTable
        Inherits Global.System.Data.TypedTableBase(Of compatibilités__codes_prestation__qualité_bénéficiaireRow)
        
        Private columnCode_Prestation As Global.System.Data.DataColumn
        
        Private columnAssuré As Global.System.Data.DataColumn
        
        Private columnAscendant As Global.System.Data.DataColumn
        
        Private columnConjoint As Global.System.Data.DataColumn
        
        Private columnConjoint_Divorcé As Global.System.Data.DataColumn
        
        Private columnConcubin As Global.System.Data.DataColumn
        
        Private columnConjointSéparé As Global.System.Data.DataColumn
        
        Private columnEnfant As Global.System.Data.DataColumn
        
        Private columnConjointVeuf As Global.System.Data.DataColumn
        
        Private columnAgeMinMois As Global.System.Data.DataColumn
        
        Private columnAgeMinAnnées As Global.System.Data.DataColumn
        
        Private columnAgeMaxMois As Global.System.Data.DataColumn
        
        Private columnAgeMaxAnnées As Global.System.Data.DataColumn
        
        Private columnAutre_ayant_droit As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "compatibilités_ codes_prestation_ qualité_bénéficiaire"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Code_PrestationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCode_Prestation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AssuréColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAssuré
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AscendantColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAscendant
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ConjointColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnConjoint
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Conjoint_DivorcéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnConjoint_Divorcé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ConcubinColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnConcubin
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ConjointSéparéColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnConjointSéparé
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property EnfantColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnEnfant
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ConjointVeufColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnConjointVeuf
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AgeMinMoisColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAgeMinMois
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AgeMinAnnéesColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAgeMinAnnées
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AgeMaxMoisColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAgeMaxMois
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property AgeMaxAnnéesColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAgeMaxAnnées
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Autre_ayant_droitColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnAutre_ayant_droit
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As compatibilités__codes_prestation__qualité_bénéficiaireRow
            Get
                Return CType(Me.Rows(index),compatibilités__codes_prestation__qualité_bénéficiaireRow)
            End Get
        End Property
        
        Public Event compatibilités__codes_prestation__qualité_bénéficiaireRowChanging As compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEventHandler
        
        Public Event compatibilités__codes_prestation__qualité_bénéficiaireRowChanged As compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEventHandler
        
        Public Event compatibilités__codes_prestation__qualité_bénéficiaireRowDeleting As compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEventHandler
        
        Public Event compatibilités__codes_prestation__qualité_bénéficiaireRowDeleted As compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub Addcompatibilités__codes_prestation__qualité_bénéficiaireRow(ByVal row As compatibilités__codes_prestation__qualité_bénéficiaireRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function Addcompatibilités__codes_prestation__qualité_bénéficiaireRow(ByVal Code_Prestation As String, ByVal Assuré As Boolean, ByVal Ascendant As Boolean, ByVal Conjoint As Boolean, ByVal Conjoint_Divorcé As Boolean, ByVal Concubin As Boolean, ByVal ConjointSéparé As Boolean, ByVal Enfant As Boolean, ByVal ConjointVeuf As Boolean, ByVal AgeMinMois As Decimal, ByVal AgeMinAnnées As Decimal, ByVal AgeMaxMois As Decimal, ByVal AgeMaxAnnées As Decimal, ByVal Autre_ayant_droit As Boolean) As compatibilités__codes_prestation__qualité_bénéficiaireRow
            Dim rowcompatibilités__codes_prestation__qualité_bénéficiaireRow As compatibilités__codes_prestation__qualité_bénéficiaireRow = CType(Me.NewRow,compatibilités__codes_prestation__qualité_bénéficiaireRow)
            Dim columnValuesArray() As Object = New Object() {Code_Prestation, Assuré, Ascendant, Conjoint, Conjoint_Divorcé, Concubin, ConjointSéparé, Enfant, ConjointVeuf, AgeMinMois, AgeMinAnnées, AgeMaxMois, AgeMaxAnnées, Autre_ayant_droit}
            rowcompatibilités__codes_prestation__qualité_bénéficiaireRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowcompatibilités__codes_prestation__qualité_bénéficiaireRow)
            Return rowcompatibilités__codes_prestation__qualité_bénéficiaireRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As compatibilités__codes_prestation__qualité_bénéficiaireDataTable = CType(MyBase.Clone,compatibilités__codes_prestation__qualité_bénéficiaireDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New compatibilités__codes_prestation__qualité_bénéficiaireDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCode_Prestation = MyBase.Columns("Code_Prestation")
            Me.columnAssuré = MyBase.Columns("Assuré")
            Me.columnAscendant = MyBase.Columns("Ascendant")
            Me.columnConjoint = MyBase.Columns("Conjoint")
            Me.columnConjoint_Divorcé = MyBase.Columns("Conjoint_Divorcé")
            Me.columnConcubin = MyBase.Columns("Concubin")
            Me.columnConjointSéparé = MyBase.Columns("ConjointSéparé")
            Me.columnEnfant = MyBase.Columns("Enfant")
            Me.columnConjointVeuf = MyBase.Columns("ConjointVeuf")
            Me.columnAgeMinMois = MyBase.Columns("AgeMinMois")
            Me.columnAgeMinAnnées = MyBase.Columns("AgeMinAnnées")
            Me.columnAgeMaxMois = MyBase.Columns("AgeMaxMois")
            Me.columnAgeMaxAnnées = MyBase.Columns("AgeMaxAnnées")
            Me.columnAutre_ayant_droit = MyBase.Columns("Autre_ayant_droit")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCode_Prestation = New Global.System.Data.DataColumn("Code_Prestation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCode_Prestation)
            Me.columnAssuré = New Global.System.Data.DataColumn("Assuré", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAssuré)
            Me.columnAscendant = New Global.System.Data.DataColumn("Ascendant", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAscendant)
            Me.columnConjoint = New Global.System.Data.DataColumn("Conjoint", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnConjoint)
            Me.columnConjoint_Divorcé = New Global.System.Data.DataColumn("Conjoint_Divorcé", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnConjoint_Divorcé)
            Me.columnConcubin = New Global.System.Data.DataColumn("Concubin", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnConcubin)
            Me.columnConjointSéparé = New Global.System.Data.DataColumn("ConjointSéparé", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnConjointSéparé)
            Me.columnEnfant = New Global.System.Data.DataColumn("Enfant", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnEnfant)
            Me.columnConjointVeuf = New Global.System.Data.DataColumn("ConjointVeuf", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnConjointVeuf)
            Me.columnAgeMinMois = New Global.System.Data.DataColumn("AgeMinMois", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAgeMinMois)
            Me.columnAgeMinAnnées = New Global.System.Data.DataColumn("AgeMinAnnées", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAgeMinAnnées)
            Me.columnAgeMaxMois = New Global.System.Data.DataColumn("AgeMaxMois", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAgeMaxMois)
            Me.columnAgeMaxAnnées = New Global.System.Data.DataColumn("AgeMaxAnnées", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAgeMaxAnnées)
            Me.columnAutre_ayant_droit = New Global.System.Data.DataColumn("Autre_ayant_droit", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnAutre_ayant_droit)
            Me.columnCode_Prestation.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Newcompatibilités__codes_prestation__qualité_bénéficiaireRow() As compatibilités__codes_prestation__qualité_bénéficiaireRow
            Return CType(Me.NewRow,compatibilités__codes_prestation__qualité_bénéficiaireRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New compatibilités__codes_prestation__qualité_bénéficiaireRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(compatibilités__codes_prestation__qualité_bénéficiaireRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.compatibilités__codes_prestation__qualité_bénéficiaireRowChangedEvent) Is Nothing) Then
                RaiseEvent compatibilités__codes_prestation__qualité_bénéficiaireRowChanged(Me, New compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEvent(CType(e.Row,compatibilités__codes_prestation__qualité_bénéficiaireRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.compatibilités__codes_prestation__qualité_bénéficiaireRowChangingEvent) Is Nothing) Then
                RaiseEvent compatibilités__codes_prestation__qualité_bénéficiaireRowChanging(Me, New compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEvent(CType(e.Row,compatibilités__codes_prestation__qualité_bénéficiaireRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.compatibilités__codes_prestation__qualité_bénéficiaireRowDeletedEvent) Is Nothing) Then
                RaiseEvent compatibilités__codes_prestation__qualité_bénéficiaireRowDeleted(Me, New compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEvent(CType(e.Row,compatibilités__codes_prestation__qualité_bénéficiaireRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.compatibilités__codes_prestation__qualité_bénéficiaireRowDeletingEvent) Is Nothing) Then
                RaiseEvent compatibilités__codes_prestation__qualité_bénéficiaireRowDeleting(Me, New compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEvent(CType(e.Row,compatibilités__codes_prestation__qualité_bénéficiaireRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Removecompatibilités__codes_prestation__qualité_bénéficiaireRow(ByVal row As compatibilités__codes_prestation__qualité_bénéficiaireRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "compatibilités__codes_prestation__qualité_bénéficiaireDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class compatibilités_codes_prestation_nature_assuranceDataTable
        Inherits Global.System.Data.TypedTableBase(Of compatibilités_codes_prestation_nature_assuranceRow)
        
        Private columnCodePrestation As Global.System.Data.DataColumn
        
        Private columnMALADIE As Global.System.Data.DataColumn
        
        Private columnMATERNITE As Global.System.Data.DataColumn
        
        Private columnACCIDENTDUTRAVAIL As Global.System.Data.DataColumn
        
        Private columnSMG As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "compatibilités_codes_prestation_nature_assurance"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CodePrestationColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnCodePrestation
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MALADIEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMALADIE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property MATERNITEColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnMATERNITE
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property ACCIDENTDUTRAVAILColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnACCIDENTDUTRAVAIL
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property SMGColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnSMG
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As compatibilités_codes_prestation_nature_assuranceRow
            Get
                Return CType(Me.Rows(index),compatibilités_codes_prestation_nature_assuranceRow)
            End Get
        End Property
        
        Public Event compatibilités_codes_prestation_nature_assuranceRowChanging As compatibilités_codes_prestation_nature_assuranceRowChangeEventHandler
        
        Public Event compatibilités_codes_prestation_nature_assuranceRowChanged As compatibilités_codes_prestation_nature_assuranceRowChangeEventHandler
        
        Public Event compatibilités_codes_prestation_nature_assuranceRowDeleting As compatibilités_codes_prestation_nature_assuranceRowChangeEventHandler
        
        Public Event compatibilités_codes_prestation_nature_assuranceRowDeleted As compatibilités_codes_prestation_nature_assuranceRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub Addcompatibilités_codes_prestation_nature_assuranceRow(ByVal row As compatibilités_codes_prestation_nature_assuranceRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function Addcompatibilités_codes_prestation_nature_assuranceRow(ByVal CodePrestation As String, ByVal MALADIE As Boolean, ByVal MATERNITE As Boolean, ByVal ACCIDENTDUTRAVAIL As Boolean, ByVal SMG As Boolean) As compatibilités_codes_prestation_nature_assuranceRow
            Dim rowcompatibilités_codes_prestation_nature_assuranceRow As compatibilités_codes_prestation_nature_assuranceRow = CType(Me.NewRow,compatibilités_codes_prestation_nature_assuranceRow)
            Dim columnValuesArray() As Object = New Object() {CodePrestation, MALADIE, MATERNITE, ACCIDENTDUTRAVAIL, SMG}
            rowcompatibilités_codes_prestation_nature_assuranceRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowcompatibilités_codes_prestation_nature_assuranceRow)
            Return rowcompatibilités_codes_prestation_nature_assuranceRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As compatibilités_codes_prestation_nature_assuranceDataTable = CType(MyBase.Clone,compatibilités_codes_prestation_nature_assuranceDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New compatibilités_codes_prestation_nature_assuranceDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCodePrestation = MyBase.Columns("CodePrestation")
            Me.columnMALADIE = MyBase.Columns("MALADIE")
            Me.columnMATERNITE = MyBase.Columns("MATERNITE")
            Me.columnACCIDENTDUTRAVAIL = MyBase.Columns("ACCIDENTDUTRAVAIL")
            Me.columnSMG = MyBase.Columns("SMG")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCodePrestation = New Global.System.Data.DataColumn("CodePrestation", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCodePrestation)
            Me.columnMALADIE = New Global.System.Data.DataColumn("MALADIE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMALADIE)
            Me.columnMATERNITE = New Global.System.Data.DataColumn("MATERNITE", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnMATERNITE)
            Me.columnACCIDENTDUTRAVAIL = New Global.System.Data.DataColumn("ACCIDENTDUTRAVAIL", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnACCIDENTDUTRAVAIL)
            Me.columnSMG = New Global.System.Data.DataColumn("SMG", GetType(Boolean), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnSMG)
            Me.columnCodePrestation.MaxLength = 50
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Newcompatibilités_codes_prestation_nature_assuranceRow() As compatibilités_codes_prestation_nature_assuranceRow
            Return CType(Me.NewRow,compatibilités_codes_prestation_nature_assuranceRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New compatibilités_codes_prestation_nature_assuranceRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(compatibilités_codes_prestation_nature_assuranceRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.compatibilités_codes_prestation_nature_assuranceRowChangedEvent) Is Nothing) Then
                RaiseEvent compatibilités_codes_prestation_nature_assuranceRowChanged(Me, New compatibilités_codes_prestation_nature_assuranceRowChangeEvent(CType(e.Row,compatibilités_codes_prestation_nature_assuranceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.compatibilités_codes_prestation_nature_assuranceRowChangingEvent) Is Nothing) Then
                RaiseEvent compatibilités_codes_prestation_nature_assuranceRowChanging(Me, New compatibilités_codes_prestation_nature_assuranceRowChangeEvent(CType(e.Row,compatibilités_codes_prestation_nature_assuranceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.compatibilités_codes_prestation_nature_assuranceRowDeletedEvent) Is Nothing) Then
                RaiseEvent compatibilités_codes_prestation_nature_assuranceRowDeleted(Me, New compatibilités_codes_prestation_nature_assuranceRowChangeEvent(CType(e.Row,compatibilités_codes_prestation_nature_assuranceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.compatibilités_codes_prestation_nature_assuranceRowDeletingEvent) Is Nothing) Then
                RaiseEvent compatibilités_codes_prestation_nature_assuranceRowDeleting(Me, New compatibilités_codes_prestation_nature_assuranceRowChangeEvent(CType(e.Row,compatibilités_codes_prestation_nature_assuranceRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Removecompatibilités_codes_prestation_nature_assuranceRow(ByVal row As compatibilités_codes_prestation_nature_assuranceRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "compatibilités_codes_prestation_nature_assuranceDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class BDM_PrixDataTable
        Inherits Global.System.Data.TypedTableBase(Of BDM_PrixRow)
        
        Private columnCIP13 As Global.System.Data.DataColumn
        
        Private columnCIP7 As Global.System.Data.DataColumn
        
        Private columnPrix_Public_TTC As Global.System.Data.DataColumn
        
        Private columnPrix_Fabricant_HT As Global.System.Data.DataColumn
        
        Private columnDate As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "BDM_Prix"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CIP13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnCIP13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CIP7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnCIP7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Prix_Public_TTCColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrix_Public_TTC
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Prix_Fabricant_HTColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnPrix_Fabricant_HT
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property DateColumn() As Global.System.Data.DataColumn
            Get
                Return Me.columnDate
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As BDM_PrixRow
            Get
                Return CType(Me.Rows(index),BDM_PrixRow)
            End Get
        End Property
        
        Public Event BDM_PrixRowChanging As BDM_PrixRowChangeEventHandler
        
        Public Event BDM_PrixRowChanged As BDM_PrixRowChangeEventHandler
        
        Public Event BDM_PrixRowDeleting As BDM_PrixRowChangeEventHandler
        
        Public Event BDM_PrixRowDeleted As BDM_PrixRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddBDM_PrixRow(ByVal row As BDM_PrixRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddBDM_PrixRow(ByVal CIP13 As String, ByVal CIP7 As String, ByVal Prix_Public_TTC As Decimal, ByVal Prix_Fabricant_HT As Decimal, ByVal _Date As String) As BDM_PrixRow
            Dim rowBDM_PrixRow As BDM_PrixRow = CType(Me.NewRow,BDM_PrixRow)
            Dim columnValuesArray() As Object = New Object() {CIP13, CIP7, Prix_Public_TTC, Prix_Fabricant_HT, _Date}
            rowBDM_PrixRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowBDM_PrixRow)
            Return rowBDM_PrixRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As BDM_PrixDataTable = CType(MyBase.Clone,BDM_PrixDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New BDM_PrixDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCIP13 = MyBase.Columns("CIP13")
            Me.columnCIP7 = MyBase.Columns("CIP7")
            Me.columnPrix_Public_TTC = MyBase.Columns("Prix_Public_TTC")
            Me.columnPrix_Fabricant_HT = MyBase.Columns("Prix_Fabricant_HT")
            Me.columnDate = MyBase.Columns("Date")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCIP13 = New Global.System.Data.DataColumn("CIP13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCIP13)
            Me.columnCIP7 = New Global.System.Data.DataColumn("CIP7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCIP7)
            Me.columnPrix_Public_TTC = New Global.System.Data.DataColumn("Prix_Public_TTC", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrix_Public_TTC)
            Me.columnPrix_Fabricant_HT = New Global.System.Data.DataColumn("Prix_Fabricant_HT", GetType(Decimal), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnPrix_Fabricant_HT)
            Me.columnDate = New Global.System.Data.DataColumn("Date", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnPropNameInTable", "DateColumn")
            Me.columnDate.ExtendedProperties.Add("Generator_ColumnVarNameInTable", "columnDate")
            Me.columnDate.ExtendedProperties.Add("Generator_UserColumnName", "Date")
            MyBase.Columns.Add(Me.columnDate)
            Me.columnCIP13.MaxLength = 13
            Me.columnCIP7.MaxLength = 7
            Me.columnDate.MaxLength = 8
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewBDM_PrixRow() As BDM_PrixRow
            Return CType(Me.NewRow,BDM_PrixRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New BDM_PrixRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(BDM_PrixRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.BDM_PrixRowChangedEvent) Is Nothing) Then
                RaiseEvent BDM_PrixRowChanged(Me, New BDM_PrixRowChangeEvent(CType(e.Row,BDM_PrixRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.BDM_PrixRowChangingEvent) Is Nothing) Then
                RaiseEvent BDM_PrixRowChanging(Me, New BDM_PrixRowChangeEvent(CType(e.Row,BDM_PrixRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.BDM_PrixRowDeletedEvent) Is Nothing) Then
                RaiseEvent BDM_PrixRowDeleted(Me, New BDM_PrixRowChangeEvent(CType(e.Row,BDM_PrixRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.BDM_PrixRowDeletingEvent) Is Nothing) Then
                RaiseEvent BDM_PrixRowDeleting(Me, New BDM_PrixRowChangeEvent(CType(e.Row,BDM_PrixRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveBDM_PrixRow(ByVal row As BDM_PrixRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "BDM_PrixDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents the strongly named DataTable class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.Serializable(),  _
     Global.System.Xml.Serialization.XmlSchemaProviderAttribute("GetTypedTableSchema")>  _
    Partial Public Class BDM_médicaments_detournablesDataTable
        Inherits Global.System.Data.TypedTableBase(Of BDM_médicaments_detournablesRow)
        
        Private columnCIP13 As Global.System.Data.DataColumn
        
        Private columnCIP7 As Global.System.Data.DataColumn
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.TableName = "BDM_médicaments_detournables"
            Me.BeginInit
            Me.InitClass
            Me.EndInit
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal table As Global.System.Data.DataTable)
            MyBase.New
            Me.TableName = table.TableName
            If (table.CaseSensitive <> table.DataSet.CaseSensitive) Then
                Me.CaseSensitive = table.CaseSensitive
            End If
            If (table.Locale.ToString <> table.DataSet.Locale.ToString) Then
                Me.Locale = table.Locale
            End If
            If (table.Namespace <> table.DataSet.Namespace) Then
                Me.Namespace = table.Namespace
            End If
            Me.Prefix = table.Prefix
            Me.MinimumCapacity = table.MinimumCapacity
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Sub New(ByVal info As Global.System.Runtime.Serialization.SerializationInfo, ByVal context As Global.System.Runtime.Serialization.StreamingContext)
            MyBase.New(info, context)
            Me.InitVars
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CIP13Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnCIP13
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property CIP7Column() As Global.System.Data.DataColumn
            Get
                Return Me.columnCIP7
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property Count() As Integer
            Get
                Return Me.Rows.Count
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Default ReadOnly Property Item(ByVal index As Integer) As BDM_médicaments_detournablesRow
            Get
                Return CType(Me.Rows(index),BDM_médicaments_detournablesRow)
            End Get
        End Property
        
        Public Event BDM_médicaments_detournablesRowChanging As BDM_médicaments_detournablesRowChangeEventHandler
        
        Public Event BDM_médicaments_detournablesRowChanged As BDM_médicaments_detournablesRowChangeEventHandler
        
        Public Event BDM_médicaments_detournablesRowDeleting As BDM_médicaments_detournablesRowChangeEventHandler
        
        Public Event BDM_médicaments_detournablesRowDeleted As BDM_médicaments_detournablesRowChangeEventHandler
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Sub AddBDM_médicaments_detournablesRow(ByVal row As BDM_médicaments_detournablesRow)
            Me.Rows.Add(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overloads Function AddBDM_médicaments_detournablesRow(ByVal CIP13 As String, ByVal CIP7 As String) As BDM_médicaments_detournablesRow
            Dim rowBDM_médicaments_detournablesRow As BDM_médicaments_detournablesRow = CType(Me.NewRow,BDM_médicaments_detournablesRow)
            Dim columnValuesArray() As Object = New Object() {CIP13, CIP7}
            rowBDM_médicaments_detournablesRow.ItemArray = columnValuesArray
            Me.Rows.Add(rowBDM_médicaments_detournablesRow)
            Return rowBDM_médicaments_detournablesRow
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overrides Function Clone() As Global.System.Data.DataTable
            Dim cln As BDM_médicaments_detournablesDataTable = CType(MyBase.Clone,BDM_médicaments_detournablesDataTable)
            cln.InitVars
            Return cln
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function CreateInstance() As Global.System.Data.DataTable
            Return New BDM_médicaments_detournablesDataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub InitVars()
            Me.columnCIP13 = MyBase.Columns("CIP13")
            Me.columnCIP7 = MyBase.Columns("CIP7")
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitClass()
            Me.columnCIP13 = New Global.System.Data.DataColumn("CIP13", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCIP13)
            Me.columnCIP7 = New Global.System.Data.DataColumn("CIP7", GetType(String), Nothing, Global.System.Data.MappingType.Element)
            MyBase.Columns.Add(Me.columnCIP7)
            Me.columnCIP13.MaxLength = 13
            Me.columnCIP7.MaxLength = 7
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function NewBDM_médicaments_detournablesRow() As BDM_médicaments_detournablesRow
            Return CType(Me.NewRow,BDM_médicaments_detournablesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function NewRowFromBuilder(ByVal builder As Global.System.Data.DataRowBuilder) As Global.System.Data.DataRow
            Return New BDM_médicaments_detournablesRow(builder)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Function GetRowType() As Global.System.Type
            Return GetType(BDM_médicaments_detournablesRow)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanged(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanged(e)
            If (Not (Me.BDM_médicaments_detournablesRowChangedEvent) Is Nothing) Then
                RaiseEvent BDM_médicaments_detournablesRowChanged(Me, New BDM_médicaments_detournablesRowChangeEvent(CType(e.Row,BDM_médicaments_detournablesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowChanging(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowChanging(e)
            If (Not (Me.BDM_médicaments_detournablesRowChangingEvent) Is Nothing) Then
                RaiseEvent BDM_médicaments_detournablesRowChanging(Me, New BDM_médicaments_detournablesRowChangeEvent(CType(e.Row,BDM_médicaments_detournablesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleted(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleted(e)
            If (Not (Me.BDM_médicaments_detournablesRowDeletedEvent) Is Nothing) Then
                RaiseEvent BDM_médicaments_detournablesRowDeleted(Me, New BDM_médicaments_detournablesRowChangeEvent(CType(e.Row,BDM_médicaments_detournablesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overrides Sub OnRowDeleting(ByVal e As Global.System.Data.DataRowChangeEventArgs)
            MyBase.OnRowDeleting(e)
            If (Not (Me.BDM_médicaments_detournablesRowDeletingEvent) Is Nothing) Then
                RaiseEvent BDM_médicaments_detournablesRowDeleting(Me, New BDM_médicaments_detournablesRowChangeEvent(CType(e.Row,BDM_médicaments_detournablesRow), e.Action))
            End If
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub RemoveBDM_médicaments_detournablesRow(ByVal row As BDM_médicaments_detournablesRow)
            Me.Rows.Remove(row)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Shared Function GetTypedTableSchema(ByVal xs As Global.System.Xml.Schema.XmlSchemaSet) As Global.System.Xml.Schema.XmlSchemaComplexType
            Dim type As Global.System.Xml.Schema.XmlSchemaComplexType = New Global.System.Xml.Schema.XmlSchemaComplexType
            Dim sequence As Global.System.Xml.Schema.XmlSchemaSequence = New Global.System.Xml.Schema.XmlSchemaSequence
            Dim ds As PharmaDataSet = New PharmaDataSet
            Dim any1 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any1.Namespace = "http://www.w3.org/2001/XMLSchema"
            any1.MinOccurs = New Decimal(0)
            any1.MaxOccurs = Decimal.MaxValue
            any1.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any1)
            Dim any2 As Global.System.Xml.Schema.XmlSchemaAny = New Global.System.Xml.Schema.XmlSchemaAny
            any2.Namespace = "urn:schemas-microsoft-com:xml-diffgram-v1"
            any2.MinOccurs = New Decimal(1)
            any2.ProcessContents = Global.System.Xml.Schema.XmlSchemaContentProcessing.Lax
            sequence.Items.Add(any2)
            Dim attribute1 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute1.Name = "namespace"
            attribute1.FixedValue = ds.Namespace
            type.Attributes.Add(attribute1)
            Dim attribute2 As Global.System.Xml.Schema.XmlSchemaAttribute = New Global.System.Xml.Schema.XmlSchemaAttribute
            attribute2.Name = "tableTypeName"
            attribute2.FixedValue = "BDM_médicaments_detournablesDataTable"
            type.Attributes.Add(attribute2)
            type.Particle = sequence
            Dim dsSchema As Global.System.Xml.Schema.XmlSchema = ds.GetSchemaSerializable
            If xs.Contains(dsSchema.TargetNamespace) Then
                Dim s1 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Dim s2 As Global.System.IO.MemoryStream = New Global.System.IO.MemoryStream
                Try 
                    Dim schema As Global.System.Xml.Schema.XmlSchema = Nothing
                    dsSchema.Write(s1)
                    Dim schemas As Global.System.Collections.IEnumerator = xs.Schemas(dsSchema.TargetNamespace).GetEnumerator
                    Do While schemas.MoveNext
                        schema = CType(schemas.Current,Global.System.Xml.Schema.XmlSchema)
                        s2.SetLength(0)
                        schema.Write(s2)
                        If (s1.Length = s2.Length) Then
                            s1.Position = 0
                            s2.Position = 0
                            
                            Do While ((s1.Position <> s1.Length)  _
                                        AndAlso (s1.ReadByte = s2.ReadByte))
                                
                                
                            Loop
                            If (s1.Position = s1.Length) Then
                                Return type
                            End If
                        End If
                        
                    Loop
                Finally
                    If (Not (s1) Is Nothing) Then
                        s1.Close
                    End If
                    If (Not (s2) Is Nothing) Then
                        s2.Close
                    End If
                End Try
            End If
            xs.Add(dsSchema)
            Return type
        End Function
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class ProduitsRow
        Inherits Global.System.Data.DataRow
        
        Private tableProduits As ProduitsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableProduits = CType(Me.Table,ProduitsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CIP() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.CIPColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CIP' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.CIPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property EAN13() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.EAN13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'EAN13' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.EAN13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CAB() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.CABColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CAB' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.CABColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Designation() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.DesignationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Designation' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.DesignationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PrixachatRemiseHT() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.PrixachatRemiseHTColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PrixachatRemiseHT' dans la table 'Produits' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.PrixachatRemiseHTColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PrixventeTTC() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.PrixventeTTCColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PrixventeTTC' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.PrixventeTTCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PrixachatHT() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.PrixachatHTColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PrixachatHT' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.PrixachatHTColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TVA() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.TVAColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TVA' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.TVAColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Stock() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.StockColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Stock' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.StockColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Marque() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.MarqueColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Marque' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.MarqueColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Repartiteurattitre() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.RepartiteurattitreColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Repartiteurattitre' dans la table 'Produits' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.RepartiteurattitreColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LPP() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.LPPColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LPP' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.LPPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Colisage() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.ColisageColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Colisage' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.ColisageColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CommentaireGestion() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.CommentaireGestionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CommentaireGestion' dans la table 'Produits' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.CommentaireGestionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Contenance() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.ContenanceColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Contenance' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.ContenanceColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Unitecontenance() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.UnitecontenanceColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Unitecontenance' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.UnitecontenanceColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Conditionnement() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.ConditionnementColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Conditionnement' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.ConditionnementColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateDernièrevente() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.DateDernièreventeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateDernièrevente' dans la table 'Produits' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.DateDernièreventeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property GestiondeStock() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.GestiondeStockColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'GestiondeStock' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.GestiondeStockColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ZoneGeographique() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.ZoneGeographiqueColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ZoneGeographique' dans la table 'Produits' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.ZoneGeographiqueColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Margetaux() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.MargetauxColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Margetaux' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.MargetauxColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MargecoeffsurPAremise() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.MargecoeffsurPAremiseColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MargecoeffsurPAremise' dans la table 'Produits' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.MargecoeffsurPAremiseColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Assimilestupefiant() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.AssimilestupefiantColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Assimilestupefiant' dans la table 'Produits' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.AssimilestupefiantColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property frigo() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.frigoColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'frigo' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.frigoColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Medicamentdexception() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.MedicamentdexceptionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Medicamentdexception' dans la table 'Produits' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.MedicamentdexceptionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Veterinaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.VeterinaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Veterinaire' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.VeterinaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Peremptioncourte() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.PeremptioncourteColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Peremptioncourte' dans la table 'Produits' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.PeremptioncourteColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prestation() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.PrestationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prestation' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.PrestationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Liste() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.ListeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Liste' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.ListeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Dus() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.DusColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Dus' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.DusColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Type() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.TypeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Type' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.TypeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TFRtype() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.TFRtypeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TFRtype' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.TFRtypeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TFRprix() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.TFRprixColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TFRprix' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.TFRprixColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LPP_Type_Service() As String
            Get
                Try 
                    Return CType(Me(Me.tableProduits.LPP_Type_ServiceColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LPP_Type_Service' dans la table 'Produits' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.LPP_Type_ServiceColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LPP_Quantité() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableProduits.LPP_QuantitéColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LPP_Quantité' dans la table 'Produits' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableProduits.LPP_QuantitéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCIPNull() As Boolean
            Return Me.IsNull(Me.tableProduits.CIPColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCIPNull()
            Me(Me.tableProduits.CIPColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEAN13Null() As Boolean
            Return Me.IsNull(Me.tableProduits.EAN13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEAN13Null()
            Me(Me.tableProduits.EAN13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCABNull() As Boolean
            Return Me.IsNull(Me.tableProduits.CABColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCABNull()
            Me(Me.tableProduits.CABColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDesignationNull() As Boolean
            Return Me.IsNull(Me.tableProduits.DesignationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDesignationNull()
            Me(Me.tableProduits.DesignationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrixachatRemiseHTNull() As Boolean
            Return Me.IsNull(Me.tableProduits.PrixachatRemiseHTColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrixachatRemiseHTNull()
            Me(Me.tableProduits.PrixachatRemiseHTColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrixventeTTCNull() As Boolean
            Return Me.IsNull(Me.tableProduits.PrixventeTTCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrixventeTTCNull()
            Me(Me.tableProduits.PrixventeTTCColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrixachatHTNull() As Boolean
            Return Me.IsNull(Me.tableProduits.PrixachatHTColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrixachatHTNull()
            Me(Me.tableProduits.PrixachatHTColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTVANull() As Boolean
            Return Me.IsNull(Me.tableProduits.TVAColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTVANull()
            Me(Me.tableProduits.TVAColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsStockNull() As Boolean
            Return Me.IsNull(Me.tableProduits.StockColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetStockNull()
            Me(Me.tableProduits.StockColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMarqueNull() As Boolean
            Return Me.IsNull(Me.tableProduits.MarqueColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMarqueNull()
            Me(Me.tableProduits.MarqueColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRepartiteurattitreNull() As Boolean
            Return Me.IsNull(Me.tableProduits.RepartiteurattitreColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRepartiteurattitreNull()
            Me(Me.tableProduits.RepartiteurattitreColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLPPNull() As Boolean
            Return Me.IsNull(Me.tableProduits.LPPColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLPPNull()
            Me(Me.tableProduits.LPPColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsColisageNull() As Boolean
            Return Me.IsNull(Me.tableProduits.ColisageColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetColisageNull()
            Me(Me.tableProduits.ColisageColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCommentaireGestionNull() As Boolean
            Return Me.IsNull(Me.tableProduits.CommentaireGestionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCommentaireGestionNull()
            Me(Me.tableProduits.CommentaireGestionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsContenanceNull() As Boolean
            Return Me.IsNull(Me.tableProduits.ContenanceColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetContenanceNull()
            Me(Me.tableProduits.ContenanceColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsUnitecontenanceNull() As Boolean
            Return Me.IsNull(Me.tableProduits.UnitecontenanceColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetUnitecontenanceNull()
            Me(Me.tableProduits.UnitecontenanceColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsConditionnementNull() As Boolean
            Return Me.IsNull(Me.tableProduits.ConditionnementColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetConditionnementNull()
            Me(Me.tableProduits.ConditionnementColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateDernièreventeNull() As Boolean
            Return Me.IsNull(Me.tableProduits.DateDernièreventeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateDernièreventeNull()
            Me(Me.tableProduits.DateDernièreventeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsGestiondeStockNull() As Boolean
            Return Me.IsNull(Me.tableProduits.GestiondeStockColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetGestiondeStockNull()
            Me(Me.tableProduits.GestiondeStockColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsZoneGeographiqueNull() As Boolean
            Return Me.IsNull(Me.tableProduits.ZoneGeographiqueColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetZoneGeographiqueNull()
            Me(Me.tableProduits.ZoneGeographiqueColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMargetauxNull() As Boolean
            Return Me.IsNull(Me.tableProduits.MargetauxColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMargetauxNull()
            Me(Me.tableProduits.MargetauxColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMargecoeffsurPAremiseNull() As Boolean
            Return Me.IsNull(Me.tableProduits.MargecoeffsurPAremiseColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMargecoeffsurPAremiseNull()
            Me(Me.tableProduits.MargecoeffsurPAremiseColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAssimilestupefiantNull() As Boolean
            Return Me.IsNull(Me.tableProduits.AssimilestupefiantColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAssimilestupefiantNull()
            Me(Me.tableProduits.AssimilestupefiantColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsfrigoNull() As Boolean
            Return Me.IsNull(Me.tableProduits.frigoColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetfrigoNull()
            Me(Me.tableProduits.frigoColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMedicamentdexceptionNull() As Boolean
            Return Me.IsNull(Me.tableProduits.MedicamentdexceptionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMedicamentdexceptionNull()
            Me(Me.tableProduits.MedicamentdexceptionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsVeterinaireNull() As Boolean
            Return Me.IsNull(Me.tableProduits.VeterinaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetVeterinaireNull()
            Me(Me.tableProduits.VeterinaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPeremptioncourteNull() As Boolean
            Return Me.IsNull(Me.tableProduits.PeremptioncourteColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPeremptioncourteNull()
            Me(Me.tableProduits.PeremptioncourteColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrestationNull() As Boolean
            Return Me.IsNull(Me.tableProduits.PrestationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrestationNull()
            Me(Me.tableProduits.PrestationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsListeNull() As Boolean
            Return Me.IsNull(Me.tableProduits.ListeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetListeNull()
            Me(Me.tableProduits.ListeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDusNull() As Boolean
            Return Me.IsNull(Me.tableProduits.DusColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDusNull()
            Me(Me.tableProduits.DusColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTypeNull() As Boolean
            Return Me.IsNull(Me.tableProduits.TypeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTypeNull()
            Me(Me.tableProduits.TypeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTFRtypeNull() As Boolean
            Return Me.IsNull(Me.tableProduits.TFRtypeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTFRtypeNull()
            Me(Me.tableProduits.TFRtypeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTFRprixNull() As Boolean
            Return Me.IsNull(Me.tableProduits.TFRprixColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTFRprixNull()
            Me(Me.tableProduits.TFRprixColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLPP_Type_ServiceNull() As Boolean
            Return Me.IsNull(Me.tableProduits.LPP_Type_ServiceColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLPP_Type_ServiceNull()
            Me(Me.tableProduits.LPP_Type_ServiceColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLPP_QuantitéNull() As Boolean
            Return Me.IsNull(Me.tableProduits.LPP_QuantitéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLPP_QuantitéNull()
            Me(Me.tableProduits.LPP_QuantitéColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class PrescripteursRow
        Inherits Global.System.Data.DataRow
        
        Private tablePrescripteurs As PrescripteursDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tablePrescripteurs = CType(Me.Table,PrescripteursDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IDinterne() As String
            Get
                Return CType(Me(Me.tablePrescripteurs.IDinterneColumn),String)
            End Get
            Set
                Me(Me.tablePrescripteurs.IDinterneColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Numidentification() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.NumidentificationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Numidentification' dans la table 'Prescripteurs' est D"& _ 
                            "BNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.NumidentificationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Clé() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.CléColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Clé' dans la table 'Prescripteurs' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.CléColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeSpécialité() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.CodeSpécialitéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CodeSpécialité' dans la table 'Prescripteurs' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.CodeSpécialitéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NomPrénom() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.NomPrénomColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NomPrénom' dans la table 'Prescripteurs' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.NomPrénomColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Adresse() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.AdresseColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Adresse' dans la table 'Prescripteurs' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.AdresseColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Statut() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.StatutColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Statut' dans la table 'Prescripteurs' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.StatutColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumRPPS() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.NumRPPSColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumRPPS' dans la table 'Prescripteurs' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.NumRPPSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CléRPPS() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.CléRPPSColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CléRPPS' dans la table 'Prescripteurs' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.CléRPPSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property numStructure() As String
            Get
                Try 
                    Return CType(Me(Me.tablePrescripteurs.numStructureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'numStructure' dans la table 'Prescripteurs' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tablePrescripteurs.numStructureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumidentificationNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.NumidentificationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumidentificationNull()
            Me(Me.tablePrescripteurs.NumidentificationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCléNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.CléColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCléNull()
            Me(Me.tablePrescripteurs.CléColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCodeSpécialitéNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.CodeSpécialitéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCodeSpécialitéNull()
            Me(Me.tablePrescripteurs.CodeSpécialitéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNomPrénomNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.NomPrénomColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNomPrénomNull()
            Me(Me.tablePrescripteurs.NomPrénomColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAdresseNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.AdresseColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAdresseNull()
            Me(Me.tablePrescripteurs.AdresseColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsStatutNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.StatutColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetStatutNull()
            Me(Me.tablePrescripteurs.StatutColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumRPPSNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.NumRPPSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumRPPSNull()
            Me(Me.tablePrescripteurs.NumRPPSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCléRPPSNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.CléRPPSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCléRPPSNull()
            Me(Me.tablePrescripteurs.CléRPPSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsnumStructureNull() As Boolean
            Return Me.IsNull(Me.tablePrescripteurs.numStructureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetnumStructureNull()
            Me(Me.tablePrescripteurs.numStructureColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class VitaleRow
        Inherits Global.System.Data.DataRow
        
        Private tableVitale As VitaleDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableVitale = CType(Me.Table,VitaleDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C8() As String
            Get
                Return CType(Me(Me.tableVitale.G101C8Column),String)
            End Get
            Set
                Me(Me.tableVitale.G101C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C9() As String
            Get
                Return CType(Me(Me.tableVitale.G101C9Column),String)
            End Get
            Set
                Me(Me.tableVitale.G101C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C10' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C11' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C12() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C12Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C12' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C12Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C13() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C13' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G102C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G102C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G102C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G102C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G102C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G102C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G102C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G102C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G102C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G102C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G102C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G102C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C8' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G103C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G103C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G103C9' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G103C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C8' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C9' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C10' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C11' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C12() As String
            Get
                Return CType(Me(Me.tableVitale.G104C12Column),String)
            End Get
            Set
                Me(Me.tableVitale.G104C12Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C13() As String
            Get
                Return CType(Me(Me.tableVitale.G104C13Column),String)
            End Get
            Set
                Me(Me.tableVitale.G104C13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C14() As String
            Get
                Return CType(Me(Me.tableVitale.G104C14Column),String)
            End Get
            Set
                Me(Me.tableVitale.G104C14Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C15() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C15Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C15' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C15Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C16() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C16Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C16' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C16Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C17() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C17Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C17' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C17Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G104C18() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G104C18Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G104C18' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G104C18Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G105C1O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G105C1O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G105C1O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G105C1O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G105C2O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G105C2O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G105C2O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G105C2O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G105C1O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G105C1O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G105C1O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G105C1O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G105C2O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G105C2O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G105C2O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G105C2O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G105C1O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G105C1O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G105C1O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G105C1O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G105C2O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G105C2O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G105C2O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G105C2O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C1O7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C1O7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C1O7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C1O7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C2O7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C2O7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C2O7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C2O7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C3O7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C3O7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C3O7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C3O7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G106C4O7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G106C4O7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G106C4O7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G106C4O7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G107C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G107C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G107C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G107C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G107C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G107C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G107C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G107C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G107C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G107C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G107C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G107C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G107C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G107C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G107C4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G107C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G107C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G107C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G107C5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G107C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G107C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G107C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G107C6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G107C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G108C1O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G108C1O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G108C1O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G108C1O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G108C2O1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G108C2O1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G108C2O1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G108C2O1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G108C1O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G108C1O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G108C1O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G108C1O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G108C2O2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G108C2O2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G108C2O2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G108C2O2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G108C1O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G108C1O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G108C1O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G108C1O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G108C2O3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G108C2O3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G108C2O3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G108C2O3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C4' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C7' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C8' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C9' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C10' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C11' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G109C12() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G109C12Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G109C12' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G109C12Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G111C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G111C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G111C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G111C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IDPrescripteur() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.IDPrescripteurColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'IDPrescripteur' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.IDPrescripteurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C5' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C6' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G101C14() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G101C14Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G101C14' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G101C14Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_NumOrganisme() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_NumOrganismeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_NumOrganisme' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_NumOrganismeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_NumAdherent() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_NumAdherentColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_NumAdherent' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_NumAdherentColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_TypeContrat() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_TypeContratColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_TypeContrat' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_TypeContratColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_DateDébut() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_DateDébutColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_DateDébut' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_DateDébutColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_DateFin() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_DateFinColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_DateFin' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_DateFinColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_Piecejustificative() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_PiecejustificativeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_Piecejustificative' dans la table 'Vitale' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_PiecejustificativeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1420C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G1420C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1420C1' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G1420C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1420C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G1420C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1420C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G1420C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1420C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G1420C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1420C3' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G1420C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Assuré() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AssuréColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Assuré' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AssuréColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1511C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.G1511C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1511C2' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.G1511C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_Indicateurdetrairement() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_IndicateurdetrairementColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_Indicateurdetrairement' dans la table 'Vitale' est"& _ 
                            " DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_IndicateurdetrairementColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_NumMutuelle() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_NumMutuelleColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_NumMutuelle' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_NumMutuelleColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_IDassure() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_IDassureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_IDassure' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_IDassureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_Code_Aiguillage_STS() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_Code_Aiguillage_STSColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_Code_Aiguillage_STS' dans la table 'Vitale' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_Code_Aiguillage_STSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_CodeRoutage() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_CodeRoutageColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_CodeRoutage' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_CodeRoutageColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_IdHote() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_IdHoteColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_IdHote' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_IdHoteColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_NomDomaine() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_NomDomaineColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_NomDomaine' dans la table 'Vitale' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_NomDomaineColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_Type_Convention() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_Type_ConventionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_Type_Convention' dans la table 'Vitale' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_Type_ConventionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_Critère_secondaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_Critère_secondaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_Critère_secondaire' dans la table 'Vitale' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_Critère_secondaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AMC_IdentifiantAMC() As String
            Get
                Try 
                    Return CType(Me(Me.tableVitale.AMC_IdentifiantAMCColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AMC_IdentifiantAMC' dans la table 'Vitale' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableVitale.AMC_IdentifiantAMCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C2Null()
            Me(Me.tableVitale.G101C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C3Null()
            Me(Me.tableVitale.G101C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C7Null()
            Me(Me.tableVitale.G101C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C10Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C10Null()
            Me(Me.tableVitale.G101C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C11Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C11Null()
            Me(Me.tableVitale.G101C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C12Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C12Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C12Null()
            Me(Me.tableVitale.G101C12Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C13Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C13Null()
            Me(Me.tableVitale.G101C13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG102C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G102C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG102C1Null()
            Me(Me.tableVitale.G102C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG102C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G102C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG102C2Null()
            Me(Me.tableVitale.G102C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG102C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G102C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG102C3Null()
            Me(Me.tableVitale.G102C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C1Null()
            Me(Me.tableVitale.G103C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C2Null()
            Me(Me.tableVitale.G103C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C3Null()
            Me(Me.tableVitale.G103C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C4Null()
            Me(Me.tableVitale.G103C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C5Null()
            Me(Me.tableVitale.G103C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C6Null()
            Me(Me.tableVitale.G103C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C7Null()
            Me(Me.tableVitale.G103C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C8Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C8Null()
            Me(Me.tableVitale.G103C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG103C9Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G103C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG103C9Null()
            Me(Me.tableVitale.G103C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C1Null()
            Me(Me.tableVitale.G104C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C2Null()
            Me(Me.tableVitale.G104C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C3Null()
            Me(Me.tableVitale.G104C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C4Null()
            Me(Me.tableVitale.G104C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C5Null()
            Me(Me.tableVitale.G104C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C6Null()
            Me(Me.tableVitale.G104C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C7Null()
            Me(Me.tableVitale.G104C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C8Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C8Null()
            Me(Me.tableVitale.G104C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C9Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C9Null()
            Me(Me.tableVitale.G104C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C10Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C10Null()
            Me(Me.tableVitale.G104C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C11Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C11Null()
            Me(Me.tableVitale.G104C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C15Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C15Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C15Null()
            Me(Me.tableVitale.G104C15Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C16Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C16Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C16Null()
            Me(Me.tableVitale.G104C16Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C17Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C17Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C17Null()
            Me(Me.tableVitale.G104C17Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG104C18Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G104C18Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG104C18Null()
            Me(Me.tableVitale.G104C18Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG105C1O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G105C1O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG105C1O1Null()
            Me(Me.tableVitale.G105C1O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG105C2O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G105C2O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG105C2O1Null()
            Me(Me.tableVitale.G105C2O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG105C1O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G105C1O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG105C1O2Null()
            Me(Me.tableVitale.G105C1O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG105C2O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G105C2O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG105C2O2Null()
            Me(Me.tableVitale.G105C2O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG105C1O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G105C1O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG105C1O3Null()
            Me(Me.tableVitale.G105C1O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG105C2O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G105C2O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG105C2O3Null()
            Me(Me.tableVitale.G105C2O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O1Null()
            Me(Me.tableVitale.G106C1O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O1Null()
            Me(Me.tableVitale.G106C2O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O1Null()
            Me(Me.tableVitale.G106C3O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O1Null()
            Me(Me.tableVitale.G106C4O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O2Null()
            Me(Me.tableVitale.G106C1O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O2Null()
            Me(Me.tableVitale.G106C2O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O2Null()
            Me(Me.tableVitale.G106C3O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O2Null()
            Me(Me.tableVitale.G106C4O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O3Null()
            Me(Me.tableVitale.G106C1O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O3Null()
            Me(Me.tableVitale.G106C2O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O3Null()
            Me(Me.tableVitale.G106C3O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O3Null()
            Me(Me.tableVitale.G106C4O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O4Null()
            Me(Me.tableVitale.G106C1O4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O4Null()
            Me(Me.tableVitale.G106C2O4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O4Null()
            Me(Me.tableVitale.G106C3O4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O4Null()
            Me(Me.tableVitale.G106C4O4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O5Null()
            Me(Me.tableVitale.G106C1O5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O5Null()
            Me(Me.tableVitale.G106C2O5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O5Null()
            Me(Me.tableVitale.G106C3O5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O5Null()
            Me(Me.tableVitale.G106C4O5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O6Null()
            Me(Me.tableVitale.G106C1O6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O6Null()
            Me(Me.tableVitale.G106C2O6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O6Null()
            Me(Me.tableVitale.G106C3O6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O6Null()
            Me(Me.tableVitale.G106C4O6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C1O7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C1O7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C1O7Null()
            Me(Me.tableVitale.G106C1O7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C2O7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C2O7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C2O7Null()
            Me(Me.tableVitale.G106C2O7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C3O7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C3O7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C3O7Null()
            Me(Me.tableVitale.G106C3O7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG106C4O7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G106C4O7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG106C4O7Null()
            Me(Me.tableVitale.G106C4O7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG107C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G107C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG107C1Null()
            Me(Me.tableVitale.G107C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG107C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G107C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG107C2Null()
            Me(Me.tableVitale.G107C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG107C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G107C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG107C3Null()
            Me(Me.tableVitale.G107C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG107C4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G107C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG107C4Null()
            Me(Me.tableVitale.G107C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG107C5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G107C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG107C5Null()
            Me(Me.tableVitale.G107C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG107C6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G107C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG107C6Null()
            Me(Me.tableVitale.G107C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG108C1O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G108C1O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG108C1O1Null()
            Me(Me.tableVitale.G108C1O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG108C2O1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G108C2O1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG108C2O1Null()
            Me(Me.tableVitale.G108C2O1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG108C1O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G108C1O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG108C1O2Null()
            Me(Me.tableVitale.G108C1O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG108C2O2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G108C2O2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG108C2O2Null()
            Me(Me.tableVitale.G108C2O2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG108C1O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G108C1O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG108C1O3Null()
            Me(Me.tableVitale.G108C1O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG108C2O3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G108C2O3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG108C2O3Null()
            Me(Me.tableVitale.G108C2O3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C1Null()
            Me(Me.tableVitale.G109C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C2Null()
            Me(Me.tableVitale.G109C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C3Null()
            Me(Me.tableVitale.G109C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C4Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C4Null()
            Me(Me.tableVitale.G109C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C5Null()
            Me(Me.tableVitale.G109C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C6Null()
            Me(Me.tableVitale.G109C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C7Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C7Null()
            Me(Me.tableVitale.G109C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C8Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C8Null()
            Me(Me.tableVitale.G109C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C9Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C9Null()
            Me(Me.tableVitale.G109C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C10Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C10Null()
            Me(Me.tableVitale.G109C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C11Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C11Null()
            Me(Me.tableVitale.G109C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG109C12Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G109C12Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG109C12Null()
            Me(Me.tableVitale.G109C12Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG111C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G111C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG111C1Null()
            Me(Me.tableVitale.G111C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIDPrescripteurNull() As Boolean
            Return Me.IsNull(Me.tableVitale.IDPrescripteurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIDPrescripteurNull()
            Me(Me.tableVitale.IDPrescripteurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C1Null()
            Me(Me.tableVitale.G101C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C5Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C5Null()
            Me(Me.tableVitale.G101C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C6Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C6Null()
            Me(Me.tableVitale.G101C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG101C14Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G101C14Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG101C14Null()
            Me(Me.tableVitale.G101C14Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_NumOrganismeNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_NumOrganismeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_NumOrganismeNull()
            Me(Me.tableVitale.AMC_NumOrganismeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_NumAdherentNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_NumAdherentColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_NumAdherentNull()
            Me(Me.tableVitale.AMC_NumAdherentColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_TypeContratNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_TypeContratColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_TypeContratNull()
            Me(Me.tableVitale.AMC_TypeContratColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_DateDébutNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_DateDébutColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_DateDébutNull()
            Me(Me.tableVitale.AMC_DateDébutColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_DateFinNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_DateFinColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_DateFinNull()
            Me(Me.tableVitale.AMC_DateFinColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_PiecejustificativeNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_PiecejustificativeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_PiecejustificativeNull()
            Me(Me.tableVitale.AMC_PiecejustificativeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1420C1Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G1420C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1420C1Null()
            Me(Me.tableVitale.G1420C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1420C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G1420C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1420C2Null()
            Me(Me.tableVitale.G1420C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1420C3Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G1420C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1420C3Null()
            Me(Me.tableVitale.G1420C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAssuréNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AssuréColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAssuréNull()
            Me(Me.tableVitale.AssuréColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1511C2Null() As Boolean
            Return Me.IsNull(Me.tableVitale.G1511C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1511C2Null()
            Me(Me.tableVitale.G1511C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_IndicateurdetrairementNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_IndicateurdetrairementColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_IndicateurdetrairementNull()
            Me(Me.tableVitale.AMC_IndicateurdetrairementColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_NumMutuelleNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_NumMutuelleColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_NumMutuelleNull()
            Me(Me.tableVitale.AMC_NumMutuelleColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_IDassureNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_IDassureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_IDassureNull()
            Me(Me.tableVitale.AMC_IDassureColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_Code_Aiguillage_STSNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_Code_Aiguillage_STSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_Code_Aiguillage_STSNull()
            Me(Me.tableVitale.AMC_Code_Aiguillage_STSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_CodeRoutageNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_CodeRoutageColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_CodeRoutageNull()
            Me(Me.tableVitale.AMC_CodeRoutageColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_IdHoteNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_IdHoteColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_IdHoteNull()
            Me(Me.tableVitale.AMC_IdHoteColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_NomDomaineNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_NomDomaineColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_NomDomaineNull()
            Me(Me.tableVitale.AMC_NomDomaineColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_Type_ConventionNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_Type_ConventionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_Type_ConventionNull()
            Me(Me.tableVitale.AMC_Type_ConventionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_Critère_secondaireNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_Critère_secondaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_Critère_secondaireNull()
            Me(Me.tableVitale.AMC_Critère_secondaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAMC_IdentifiantAMCNull() As Boolean
            Return Me.IsNull(Me.tableVitale.AMC_IdentifiantAMCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAMC_IdentifiantAMCNull()
            Me(Me.tableVitale.AMC_IdentifiantAMCColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class LPPRow
        Inherits Global.System.Data.DataRow
        
        Private tableLPP As LPPDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableLPP = CType(Me.Table,LPPDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeLPP() As String
            Get
                Return CType(Me(Me.tableLPP.CodeLPPColumn),String)
            End Get
            Set
                Me(Me.tableLPP.CodeLPPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PrixLPP() As String
            Get
                Try 
                    Return CType(Me(Me.tableLPP.PrixLPPColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PrixLPP' dans la table 'LPP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLPP.PrixLPPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateMax() As String
            Get
                Try 
                    Return CType(Me(Me.tableLPP.DateMaxColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateMax' dans la table 'LPP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLPP.DateMaxColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateMin() As String
            Get
                Try 
                    Return CType(Me(Me.tableLPP.DateMinColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateMin' dans la table 'LPP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLPP.DateMinColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prestation() As String
            Get
                Try 
                    Return CType(Me(Me.tableLPP.PrestationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prestation' dans la table 'LPP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLPP.PrestationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Entente_Préalable() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tableLPP.Entente_PréalableColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Entente_Préalable' dans la table 'LPP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLPP.Entente_PréalableColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrixLPPNull() As Boolean
            Return Me.IsNull(Me.tableLPP.PrixLPPColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrixLPPNull()
            Me(Me.tableLPP.PrixLPPColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateMaxNull() As Boolean
            Return Me.IsNull(Me.tableLPP.DateMaxColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateMaxNull()
            Me(Me.tableLPP.DateMaxColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateMinNull() As Boolean
            Return Me.IsNull(Me.tableLPP.DateMinColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateMinNull()
            Me(Me.tableLPP.DateMinColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrestationNull() As Boolean
            Return Me.IsNull(Me.tableLPP.PrestationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrestationNull()
            Me(Me.tableLPP.PrestationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEntente_PréalableNull() As Boolean
            Return Me.IsNull(Me.tableLPP.Entente_PréalableColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEntente_PréalableNull()
            Me(Me.tableLPP.Entente_PréalableColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class FacturesRow
        Inherits Global.System.Data.DataRow
        
        Private tableFactures As FacturesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFactures = CType(Me.Table,FacturesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num() As Decimal
            Get
                Return CType(Me(Me.tableFactures.NumColumn),Decimal)
            End Get
            Set
                Me(Me.tableFactures.NumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1110C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1110C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1110C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1110C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1110C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1110C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1110C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1110C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1110C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1110C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1110C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1110C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1230C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1230C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1230C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1230C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1410C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1410C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1410C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1410C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1420C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1420C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1420C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1420C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1420C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1420C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1420C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1420C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1420C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1420C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1420C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1420C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1440C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1440C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1440C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1440C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1440C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1440C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1440C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1440C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1440C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1440C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1440C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1440C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1450C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1450C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1450C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1450C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1450C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1450C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1450C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1450C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1511C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1511C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1511C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1511C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1511C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1511C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1511C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1511C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1512C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1512C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1512C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1512C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1513C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1513C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1513C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1513C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1513C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1513C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1513C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1513C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1513C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1513C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1513C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1513C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1514C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1514C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1514C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1514C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1514C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1514C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1514C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1514C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1514C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1514C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1514C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1514C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1514C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1514C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1514C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1514C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CRLdeFSE() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.CRLdeFSEColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CRLdeFSE' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.CRLdeFSEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CRLdeDRE() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.CRLdeDREColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CRLdeDRE' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.CRLdeDREColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1120C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1120C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1120C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1120C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C6' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C7' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1130C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1130C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1130C8' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1130C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C6' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1211C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1211C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1211C7' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1211C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C6' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C7' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1213C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1213C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1213C8' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1213C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C6' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C7' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1214C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1214C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1214C8' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1214C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1110C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1110C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1110C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1110C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1310C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1310C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1310C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1310C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1310C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1310C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1310C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1310C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1310C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1310C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1310C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1310C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1310C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1310C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1310C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1310C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1310C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1310C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1310C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1310C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1910C1() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1910C1Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1910C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1910C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1910C2() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1910C2Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1910C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1910C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1910C3() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1910C3Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1910C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1910C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1910C4() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1910C4Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1910C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1910C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1910C5() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1910C5Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1910C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1910C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1910C6() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1910C6Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1910C6' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1910C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property IDPrescripteur() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.IDPrescripteurColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'IDPrescripteur' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.IDPrescripteurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1160C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1160C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1160C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1160C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1160C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1160C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1160C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1160C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C3' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C4' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C5' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C6' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C7' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C8' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C9' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C10' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C11' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1321C12() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1321C12Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1321C12' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1321C12Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Bénéficiaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.BénéficiaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Bénéficiaire' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.BénéficiaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Assuré() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.AssuréColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Assuré' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.AssuréColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1120C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1120C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1120C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1120C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FactureAcree() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.FactureAcreeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'FactureAcree' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.FactureAcreeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_Lot_FSE() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.Num_Lot_FSEColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_Lot_FSE' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.Num_Lot_FSEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_Lot_DRE() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.Num_Lot_DREColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_Lot_DRE' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.Num_Lot_DREColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1330C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1330C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1330C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1330C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1330C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G1330C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1330C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G1330C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G3700C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G3700C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G3700C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G3700C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G3700C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G3700C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G3700C2' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G3700C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G3730C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.G3730C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G3730C1' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.G3730C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ModeSecur() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.ModeSecurColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ModeSecur' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.ModeSecurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Date_Lot_FSE() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.Date_Lot_FSEColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date_Lot_FSE' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.Date_Lot_FSEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Date_Lot_DRE() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.Date_Lot_DREColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date_Lot_DRE' dans la table 'Factures' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.Date_Lot_DREColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Composite_Convention() As String
            Get
                Try 
                    Return CType(Me(Me.tableFactures.Composite_ConventionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Composite_Convention' dans la table 'Factures' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFactures.Composite_ConventionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1110C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1110C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1110C2Null()
            Me(Me.tableFactures.G1110C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1110C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1110C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1110C3Null()
            Me(Me.tableFactures.G1110C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1110C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1110C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1110C4Null()
            Me(Me.tableFactures.G1110C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1230C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1230C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1230C1Null()
            Me(Me.tableFactures.G1230C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1410C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1410C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1410C1Null()
            Me(Me.tableFactures.G1410C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1420C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1420C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1420C1Null()
            Me(Me.tableFactures.G1420C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1420C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1420C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1420C2Null()
            Me(Me.tableFactures.G1420C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1420C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1420C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1420C3Null()
            Me(Me.tableFactures.G1420C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1440C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1440C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1440C1Null()
            Me(Me.tableFactures.G1440C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1440C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1440C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1440C2Null()
            Me(Me.tableFactures.G1440C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1440C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1440C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1440C3Null()
            Me(Me.tableFactures.G1440C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1450C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1450C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1450C1Null()
            Me(Me.tableFactures.G1450C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1450C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1450C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1450C2Null()
            Me(Me.tableFactures.G1450C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1511C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1511C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1511C1Null()
            Me(Me.tableFactures.G1511C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1511C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1511C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1511C2Null()
            Me(Me.tableFactures.G1511C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1512C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1512C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1512C1Null()
            Me(Me.tableFactures.G1512C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1513C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1513C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1513C1Null()
            Me(Me.tableFactures.G1513C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1513C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1513C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1513C2Null()
            Me(Me.tableFactures.G1513C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1513C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1513C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1513C3Null()
            Me(Me.tableFactures.G1513C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1514C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1514C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1514C1Null()
            Me(Me.tableFactures.G1514C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1514C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1514C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1514C2Null()
            Me(Me.tableFactures.G1514C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1514C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1514C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1514C3Null()
            Me(Me.tableFactures.G1514C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1514C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1514C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1514C4Null()
            Me(Me.tableFactures.G1514C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCRLdeFSENull() As Boolean
            Return Me.IsNull(Me.tableFactures.CRLdeFSEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCRLdeFSENull()
            Me(Me.tableFactures.CRLdeFSEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCRLdeDRENull() As Boolean
            Return Me.IsNull(Me.tableFactures.CRLdeDREColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCRLdeDRENull()
            Me(Me.tableFactures.CRLdeDREColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1120C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1120C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1120C1Null()
            Me(Me.tableFactures.G1120C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C1Null()
            Me(Me.tableFactures.G1130C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C2Null()
            Me(Me.tableFactures.G1130C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C3Null()
            Me(Me.tableFactures.G1130C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C4Null()
            Me(Me.tableFactures.G1130C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C5Null()
            Me(Me.tableFactures.G1130C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C6Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C6Null()
            Me(Me.tableFactures.G1130C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C7Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C7Null()
            Me(Me.tableFactures.G1130C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1130C8Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1130C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1130C8Null()
            Me(Me.tableFactures.G1130C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C1Null()
            Me(Me.tableFactures.G1211C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C2Null()
            Me(Me.tableFactures.G1211C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C3Null()
            Me(Me.tableFactures.G1211C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C4Null()
            Me(Me.tableFactures.G1211C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C5Null()
            Me(Me.tableFactures.G1211C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C6Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C6Null()
            Me(Me.tableFactures.G1211C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1211C7Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1211C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1211C7Null()
            Me(Me.tableFactures.G1211C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C1Null()
            Me(Me.tableFactures.G1213C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C2Null()
            Me(Me.tableFactures.G1213C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C3Null()
            Me(Me.tableFactures.G1213C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C4Null()
            Me(Me.tableFactures.G1213C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C5Null()
            Me(Me.tableFactures.G1213C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C6Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C6Null()
            Me(Me.tableFactures.G1213C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C7Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C7Null()
            Me(Me.tableFactures.G1213C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1213C8Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1213C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1213C8Null()
            Me(Me.tableFactures.G1213C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C1Null()
            Me(Me.tableFactures.G1214C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C2Null()
            Me(Me.tableFactures.G1214C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C3Null()
            Me(Me.tableFactures.G1214C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C4Null()
            Me(Me.tableFactures.G1214C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C5Null()
            Me(Me.tableFactures.G1214C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C6Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C6Null()
            Me(Me.tableFactures.G1214C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C7Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C7Null()
            Me(Me.tableFactures.G1214C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1214C8Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1214C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1214C8Null()
            Me(Me.tableFactures.G1214C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1110C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1110C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1110C1Null()
            Me(Me.tableFactures.G1110C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1310C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1310C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1310C1Null()
            Me(Me.tableFactures.G1310C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1310C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1310C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1310C2Null()
            Me(Me.tableFactures.G1310C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1310C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1310C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1310C3Null()
            Me(Me.tableFactures.G1310C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1310C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1310C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1310C4Null()
            Me(Me.tableFactures.G1310C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1310C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1310C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1310C5Null()
            Me(Me.tableFactures.G1310C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1910C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1910C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1910C1Null()
            Me(Me.tableFactures.G1910C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1910C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1910C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1910C2Null()
            Me(Me.tableFactures.G1910C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1910C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1910C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1910C3Null()
            Me(Me.tableFactures.G1910C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1910C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1910C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1910C4Null()
            Me(Me.tableFactures.G1910C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1910C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1910C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1910C5Null()
            Me(Me.tableFactures.G1910C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1910C6Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1910C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1910C6Null()
            Me(Me.tableFactures.G1910C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIDPrescripteurNull() As Boolean
            Return Me.IsNull(Me.tableFactures.IDPrescripteurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIDPrescripteurNull()
            Me(Me.tableFactures.IDPrescripteurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1160C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1160C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1160C1Null()
            Me(Me.tableFactures.G1160C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1160C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1160C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1160C2Null()
            Me(Me.tableFactures.G1160C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C1Null()
            Me(Me.tableFactures.G1321C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C2Null()
            Me(Me.tableFactures.G1321C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C3Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C3Null()
            Me(Me.tableFactures.G1321C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C4Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C4Null()
            Me(Me.tableFactures.G1321C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C5Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C5Null()
            Me(Me.tableFactures.G1321C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C6Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C6Null()
            Me(Me.tableFactures.G1321C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C7Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C7Null()
            Me(Me.tableFactures.G1321C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C8Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C8Null()
            Me(Me.tableFactures.G1321C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C9Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C9Null()
            Me(Me.tableFactures.G1321C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C10Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C10Null()
            Me(Me.tableFactures.G1321C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C11Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C11Null()
            Me(Me.tableFactures.G1321C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1321C12Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1321C12Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1321C12Null()
            Me(Me.tableFactures.G1321C12Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsBénéficiaireNull() As Boolean
            Return Me.IsNull(Me.tableFactures.BénéficiaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetBénéficiaireNull()
            Me(Me.tableFactures.BénéficiaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAssuréNull() As Boolean
            Return Me.IsNull(Me.tableFactures.AssuréColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAssuréNull()
            Me(Me.tableFactures.AssuréColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1120C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1120C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1120C2Null()
            Me(Me.tableFactures.G1120C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFactureAcreeNull() As Boolean
            Return Me.IsNull(Me.tableFactures.FactureAcreeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFactureAcreeNull()
            Me(Me.tableFactures.FactureAcreeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_Lot_FSENull() As Boolean
            Return Me.IsNull(Me.tableFactures.Num_Lot_FSEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_Lot_FSENull()
            Me(Me.tableFactures.Num_Lot_FSEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_Lot_DRENull() As Boolean
            Return Me.IsNull(Me.tableFactures.Num_Lot_DREColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_Lot_DRENull()
            Me(Me.tableFactures.Num_Lot_DREColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1330C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1330C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1330C1Null()
            Me(Me.tableFactures.G1330C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1330C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G1330C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1330C2Null()
            Me(Me.tableFactures.G1330C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG3700C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G3700C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG3700C1Null()
            Me(Me.tableFactures.G3700C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG3700C2Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G3700C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG3700C2Null()
            Me(Me.tableFactures.G3700C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG3730C1Null() As Boolean
            Return Me.IsNull(Me.tableFactures.G3730C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG3730C1Null()
            Me(Me.tableFactures.G3730C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsModeSecurNull() As Boolean
            Return Me.IsNull(Me.tableFactures.ModeSecurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetModeSecurNull()
            Me(Me.tableFactures.ModeSecurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDate_Lot_FSENull() As Boolean
            Return Me.IsNull(Me.tableFactures.Date_Lot_FSEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDate_Lot_FSENull()
            Me(Me.tableFactures.Date_Lot_FSEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDate_Lot_DRENull() As Boolean
            Return Me.IsNull(Me.tableFactures.Date_Lot_DREColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDate_Lot_DRENull()
            Me(Me.tableFactures.Date_Lot_DREColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsComposite_ConventionNull() As Boolean
            Return Me.IsNull(Me.tableFactures.Composite_ConventionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetComposite_ConventionNull()
            Me(Me.tableFactures.Composite_ConventionColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class FichiersSVRow
        Inherits Global.System.Data.DataRow
        
        Private tableFichiersSV As FichiersSVDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFichiersSV = CType(Me.Table,FichiersSVDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NomFichier() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFichiersSV.NomFichierColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NomFichier' dans la table 'FichiersSV' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFichiersSV.NomFichierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CRF() As String
            Get
                Try 
                    Return CType(Me(Me.tableFichiersSV.CRFColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CRF' dans la table 'FichiersSV' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFichiersSV.CRFColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateFichier() As String
            Get
                Try 
                    Return CType(Me(Me.tableFichiersSV.DateFichierColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateFichier' dans la table 'FichiersSV' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFichiersSV.DateFichierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NombreLots() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFichiersSV.NombreLotsColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NombreLots' dans la table 'FichiersSV' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFichiersSV.NombreLotsColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Longueur() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFichiersSV.LongueurColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Longueur' dans la table 'FichiersSV' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFichiersSV.LongueurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NombresFactures() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFichiersSV.NombresFacturesColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NombresFactures' dans la table 'FichiersSV' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableFichiersSV.NombresFacturesColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNomFichierNull() As Boolean
            Return Me.IsNull(Me.tableFichiersSV.NomFichierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNomFichierNull()
            Me(Me.tableFichiersSV.NomFichierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCRFNull() As Boolean
            Return Me.IsNull(Me.tableFichiersSV.CRFColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCRFNull()
            Me(Me.tableFichiersSV.CRFColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateFichierNull() As Boolean
            Return Me.IsNull(Me.tableFichiersSV.DateFichierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateFichierNull()
            Me(Me.tableFichiersSV.DateFichierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNombreLotsNull() As Boolean
            Return Me.IsNull(Me.tableFichiersSV.NombreLotsColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNombreLotsNull()
            Me(Me.tableFichiersSV.NombreLotsColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLongueurNull() As Boolean
            Return Me.IsNull(Me.tableFichiersSV.LongueurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLongueurNull()
            Me(Me.tableFichiersSV.LongueurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNombresFacturesNull() As Boolean
            Return Me.IsNull(Me.tableFichiersSV.NombresFacturesColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNombresFacturesNull()
            Me(Me.tableFichiersSV.NombresFacturesColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class ActesRow
        Inherits Global.System.Data.DataRow
        
        Private tableActes As ActesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableActes = CType(Me.Table,ActesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumActe() As Decimal
            Get
                Return CType(Me(Me.tableActes.NumActeColumn),Decimal)
            End Get
            Set
                Me(Me.tableActes.NumActeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Nom() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.NomColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Nom' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.NomColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prénom() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.PrénomColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prénom' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.PrénomColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _Date() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.DateColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.DateColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TypeActe() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.TypeActeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TypeActe' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.TypeActeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CIP() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.CIPColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CIP' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.CIPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property EAN13() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.EAN13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'EAN13' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.EAN13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeActe() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.CodeActeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CodeActe' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.CodeActeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Quantité() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.QuantitéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Quantité' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.QuantitéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Total() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.TotalColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Total' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.TotalColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Remise() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.RemiseColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Remise' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.RemiseColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumFacturesSV() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.NumFacturesSVColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumFacturesSV' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.NumFacturesSVColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NIR() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.NIRColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NIR' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.NIRColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumFactureVenteDirecte() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.NumFactureVenteDirecteColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumFactureVenteDirecte' dans la table 'Actes' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.NumFactureVenteDirecteColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prix_Unitaire() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableActes.Prix_UnitaireColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prix_Unitaire' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.Prix_UnitaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Désignation() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.DésignationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Désignation' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.DésignationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TauxRmbrsmnt() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableActes.TauxRmbrsmntColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TauxRmbrsmnt' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.TauxRmbrsmntColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Tarif_Remboursement() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableActes.Tarif_RemboursementColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Tarif_Remboursement' dans la table 'Actes' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.Tarif_RemboursementColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LPP_Type_prestation() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.LPP_Type_prestationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LPP_Type_prestation' dans la table 'Actes' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.LPP_Type_prestationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LPP_Ref() As String
            Get
                Try 
                    Return CType(Me(Me.tableActes.LPP_RefColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LPP_Ref' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.LPP_RefColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LPP_Quantité() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableActes.LPP_QuantitéColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LPP_Quantité' dans la table 'Actes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableActes.LPP_QuantitéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNomNull() As Boolean
            Return Me.IsNull(Me.tableActes.NomColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNomNull()
            Me(Me.tableActes.NomColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrénomNull() As Boolean
            Return Me.IsNull(Me.tableActes.PrénomColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrénomNull()
            Me(Me.tableActes.PrénomColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_DateNull() As Boolean
            Return Me.IsNull(Me.tableActes.DateColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_DateNull()
            Me(Me.tableActes.DateColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTypeActeNull() As Boolean
            Return Me.IsNull(Me.tableActes.TypeActeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTypeActeNull()
            Me(Me.tableActes.TypeActeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCIPNull() As Boolean
            Return Me.IsNull(Me.tableActes.CIPColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCIPNull()
            Me(Me.tableActes.CIPColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEAN13Null() As Boolean
            Return Me.IsNull(Me.tableActes.EAN13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEAN13Null()
            Me(Me.tableActes.EAN13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCodeActeNull() As Boolean
            Return Me.IsNull(Me.tableActes.CodeActeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCodeActeNull()
            Me(Me.tableActes.CodeActeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsQuantitéNull() As Boolean
            Return Me.IsNull(Me.tableActes.QuantitéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetQuantitéNull()
            Me(Me.tableActes.QuantitéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTotalNull() As Boolean
            Return Me.IsNull(Me.tableActes.TotalColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTotalNull()
            Me(Me.tableActes.TotalColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRemiseNull() As Boolean
            Return Me.IsNull(Me.tableActes.RemiseColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRemiseNull()
            Me(Me.tableActes.RemiseColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumFacturesSVNull() As Boolean
            Return Me.IsNull(Me.tableActes.NumFacturesSVColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumFacturesSVNull()
            Me(Me.tableActes.NumFacturesSVColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNIRNull() As Boolean
            Return Me.IsNull(Me.tableActes.NIRColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNIRNull()
            Me(Me.tableActes.NIRColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumFactureVenteDirecteNull() As Boolean
            Return Me.IsNull(Me.tableActes.NumFactureVenteDirecteColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumFactureVenteDirecteNull()
            Me(Me.tableActes.NumFactureVenteDirecteColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrix_UnitaireNull() As Boolean
            Return Me.IsNull(Me.tableActes.Prix_UnitaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrix_UnitaireNull()
            Me(Me.tableActes.Prix_UnitaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDésignationNull() As Boolean
            Return Me.IsNull(Me.tableActes.DésignationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDésignationNull()
            Me(Me.tableActes.DésignationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTauxRmbrsmntNull() As Boolean
            Return Me.IsNull(Me.tableActes.TauxRmbrsmntColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTauxRmbrsmntNull()
            Me(Me.tableActes.TauxRmbrsmntColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTarif_RemboursementNull() As Boolean
            Return Me.IsNull(Me.tableActes.Tarif_RemboursementColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTarif_RemboursementNull()
            Me(Me.tableActes.Tarif_RemboursementColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLPP_Type_prestationNull() As Boolean
            Return Me.IsNull(Me.tableActes.LPP_Type_prestationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLPP_Type_prestationNull()
            Me(Me.tableActes.LPP_Type_prestationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLPP_RefNull() As Boolean
            Return Me.IsNull(Me.tableActes.LPP_RefColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLPP_RefNull()
            Me(Me.tableActes.LPP_RefColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLPP_QuantitéNull() As Boolean
            Return Me.IsNull(Me.tableActes.LPP_QuantitéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLPP_QuantitéNull()
            Me(Me.tableActes.LPP_QuantitéColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class SMTPRow
        Inherits Global.System.Data.DataRow
        
        Private tableSMTP As SMTPDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableSMTP = CType(Me.Table,SMTPDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property compteur() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.compteurColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'compteur' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.compteurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _date() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.dateColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'date' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.dateColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NomFichier() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.NomFichierColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NomFichier' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.NomFichierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Subject() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.SubjectColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Subject' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.SubjectColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property From_() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.From_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'From_' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.From_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property To_() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.To_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'To_' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.To_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ContentType() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.ContentTypeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ContentType' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.ContentTypeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ContentDescription() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.ContentDescriptionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ContentDescription' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.ContentDescriptionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CRF() As String
            Get
                Try 
                    Return CType(Me(Me.tableSMTP.CRFColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CRF' dans la table 'SMTP' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSMTP.CRFColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IscompteurNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.compteurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetcompteurNull()
            Me(Me.tableSMTP.compteurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_dateNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.dateColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_dateNull()
            Me(Me.tableSMTP.dateColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNomFichierNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.NomFichierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNomFichierNull()
            Me(Me.tableSMTP.NomFichierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSubjectNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.SubjectColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSubjectNull()
            Me(Me.tableSMTP.SubjectColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFrom_Null() As Boolean
            Return Me.IsNull(Me.tableSMTP.From_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFrom_Null()
            Me(Me.tableSMTP.From_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTo_Null() As Boolean
            Return Me.IsNull(Me.tableSMTP.To_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTo_Null()
            Me(Me.tableSMTP.To_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsContentTypeNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.ContentTypeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetContentTypeNull()
            Me(Me.tableSMTP.ContentTypeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsContentDescriptionNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.ContentDescriptionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetContentDescriptionNull()
            Me(Me.tableSMTP.ContentDescriptionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCRFNull() As Boolean
            Return Me.IsNull(Me.tableSMTP.CRFColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCRFNull()
            Me(Me.tableSMTP.CRFColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class LotsRow
        Inherits Global.System.Data.DataRow
        
        Private tableLots As LotsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableLots = CType(Me.Table,LotsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Référence() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableLots.RéférenceColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Référence' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.RéférenceColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CRL() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.CRLColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CRL' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.CRLColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CRF() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.CRFColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CRF' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.CRFColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _Date() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.DateColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.DateColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NombreDeFSE() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableLots.NombreDeFSEColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NombreDeFSE' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.NombreDeFSEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Taille() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.TailleColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Taille' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.TailleColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Montant() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableLots.MontantColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Montant' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.MontantColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Organisme() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.OrganismeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Organisme' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.OrganismeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FichierLots() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.FichierLotsColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'FichierLots' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.FichierLotsColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C1' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C2' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C3' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C4' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C5' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C6' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G13C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G13C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G13C7' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G13C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C1' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C2' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C3' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C4' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C5' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C6' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G93C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.G93C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G93C7' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.G93C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Etat() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.EtatColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Etat' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.EtatColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C1' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C2' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C3' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C4' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C5' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C6' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C7' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C8' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C9' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARLG31C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ARLG31C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARLG31C10' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ARLG31C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ArlIdMessage() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.ArlIdMessageColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ArlIdMessage' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.ArlIdMessageColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NombreTransmission() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableLots.NombreTransmissionColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NombreTransmission' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.NombreTransmissionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateTransmission() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.DateTransmissionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateTransmission' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.DateTransmissionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Référence_DRE() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.Référence_DREColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Référence_DRE' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.Référence_DREColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Référence_bdd() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableLots.Référence_bddColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Référence_bdd' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.Référence_bddColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Référence_DRE_bdd() As String
            Get
                Try 
                    Return CType(Me(Me.tableLots.Référence_DRE_bddColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Référence_DRE_bdd' dans la table 'Lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLots.Référence_DRE_bddColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRéférenceNull() As Boolean
            Return Me.IsNull(Me.tableLots.RéférenceColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRéférenceNull()
            Me(Me.tableLots.RéférenceColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCRLNull() As Boolean
            Return Me.IsNull(Me.tableLots.CRLColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCRLNull()
            Me(Me.tableLots.CRLColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCRFNull() As Boolean
            Return Me.IsNull(Me.tableLots.CRFColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCRFNull()
            Me(Me.tableLots.CRFColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_DateNull() As Boolean
            Return Me.IsNull(Me.tableLots.DateColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_DateNull()
            Me(Me.tableLots.DateColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNombreDeFSENull() As Boolean
            Return Me.IsNull(Me.tableLots.NombreDeFSEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNombreDeFSENull()
            Me(Me.tableLots.NombreDeFSEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTailleNull() As Boolean
            Return Me.IsNull(Me.tableLots.TailleColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTailleNull()
            Me(Me.tableLots.TailleColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMontantNull() As Boolean
            Return Me.IsNull(Me.tableLots.MontantColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMontantNull()
            Me(Me.tableLots.MontantColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsOrganismeNull() As Boolean
            Return Me.IsNull(Me.tableLots.OrganismeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetOrganismeNull()
            Me(Me.tableLots.OrganismeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFichierLotsNull() As Boolean
            Return Me.IsNull(Me.tableLots.FichierLotsColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFichierLotsNull()
            Me(Me.tableLots.FichierLotsColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C1Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C1Null()
            Me(Me.tableLots.G13C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C2Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C2Null()
            Me(Me.tableLots.G13C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C3Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C3Null()
            Me(Me.tableLots.G13C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C4Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C4Null()
            Me(Me.tableLots.G13C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C5Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C5Null()
            Me(Me.tableLots.G13C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C6Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C6Null()
            Me(Me.tableLots.G13C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG13C7Null() As Boolean
            Return Me.IsNull(Me.tableLots.G13C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG13C7Null()
            Me(Me.tableLots.G13C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C1Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C1Null()
            Me(Me.tableLots.G93C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C2Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C2Null()
            Me(Me.tableLots.G93C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C3Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C3Null()
            Me(Me.tableLots.G93C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C4Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C4Null()
            Me(Me.tableLots.G93C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C5Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C5Null()
            Me(Me.tableLots.G93C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C6Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C6Null()
            Me(Me.tableLots.G93C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG93C7Null() As Boolean
            Return Me.IsNull(Me.tableLots.G93C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG93C7Null()
            Me(Me.tableLots.G93C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEtatNull() As Boolean
            Return Me.IsNull(Me.tableLots.EtatColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEtatNull()
            Me(Me.tableLots.EtatColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C1Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C1Null()
            Me(Me.tableLots.ARLG31C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C2Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C2Null()
            Me(Me.tableLots.ARLG31C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C3Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C3Null()
            Me(Me.tableLots.ARLG31C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C4Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C4Null()
            Me(Me.tableLots.ARLG31C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C5Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C5Null()
            Me(Me.tableLots.ARLG31C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C6Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C6Null()
            Me(Me.tableLots.ARLG31C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C7Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C7Null()
            Me(Me.tableLots.ARLG31C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C8Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C8Null()
            Me(Me.tableLots.ARLG31C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C9Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C9Null()
            Me(Me.tableLots.ARLG31C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARLG31C10Null() As Boolean
            Return Me.IsNull(Me.tableLots.ARLG31C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARLG31C10Null()
            Me(Me.tableLots.ARLG31C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsArlIdMessageNull() As Boolean
            Return Me.IsNull(Me.tableLots.ArlIdMessageColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetArlIdMessageNull()
            Me(Me.tableLots.ArlIdMessageColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNombreTransmissionNull() As Boolean
            Return Me.IsNull(Me.tableLots.NombreTransmissionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNombreTransmissionNull()
            Me(Me.tableLots.NombreTransmissionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateTransmissionNull() As Boolean
            Return Me.IsNull(Me.tableLots.DateTransmissionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateTransmissionNull()
            Me(Me.tableLots.DateTransmissionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRéférence_DRENull() As Boolean
            Return Me.IsNull(Me.tableLots.Référence_DREColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRéférence_DRENull()
            Me(Me.tableLots.Référence_DREColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRéférence_bddNull() As Boolean
            Return Me.IsNull(Me.tableLots.Référence_bddColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRéférence_bddNull()
            Me(Me.tableLots.Référence_bddColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRéférence_DRE_bddNull() As Boolean
            Return Me.IsNull(Me.tableLots.Référence_DRE_bddColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRéférence_DRE_bddNull()
            Me(Me.tableLots.Référence_DRE_bddColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Facture_DétailCodeCIPRow
        Inherits Global.System.Data.DataRow
        
        Private tableFacture_DétailCodeCIP As Facture_DétailCodeCIPDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFacture_DétailCodeCIP = CType(Me.Table,Facture_DétailCodeCIPDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumLigne() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.NumLigneColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumLigne' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.NumLigneColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C1' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C2' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C3' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C4' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C5' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C6' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C7' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C8' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C9' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C10' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C11' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C12() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C12Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C12' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C12Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C13() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C13' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C14() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C14Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C14' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C14Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1740C15() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1740C15Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1740C15' dans la table 'Facture_DétailCodeCIP' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1740C15Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1110C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailCodeCIP.G1110C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1110C1' dans la table 'Facture_DétailCodeCIP' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailCodeCIP.G1110C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumLigneNull() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.NumLigneColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumLigneNull()
            Me(Me.tableFacture_DétailCodeCIP.NumLigneColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C1Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C1Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C2Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C3Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C3Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C4Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C4Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C5Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C5Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C6Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C6Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C7Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C7Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C8Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C8Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C9Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C9Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C10Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C10Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C11Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C11Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C12Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C12Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C12Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C12Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C13Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C13Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C14Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C14Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C14Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C14Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1740C15Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1740C15Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1740C15Null()
            Me(Me.tableFacture_DétailCodeCIP.G1740C15Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1110C1Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailCodeCIP.G1110C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1110C1Null()
            Me(Me.tableFacture_DétailCodeCIP.G1110C1Column) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Facture_DétailLppRow
        Inherits Global.System.Data.DataRow
        
        Private tableFacture_DétailLpp As Facture_DétailLppDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFacture_DétailLpp = CType(Me.Table,Facture_DétailLppDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumLigne() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.NumLigneColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumLigne' dans la table 'Facture_DétailLpp' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.NumLigneColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C1' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C2' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C3' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C4' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C5' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C6' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C7' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C8' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C9' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C10' dans la table 'Facture_DétailLpp' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1730C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1730C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1730C11' dans la table 'Facture_DétailLpp' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1730C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1110C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_DétailLpp.G1110C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1110C1' dans la table 'Facture_DétailLpp' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_DétailLpp.G1110C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumLigneNull() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.NumLigneColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumLigneNull()
            Me(Me.tableFacture_DétailLpp.NumLigneColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C1Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C1Null()
            Me(Me.tableFacture_DétailLpp.G1730C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C2Null()
            Me(Me.tableFacture_DétailLpp.G1730C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C3Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C3Null()
            Me(Me.tableFacture_DétailLpp.G1730C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C4Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C4Null()
            Me(Me.tableFacture_DétailLpp.G1730C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C5Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C5Null()
            Me(Me.tableFacture_DétailLpp.G1730C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C6Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C6Null()
            Me(Me.tableFacture_DétailLpp.G1730C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C7Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C7Null()
            Me(Me.tableFacture_DétailLpp.G1730C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C8Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C8Null()
            Me(Me.tableFacture_DétailLpp.G1730C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C9Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C9Null()
            Me(Me.tableFacture_DétailLpp.G1730C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C10Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C10Null()
            Me(Me.tableFacture_DétailLpp.G1730C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1730C11Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1730C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1730C11Null()
            Me(Me.tableFacture_DétailLpp.G1730C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1110C1Null() As Boolean
            Return Me.IsNull(Me.tableFacture_DétailLpp.G1110C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1110C1Null()
            Me(Me.tableFacture_DétailLpp.G1110C1Column) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Facture_LigneFactureRow
        Inherits Global.System.Data.DataRow
        
        Private tableFacture_LigneFacture As Facture_LigneFactureDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFacture_LigneFacture = CType(Me.Table,Facture_LigneFactureDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumLigne() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.NumLigneColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumLigne' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.NumLigneColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C1() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C1' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C3' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C4' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C5() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C5Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C5' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C5Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C6() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C6Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C6' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C6Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C7() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C7' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C8() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C8Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C8' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C8Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C9() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C9Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C9' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C9Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C10() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C10Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C10' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C10Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C11() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C11Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C11' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C11Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C12() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C12Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C12' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C12Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C13() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C13' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C14() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C14Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C14' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C14Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C15() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C15Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C15' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C15Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1610C16() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1610C16Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1610C16' dans la table 'Facture_LigneFacture' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1610C16Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1820C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1820C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1820C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1820C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1850C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1850C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1850C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1850C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1840C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1840C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1840C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1840C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1840C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1840C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1840C3' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1840C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G1840C4() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G1840C4Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G1840C4' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G1840C4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G2000C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G2000C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G2000C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G2000C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G2010C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G2010C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G2010C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G2010C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G2030C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G2030C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G2030C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G2030C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G2030C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G2030C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G2030C3' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G2030C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G3710C2() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G3710C2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G3710C2' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G3710C2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G3710C3() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G3710C3Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G3710C3' dans la table 'Facture_LigneFacture' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G3710C3Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property G3710_Paramètes() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.G3710_ParamètesColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'G3710_Paramètes' dans la table 'Facture_LigneFacture' "& _ 
                            "est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.G3710_ParamètesColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_Facture() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_LigneFacture.Num_FactureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_Facture' dans la table 'Facture_LigneFacture' est "& _ 
                            "DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_LigneFacture.Num_FactureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumLigneNull() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.NumLigneColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumLigneNull()
            Me(Me.tableFacture_LigneFacture.NumLigneColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C1Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C1Null()
            Me(Me.tableFacture_LigneFacture.G1610C1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C2Null()
            Me(Me.tableFacture_LigneFacture.G1610C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C3Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C3Null()
            Me(Me.tableFacture_LigneFacture.G1610C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C4Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C4Null()
            Me(Me.tableFacture_LigneFacture.G1610C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C5Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C5Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C5Null()
            Me(Me.tableFacture_LigneFacture.G1610C5Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C6Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C6Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C6Null()
            Me(Me.tableFacture_LigneFacture.G1610C6Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C7Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C7Null()
            Me(Me.tableFacture_LigneFacture.G1610C7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C8Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C8Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C8Null()
            Me(Me.tableFacture_LigneFacture.G1610C8Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C9Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C9Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C9Null()
            Me(Me.tableFacture_LigneFacture.G1610C9Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C10Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C10Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C10Null()
            Me(Me.tableFacture_LigneFacture.G1610C10Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C11Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C11Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C11Null()
            Me(Me.tableFacture_LigneFacture.G1610C11Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C12Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C12Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C12Null()
            Me(Me.tableFacture_LigneFacture.G1610C12Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C13Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C13Null()
            Me(Me.tableFacture_LigneFacture.G1610C13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C14Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C14Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C14Null()
            Me(Me.tableFacture_LigneFacture.G1610C14Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C15Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C15Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C15Null()
            Me(Me.tableFacture_LigneFacture.G1610C15Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1610C16Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1610C16Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1610C16Null()
            Me(Me.tableFacture_LigneFacture.G1610C16Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1820C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1820C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1820C2Null()
            Me(Me.tableFacture_LigneFacture.G1820C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1850C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1850C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1850C2Null()
            Me(Me.tableFacture_LigneFacture.G1850C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1840C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1840C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1840C2Null()
            Me(Me.tableFacture_LigneFacture.G1840C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1840C3Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1840C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1840C3Null()
            Me(Me.tableFacture_LigneFacture.G1840C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG1840C4Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G1840C4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG1840C4Null()
            Me(Me.tableFacture_LigneFacture.G1840C4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG2000C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G2000C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG2000C2Null()
            Me(Me.tableFacture_LigneFacture.G2000C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG2010C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G2010C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG2010C2Null()
            Me(Me.tableFacture_LigneFacture.G2010C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG2030C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G2030C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG2030C2Null()
            Me(Me.tableFacture_LigneFacture.G2030C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG2030C3Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G2030C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG2030C3Null()
            Me(Me.tableFacture_LigneFacture.G2030C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG3710C2Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G3710C2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG3710C2Null()
            Me(Me.tableFacture_LigneFacture.G3710C2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG3710C3Null() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G3710C3Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG3710C3Null()
            Me(Me.tableFacture_LigneFacture.G3710C3Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsG3710_ParamètesNull() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.G3710_ParamètesColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetG3710_ParamètesNull()
            Me(Me.tableFacture_LigneFacture.G3710_ParamètesColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_FactureNull() As Boolean
            Return Me.IsNull(Me.tableFacture_LigneFacture.Num_FactureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_FactureNull()
            Me(Me.tableFacture_LigneFacture.Num_FactureColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class _AMC__Organismes_Contrat_Type_Row
        Inherits Global.System.Data.DataRow
        
        Private _tableAMC__Organismes_Contrat_Type_ As _AMC__Organismes_Contrat_Type_DataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me._tableAMC__Organismes_Contrat_Type_ = CType(Me.Table,_AMC__Organismes_Contrat_Type_DataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumAMC() As String
            Get
                Try 
                    Return CType(Me(Me._tableAMC__Organismes_Contrat_Type_.NumAMCColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumAMC' dans la table 'AMC_(Organismes/Contrat_Type)' "& _ 
                            "est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableAMC__Organismes_Contrat_Type_.NumAMCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Id_Contrat_Type() As String
            Get
                Try 
                    Return CType(Me(Me._tableAMC__Organismes_Contrat_Type_.Id_Contrat_TypeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Id_Contrat_Type' dans la table 'AMC_(Organismes/Contra"& _ 
                            "t_Type)' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableAMC__Organismes_Contrat_Type_.Id_Contrat_TypeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumAMCNull() As Boolean
            Return Me.IsNull(Me._tableAMC__Organismes_Contrat_Type_.NumAMCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumAMCNull()
            Me(Me._tableAMC__Organismes_Contrat_Type_.NumAMCColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsId_Contrat_TypeNull() As Boolean
            Return Me.IsNull(Me._tableAMC__Organismes_Contrat_Type_.Id_Contrat_TypeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetId_Contrat_TypeNull()
            Me(Me._tableAMC__Organismes_Contrat_Type_.Id_Contrat_TypeColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class AMC_Contrat_TypeRow
        Inherits Global.System.Data.DataRow
        
        Private tableAMC_Contrat_Type As AMC_Contrat_TypeDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableAMC_Contrat_Type = CType(Me.Table,AMC_Contrat_TypeDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Id() As String
            Get
                Return CType(Me(Me.tableAMC_Contrat_Type.IdColumn),String)
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.IdColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Intitulé() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.IntituléColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Intitulé' dans la table 'AMC_Contrat_Type' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.IntituléColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AAD() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.AADColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AAD' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.AADColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AAR() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.AARColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AAR' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.AARColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ARO() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.AROColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ARO' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.AROColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property B() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.BColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'B' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.BColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CPH() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.CPHColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CPH' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.CPHColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MAC() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.MACColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MAC' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.MACColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MAD() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.MADColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MAD' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.MADColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MHU() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.MHUColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MHU' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.MHUColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MPI() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.MPIColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MPI' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.MPIColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PA() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PAColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PA' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PAColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PAN() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PANColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PAN' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PANColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PDM() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PDMColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PDM' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PDMColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PG7() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PG7Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PG7' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PG7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PH1() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PH1Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PH1' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PH1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PH2() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PH2Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PH2' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PH2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PH4() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PH4Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PH4' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PH4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PH7() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PH7Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PH7' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PH7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PHA() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PHAColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PHA' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PHAColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PHN() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PHNColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PHN' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PHNColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PII() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PIIColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PII' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PIIColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PM2() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PM2Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PM2' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PM2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PM4() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PM4Column),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PM4' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PM4Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PMR() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PMRColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PMR' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PMRColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property SNG() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.SNGColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'SNG' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.SNGColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UPH() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.UPHColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'UPH' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.UPHColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property COR() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.CORColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'COR' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.CORColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property GLU() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.GLUColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'GLU' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.GLUColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LEN() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.LENColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LEN' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.LENColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LUN() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.LUNColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LUN' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.LUNColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property OPT() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.OPTColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'OPT' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.OPTColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ORP() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.ORPColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ORP' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.ORPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PAU() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PAUColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PAU' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PAUColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PEX() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PEXColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PEX' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PEXColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property POC() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.POCColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'POC' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.POCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TNS() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.TNSColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TNS' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.TNSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property VEH() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.VEHColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'VEH' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.VEHColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property VER() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.VERColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'VER' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.VERColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ATL() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.ATLColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ATL' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.ATLColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DPS() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.DPSColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DPS' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.DPSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DVO() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.DVOColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DVO' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.DVOColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property KGP() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.KGPColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'KGP' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.KGPColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PMH() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PMHColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PMH' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PMHColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property SGN() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.SGNColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'SGN' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.SGNColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property SGS() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.SGSColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'SGS' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.SGSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PPI() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.PPIColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PPI' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.PPIColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Top_CMU() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Contrat_Type.Top_CMUColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Top_CMU' dans la table 'AMC_Contrat_Type' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Contrat_Type.Top_CMUColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIntituléNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.IntituléColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIntituléNull()
            Me(Me.tableAMC_Contrat_Type.IntituléColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAADNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.AADColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAADNull()
            Me(Me.tableAMC_Contrat_Type.AADColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAARNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.AARColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAARNull()
            Me(Me.tableAMC_Contrat_Type.AARColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsARONull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.AROColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetARONull()
            Me(Me.tableAMC_Contrat_Type.AROColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsBNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.BColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetBNull()
            Me(Me.tableAMC_Contrat_Type.BColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCPHNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.CPHColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCPHNull()
            Me(Me.tableAMC_Contrat_Type.CPHColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMACNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.MACColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMACNull()
            Me(Me.tableAMC_Contrat_Type.MACColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMADNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.MADColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMADNull()
            Me(Me.tableAMC_Contrat_Type.MADColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMHUNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.MHUColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMHUNull()
            Me(Me.tableAMC_Contrat_Type.MHUColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMPINull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.MPIColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMPINull()
            Me(Me.tableAMC_Contrat_Type.MPIColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPANull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PAColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPANull()
            Me(Me.tableAMC_Contrat_Type.PAColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPANNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PANColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPANNull()
            Me(Me.tableAMC_Contrat_Type.PANColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPDMNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PDMColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPDMNull()
            Me(Me.tableAMC_Contrat_Type.PDMColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPG7Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PG7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPG7Null()
            Me(Me.tableAMC_Contrat_Type.PG7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPH1Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PH1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPH1Null()
            Me(Me.tableAMC_Contrat_Type.PH1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPH2Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PH2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPH2Null()
            Me(Me.tableAMC_Contrat_Type.PH2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPH4Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PH4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPH4Null()
            Me(Me.tableAMC_Contrat_Type.PH4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPH7Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PH7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPH7Null()
            Me(Me.tableAMC_Contrat_Type.PH7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPHANull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PHAColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPHANull()
            Me(Me.tableAMC_Contrat_Type.PHAColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPHNNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PHNColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPHNNull()
            Me(Me.tableAMC_Contrat_Type.PHNColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPIINull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PIIColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPIINull()
            Me(Me.tableAMC_Contrat_Type.PIIColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPM2Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PM2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPM2Null()
            Me(Me.tableAMC_Contrat_Type.PM2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPM4Null() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PM4Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPM4Null()
            Me(Me.tableAMC_Contrat_Type.PM4Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPMRNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PMRColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPMRNull()
            Me(Me.tableAMC_Contrat_Type.PMRColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSNGNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.SNGColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSNGNull()
            Me(Me.tableAMC_Contrat_Type.SNGColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsUPHNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.UPHColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetUPHNull()
            Me(Me.tableAMC_Contrat_Type.UPHColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCORNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.CORColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCORNull()
            Me(Me.tableAMC_Contrat_Type.CORColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsGLUNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.GLUColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetGLUNull()
            Me(Me.tableAMC_Contrat_Type.GLUColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLENNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.LENColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLENNull()
            Me(Me.tableAMC_Contrat_Type.LENColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLUNNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.LUNColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLUNNull()
            Me(Me.tableAMC_Contrat_Type.LUNColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsOPTNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.OPTColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetOPTNull()
            Me(Me.tableAMC_Contrat_Type.OPTColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsORPNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.ORPColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetORPNull()
            Me(Me.tableAMC_Contrat_Type.ORPColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPAUNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PAUColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPAUNull()
            Me(Me.tableAMC_Contrat_Type.PAUColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPEXNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PEXColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPEXNull()
            Me(Me.tableAMC_Contrat_Type.PEXColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPOCNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.POCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPOCNull()
            Me(Me.tableAMC_Contrat_Type.POCColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTNSNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.TNSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTNSNull()
            Me(Me.tableAMC_Contrat_Type.TNSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsVEHNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.VEHColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetVEHNull()
            Me(Me.tableAMC_Contrat_Type.VEHColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsVERNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.VERColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetVERNull()
            Me(Me.tableAMC_Contrat_Type.VERColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsATLNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.ATLColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetATLNull()
            Me(Me.tableAMC_Contrat_Type.ATLColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDPSNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.DPSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDPSNull()
            Me(Me.tableAMC_Contrat_Type.DPSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDVONull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.DVOColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDVONull()
            Me(Me.tableAMC_Contrat_Type.DVOColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsKGPNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.KGPColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetKGPNull()
            Me(Me.tableAMC_Contrat_Type.KGPColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPMHNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PMHColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPMHNull()
            Me(Me.tableAMC_Contrat_Type.PMHColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSGNNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.SGNColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSGNNull()
            Me(Me.tableAMC_Contrat_Type.SGNColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSGSNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.SGSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSGSNull()
            Me(Me.tableAMC_Contrat_Type.SGSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPPINull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.PPIColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPPINull()
            Me(Me.tableAMC_Contrat_Type.PPIColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTop_CMUNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Contrat_Type.Top_CMUColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTop_CMUNull()
            Me(Me.tableAMC_Contrat_Type.Top_CMUColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class AMC_OrganismesRow
        Inherits Global.System.Data.DataRow
        
        Private tableAMC_Organismes As AMC_OrganismesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableAMC_Organismes = CType(Me.Table,AMC_OrganismesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Organismes.NumColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num' dans la table 'AMC_Organismes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Organismes.NumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Intitulé() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Organismes.IntituléColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Intitulé' dans la table 'AMC_Organismes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Organismes.IntituléColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Adresse() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Organismes.AdresseColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Adresse' dans la table 'AMC_Organismes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Organismes.AdresseColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Telephone() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMC_Organismes.TelephoneColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Telephone' dans la table 'AMC_Organismes' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMC_Organismes.TelephoneColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Organismes.NumColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumNull()
            Me(Me.tableAMC_Organismes.NumColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIntituléNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Organismes.IntituléColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIntituléNull()
            Me(Me.tableAMC_Organismes.IntituléColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAdresseNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Organismes.AdresseColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAdresseNull()
            Me(Me.tableAMC_Organismes.AdresseColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTelephoneNull() As Boolean
            Return Me.IsNull(Me.tableAMC_Organismes.TelephoneColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTelephoneNull()
            Me(Me.tableAMC_Organismes.TelephoneColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class CodePrestationsRow
        Inherits Global.System.Data.DataRow
        
        Private tableCodePrestations As CodePrestationsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableCodePrestations = CType(Me.Table,CodePrestationsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Code() As String
            Get
                Return CType(Me(Me.tableCodePrestations.CodeColumn),String)
            End Get
            Set
                Me(Me.tableCodePrestations.CodeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Signification() As String
            Get
                Try 
                    Return CType(Me(Me.tableCodePrestations.SignificationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Signification' dans la table 'CodePrestations' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableCodePrestations.SignificationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TypeNomenclature() As String
            Get
                Try 
                    Return CType(Me(Me.tableCodePrestations.TypeNomenclatureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TypeNomenclature' dans la table 'CodePrestations' est "& _ 
                            "DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableCodePrestations.TypeNomenclatureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CompatiblePharma() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tableCodePrestations.CompatiblePharmaColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CompatiblePharma' dans la table 'CodePrestations' est "& _ 
                            "DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableCodePrestations.CompatiblePharmaColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CompatibleTable1() As Boolean
            Get
                Return CType(Me(Me.tableCodePrestations.CompatibleTable1Column),Boolean)
            End Get
            Set
                Me(Me.tableCodePrestations.CompatibleTable1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Top_Codage_Affiné() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tableCodePrestations.Top_Codage_AffinéColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Top_Codage_Affiné' dans la table 'CodePrestations' est"& _ 
                            " DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableCodePrestations.Top_Codage_AffinéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSignificationNull() As Boolean
            Return Me.IsNull(Me.tableCodePrestations.SignificationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSignificationNull()
            Me(Me.tableCodePrestations.SignificationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTypeNomenclatureNull() As Boolean
            Return Me.IsNull(Me.tableCodePrestations.TypeNomenclatureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTypeNomenclatureNull()
            Me(Me.tableCodePrestations.TypeNomenclatureColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCompatiblePharmaNull() As Boolean
            Return Me.IsNull(Me.tableCodePrestations.CompatiblePharmaColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCompatiblePharmaNull()
            Me(Me.tableCodePrestations.CompatiblePharmaColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTop_Codage_AffinéNull() As Boolean
            Return Me.IsNull(Me.tableCodePrestations.Top_Codage_AffinéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTop_Codage_AffinéNull()
            Me(Me.tableCodePrestations.Top_Codage_AffinéColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class ARLRow
        Inherits Global.System.Data.DataRow
        
        Private tableARL As ARLDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableARL = CType(Me.Table,ARLDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MessageId() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.MessageIdColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MessageId' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.MessageIdColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property InReplyTo() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.InReplyToColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'InReplyTo' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.InReplyToColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Subject() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.SubjectColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Subject' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.SubjectColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property From_() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.From_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'From_' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.From_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property FichierPieceJointe() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableARL.FichierPieceJointeColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'FichierPieceJointe' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.FichierPieceJointeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Content_Description() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.Content_DescriptionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Content_Description' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.Content_DescriptionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Numéro() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.NuméroColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Numéro' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.NuméroColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateCréation() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.DateCréationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateCréation' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.DateCréationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateRéception() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.DateRéceptionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateRéception' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.DateRéceptionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property EmetteurLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.EmetteurLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'EmetteurLot' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.EmetteurLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumDestinataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.NumDestinataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumDestinataire' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.NumDestinataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RefLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.RefLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'RefLot' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.RefLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.DateLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateLot' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.DateLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TypeCodeTraitementLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.TypeCodeTraitementLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TypeCodeTraitementLot' dans la table 'ARL' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.TypeCodeTraitementLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeTraitementLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.CodeTraitementLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CodeTraitementLot' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.CodeTraitementLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LibelléTraitementLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.LibelléTraitementLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LibelléTraitementLot' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.LibelléTraitementLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property To_() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.To_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'To_' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.To_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Content_Type() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.Content_TypeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Content_Type' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.Content_TypeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeErreurTraduireARL() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.CodeErreurTraduireARLColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CodeErreurTraduireARL' dans la table 'ARL' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.CodeErreurTraduireARLColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property TypeNumEmetteurLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableARL.TypeNumEmetteurLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'TypeNumEmetteurLot' dans la table 'ARL' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableARL.TypeNumEmetteurLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMessageIdNull() As Boolean
            Return Me.IsNull(Me.tableARL.MessageIdColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMessageIdNull()
            Me(Me.tableARL.MessageIdColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsInReplyToNull() As Boolean
            Return Me.IsNull(Me.tableARL.InReplyToColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetInReplyToNull()
            Me(Me.tableARL.InReplyToColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSubjectNull() As Boolean
            Return Me.IsNull(Me.tableARL.SubjectColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSubjectNull()
            Me(Me.tableARL.SubjectColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFrom_Null() As Boolean
            Return Me.IsNull(Me.tableARL.From_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFrom_Null()
            Me(Me.tableARL.From_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFichierPieceJointeNull() As Boolean
            Return Me.IsNull(Me.tableARL.FichierPieceJointeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFichierPieceJointeNull()
            Me(Me.tableARL.FichierPieceJointeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsContent_DescriptionNull() As Boolean
            Return Me.IsNull(Me.tableARL.Content_DescriptionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetContent_DescriptionNull()
            Me(Me.tableARL.Content_DescriptionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNuméroNull() As Boolean
            Return Me.IsNull(Me.tableARL.NuméroColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNuméroNull()
            Me(Me.tableARL.NuméroColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateCréationNull() As Boolean
            Return Me.IsNull(Me.tableARL.DateCréationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateCréationNull()
            Me(Me.tableARL.DateCréationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateRéceptionNull() As Boolean
            Return Me.IsNull(Me.tableARL.DateRéceptionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateRéceptionNull()
            Me(Me.tableARL.DateRéceptionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEmetteurLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.EmetteurLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEmetteurLotNull()
            Me(Me.tableARL.EmetteurLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumDestinataireNull() As Boolean
            Return Me.IsNull(Me.tableARL.NumDestinataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumDestinataireNull()
            Me(Me.tableARL.NumDestinataireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRefLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.RefLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRefLotNull()
            Me(Me.tableARL.RefLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.DateLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateLotNull()
            Me(Me.tableARL.DateLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTypeCodeTraitementLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.TypeCodeTraitementLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTypeCodeTraitementLotNull()
            Me(Me.tableARL.TypeCodeTraitementLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCodeTraitementLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.CodeTraitementLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCodeTraitementLotNull()
            Me(Me.tableARL.CodeTraitementLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLibelléTraitementLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.LibelléTraitementLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLibelléTraitementLotNull()
            Me(Me.tableARL.LibelléTraitementLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTo_Null() As Boolean
            Return Me.IsNull(Me.tableARL.To_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTo_Null()
            Me(Me.tableARL.To_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsContent_TypeNull() As Boolean
            Return Me.IsNull(Me.tableARL.Content_TypeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetContent_TypeNull()
            Me(Me.tableARL.Content_TypeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCodeErreurTraduireARLNull() As Boolean
            Return Me.IsNull(Me.tableARL.CodeErreurTraduireARLColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCodeErreurTraduireARLNull()
            Me(Me.tableARL.CodeErreurTraduireARLColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTypeNumEmetteurLotNull() As Boolean
            Return Me.IsNull(Me.tableARL.TypeNumEmetteurLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTypeNumEmetteurLotNull()
            Me(Me.tableARL.TypeNumEmetteurLotColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class AMORow
        Inherits Global.System.Data.DataRow
        
        Private tableAMO As AMODataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableAMO = CType(Me.Table,AMODataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeRégime() As String
            Get
                Return CType(Me(Me.tableAMO.CodeRégimeColumn),String)
            End Get
            Set
                Me(Me.tableAMO.CodeRégimeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CaisseGestionnaire() As String
            Get
                Return CType(Me(Me.tableAMO.CaisseGestionnaireColumn),String)
            End Get
            Set
                Me(Me.tableAMO.CaisseGestionnaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CentreGestionnaire() As String
            Get
                Return CType(Me(Me.tableAMO.CentreGestionnaireColumn),String)
            End Get
            Set
                Me(Me.tableAMO.CentreGestionnaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property OrganismeDestinataire() As String
            Get
                Return CType(Me(Me.tableAMO.OrganismeDestinataireColumn),String)
            End Get
            Set
                Me(Me.tableAMO.OrganismeDestinataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CentreInformatique() As String
            Get
                Return CType(Me(Me.tableAMO.CentreInformatiqueColumn),String)
            End Get
            Set
                Me(Me.tableAMO.CentreInformatiqueColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property libellé() As String
            Get
                Try 
                    Return CType(Me(Me.tableAMO.libelléColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'libellé' dans la table 'AMO' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAMO.libelléColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IslibelléNull() As Boolean
            Return Me.IsNull(Me.tableAMO.libelléColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetlibelléNull()
            Me(Me.tableAMO.libelléColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Facture_VenteDirecteRow
        Inherits Global.System.Data.DataRow
        
        Private tableFacture_VenteDirecte As Facture_VenteDirecteDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableFacture_VenteDirecte = CType(Me.Table,Facture_VenteDirecteDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num() As Decimal
            Get
                Return CType(Me(Me.tableFacture_VenteDirecte.NumColumn),Decimal)
            End Get
            Set
                Me(Me.tableFacture_VenteDirecte.NumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Nir() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_VenteDirecte.NirColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Nir' dans la table 'Facture_VenteDirecte' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_VenteDirecte.NirColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Nom() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_VenteDirecte.NomColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Nom' dans la table 'Facture_VenteDirecte' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_VenteDirecte.NomColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prénom() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_VenteDirecte.PrénomColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prénom' dans la table 'Facture_VenteDirecte' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_VenteDirecte.PrénomColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Date_() As String
            Get
                Try 
                    Return CType(Me(Me.tableFacture_VenteDirecte.Date_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date_' dans la table 'Facture_VenteDirecte' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_VenteDirecte.Date_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Total() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableFacture_VenteDirecte.TotalColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Total' dans la table 'Facture_VenteDirecte' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableFacture_VenteDirecte.TotalColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNirNull() As Boolean
            Return Me.IsNull(Me.tableFacture_VenteDirecte.NirColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNirNull()
            Me(Me.tableFacture_VenteDirecte.NirColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNomNull() As Boolean
            Return Me.IsNull(Me.tableFacture_VenteDirecte.NomColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNomNull()
            Me(Me.tableFacture_VenteDirecte.NomColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrénomNull() As Boolean
            Return Me.IsNull(Me.tableFacture_VenteDirecte.PrénomColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrénomNull()
            Me(Me.tableFacture_VenteDirecte.PrénomColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDate_Null() As Boolean
            Return Me.IsNull(Me.tableFacture_VenteDirecte.Date_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDate_Null()
            Me(Me.tableFacture_VenteDirecte.Date_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTotalNull() As Boolean
            Return Me.IsNull(Me.tableFacture_VenteDirecte.TotalColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTotalNull()
            Me(Me.tableFacture_VenteDirecte.TotalColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Pop_Allowed_ListRow
        Inherits Global.System.Data.DataRow
        
        Private tablePop_Allowed_List As Pop_Allowed_ListDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tablePop_Allowed_List = CType(Me.Table,Pop_Allowed_ListDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Adresse() As String
            Get
                Try 
                    Return CType(Me(Me.tablePop_Allowed_List.AdresseColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Adresse' dans la table 'Pop_Allowed_List' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablePop_Allowed_List.AdresseColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAdresseNull() As Boolean
            Return Me.IsNull(Me.tablePop_Allowed_List.AdresseColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAdresseNull()
            Me(Me.tablePop_Allowed_List.AdresseColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Convention_Table_correspondanceRow
        Inherits Global.System.Data.DataRow
        
        Private tableConvention_Table_correspondance As Convention_Table_correspondanceDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableConvention_Table_correspondance = CType(Me.Table,Convention_Table_correspondanceDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_org_complémentaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_correspondance.Num_org_complémentaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_org_complémentaire' dans la table 'Convention_Tabl"& _ 
                            "e_correspondance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_correspondance.Num_org_complémentaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MUTNUM() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_correspondance.MUTNUMColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MUTNUM' dans la table 'Convention_Table_correspondance"& _ 
                            "' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_correspondance.MUTNUMColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property code_organisme_obligatoire_associé() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_correspondance.code_organisme_obligatoire_associéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'code_organisme_obligatoire_associé' dans la table 'Con"& _ 
                            "vention_Table_correspondance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_correspondance.code_organisme_obligatoire_associéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property libellé_organisme_complémentaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_correspondance.libellé_organisme_complémentaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'libellé_organisme_complémentaire' dans la table 'Conve"& _ 
                            "ntion_Table_correspondance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_correspondance.libellé_organisme_complémentaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_org_complémentaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_correspondance.Num_org_complémentaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_org_complémentaireNull()
            Me(Me.tableConvention_Table_correspondance.Num_org_complémentaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMUTNUMNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_correspondance.MUTNUMColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMUTNUMNull()
            Me(Me.tableConvention_Table_correspondance.MUTNUMColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Iscode_organisme_obligatoire_associéNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_correspondance.code_organisme_obligatoire_associéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setcode_organisme_obligatoire_associéNull()
            Me(Me.tableConvention_Table_correspondance.code_organisme_obligatoire_associéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Islibellé_organisme_complémentaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_correspondance.libellé_organisme_complémentaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setlibellé_organisme_complémentaireNull()
            Me(Me.tableConvention_Table_correspondance.libellé_organisme_complémentaireColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Convention_Table_ConventionsRow
        Inherits Global.System.Data.DataRow
        
        Private tableConvention_Table_Conventions As Convention_Table_ConventionsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableConvention_Table_Conventions = CType(Me.Table,Convention_Table_ConventionsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Code_action() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Code_actionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Code_action' dans la table 'Convention_Table_Conventio"& _ 
                            "ns' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Code_actionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Code_catégorie() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Code_catégorieColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Code_catégorie' dans la table 'Convention_Table_Conven"& _ 
                            "tions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Code_catégorieColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Spécialité() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.SpécialitéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Spécialité' dans la table 'Convention_Table_Convention"& _ 
                            "s' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.SpécialitéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Référence_de_convention() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Référence_de_conventionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Référence_de_convention' dans la table 'Convention_Tab"& _ 
                            "le_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Référence_de_conventionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Message() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.MessageColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Message' dans la table 'Convention_Table_Conventions' "& _ 
                            "est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.MessageColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Identifiant_org_signataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Identifiant_org_signataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Identifiant_org_signataire' dans la table 'Convention_"& _ 
                            "Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Identifiant_org_signataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Libellé_org_signataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Libellé_org_signataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Libellé_org_signataire' dans la table 'Convention_Tabl"& _ 
                            "e_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Libellé_org_signataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property indicateur_convention_groupée() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.indicateur_convention_groupéeColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'indicateur_convention_groupée' dans la table 'Conventi"& _ 
                            "on_Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.indicateur_convention_groupéeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property type_Identifiant_org_signataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.type_Identifiant_org_signataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'type_Identifiant_org_signataire' dans la table 'Conven"& _ 
                            "tion_Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.type_Identifiant_org_signataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property critère_secondaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.critère_secondaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'critère_secondaire' dans la table 'Convention_Table_Co"& _ 
                            "nventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.critère_secondaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property type_Accord() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.type_AccordColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'type_Accord' dans la table 'Convention_Table_Conventio"& _ 
                            "ns' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.type_AccordColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_AMC() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Num_AMCColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_AMC' dans la table 'Convention_Table_Conventions' "& _ 
                            "est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Num_AMCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property libellé_Org_complémentaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.libellé_Org_complémentaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'libellé_Org_complémentaire' dans la table 'Convention_"& _ 
                            "Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.libellé_Org_complémentaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property indic_desactivation_STS() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.indic_desactivation_STSColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'indic_desactivation_STS' dans la table 'Convention_Tab"& _ 
                            "le_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.indic_desactivation_STSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Code_aiguillage_STS() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Code_aiguillage_STSColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Code_aiguillage_STS' dans la table 'Convention_Table_C"& _ 
                            "onventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Code_aiguillage_STSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property usage_attestation_papier() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.usage_attestation_papierColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'usage_attestation_papier' dans la table 'Convention_Ta"& _ 
                            "ble_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.usage_attestation_papierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Accepatation_DRE_Annulation() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Accepatation_DRE_AnnulationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Accepatation_DRE_Annulation' dans la table 'Convention"& _ 
                            "_Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Accepatation_DRE_AnnulationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Acceptation_DRE_Rectification() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Acceptation_DRE_RectificationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Acceptation_DRE_Rectification' dans la table 'Conventi"& _ 
                            "on_Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Acceptation_DRE_RectificationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Identifiant_Opérateur_règlement() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Identifiant_Opérateur_règlementColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Identifiant_Opérateur_règlement' dans la table 'Conven"& _ 
                            "tion_Table_Conventions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Identifiant_Opérateur_règlementColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Code_routage() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.Code_routageColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Code_routage' dans la table 'Convention_Table_Conventi"& _ 
                            "ons' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.Code_routageColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property identifiant_hôte() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.identifiant_hôteColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'identifiant_hôte' dans la table 'Convention_Table_Conv"& _ 
                            "entions' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.identifiant_hôteColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property nom_domaine() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Conventions.nom_domaineColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'nom_domaine' dans la table 'Convention_Table_Conventio"& _ 
                            "ns' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Conventions.nom_domaineColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCode_actionNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Code_actionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCode_actionNull()
            Me(Me.tableConvention_Table_Conventions.Code_actionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCode_catégorieNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Code_catégorieColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCode_catégorieNull()
            Me(Me.tableConvention_Table_Conventions.Code_catégorieColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSpécialitéNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.SpécialitéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSpécialitéNull()
            Me(Me.tableConvention_Table_Conventions.SpécialitéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRéférence_de_conventionNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Référence_de_conventionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRéférence_de_conventionNull()
            Me(Me.tableConvention_Table_Conventions.Référence_de_conventionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMessageNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.MessageColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMessageNull()
            Me(Me.tableConvention_Table_Conventions.MessageColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIdentifiant_org_signataireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Identifiant_org_signataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIdentifiant_org_signataireNull()
            Me(Me.tableConvention_Table_Conventions.Identifiant_org_signataireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLibellé_org_signataireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Libellé_org_signataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLibellé_org_signataireNull()
            Me(Me.tableConvention_Table_Conventions.Libellé_org_signataireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isindicateur_convention_groupéeNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.indicateur_convention_groupéeColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setindicateur_convention_groupéeNull()
            Me(Me.tableConvention_Table_Conventions.indicateur_convention_groupéeColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Istype_Identifiant_org_signataireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.type_Identifiant_org_signataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Settype_Identifiant_org_signataireNull()
            Me(Me.tableConvention_Table_Conventions.type_Identifiant_org_signataireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Iscritère_secondaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.critère_secondaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setcritère_secondaireNull()
            Me(Me.tableConvention_Table_Conventions.critère_secondaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Istype_AccordNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.type_AccordColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Settype_AccordNull()
            Me(Me.tableConvention_Table_Conventions.type_AccordColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_AMCNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Num_AMCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_AMCNull()
            Me(Me.tableConvention_Table_Conventions.Num_AMCColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Islibellé_Org_complémentaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.libellé_Org_complémentaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setlibellé_Org_complémentaireNull()
            Me(Me.tableConvention_Table_Conventions.libellé_Org_complémentaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isindic_desactivation_STSNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.indic_desactivation_STSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setindic_desactivation_STSNull()
            Me(Me.tableConvention_Table_Conventions.indic_desactivation_STSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCode_aiguillage_STSNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Code_aiguillage_STSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCode_aiguillage_STSNull()
            Me(Me.tableConvention_Table_Conventions.Code_aiguillage_STSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isusage_attestation_papierNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.usage_attestation_papierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setusage_attestation_papierNull()
            Me(Me.tableConvention_Table_Conventions.usage_attestation_papierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAccepatation_DRE_AnnulationNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Accepatation_DRE_AnnulationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAccepatation_DRE_AnnulationNull()
            Me(Me.tableConvention_Table_Conventions.Accepatation_DRE_AnnulationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAcceptation_DRE_RectificationNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Acceptation_DRE_RectificationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAcceptation_DRE_RectificationNull()
            Me(Me.tableConvention_Table_Conventions.Acceptation_DRE_RectificationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIdentifiant_Opérateur_règlementNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Identifiant_Opérateur_règlementColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIdentifiant_Opérateur_règlementNull()
            Me(Me.tableConvention_Table_Conventions.Identifiant_Opérateur_règlementColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCode_routageNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.Code_routageColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCode_routageNull()
            Me(Me.tableConvention_Table_Conventions.Code_routageColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isidentifiant_hôteNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.identifiant_hôteColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setidentifiant_hôteNull()
            Me(Me.tableConvention_Table_Conventions.identifiant_hôteColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isnom_domaineNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Conventions.nom_domaineColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setnom_domaineNull()
            Me(Me.tableConvention_Table_Conventions.nom_domaineColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class Convention_Table_RegroupementsRow
        Inherits Global.System.Data.DataRow
        
        Private tableConvention_Table_Regroupements As Convention_Table_RegroupementsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableConvention_Table_Regroupements = CType(Me.Table,Convention_Table_RegroupementsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Action() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.ActionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Action' dans la table 'Convention_Table_Regroupements'"& _ 
                            " est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.ActionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property catégorie() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.catégorieColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'catégorie' dans la table 'Convention_Table_Regroupemen"& _ 
                            "ts' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.catégorieColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Spécialité() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.SpécialitéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Spécialité' dans la table 'Convention_Table_Regroupeme"& _ 
                            "nts' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.SpécialitéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_Org_Complémentaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.Num_Org_ComplémentaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_Org_Complémentaire' dans la table 'Convention_Tabl"& _ 
                            "e_Regroupements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.Num_Org_ComplémentaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property libellé_organisme_complémentaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.libellé_organisme_complémentaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'libellé_organisme_complémentaire' dans la table 'Conve"& _ 
                            "ntion_Table_Regroupements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.libellé_organisme_complémentaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Type_convention() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.Type_conventionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Type_convention' dans la table 'Convention_Table_Regro"& _ 
                            "upements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.Type_conventionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property libellé_Type_convention() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.libellé_Type_conventionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'libellé_Type_convention' dans la table 'Convention_Tab"& _ 
                            "le_Regroupements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.libellé_Type_conventionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property critère_secondaire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.critère_secondaireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'critère_secondaire' dans la table 'Convention_Table_Re"& _ 
                            "groupements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.critère_secondaireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Id_org_signataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.Id_org_signataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Id_org_signataire' dans la table 'Convention_Table_Reg"& _ 
                            "roupements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.Id_org_signataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Libellé_org_signataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableConvention_Table_Regroupements.Libellé_org_signataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Libellé_org_signataire' dans la table 'Convention_Tabl"& _ 
                            "e_Regroupements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableConvention_Table_Regroupements.Libellé_org_signataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsActionNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.ActionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetActionNull()
            Me(Me.tableConvention_Table_Regroupements.ActionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IscatégorieNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.catégorieColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetcatégorieNull()
            Me(Me.tableConvention_Table_Regroupements.catégorieColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSpécialitéNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.SpécialitéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSpécialitéNull()
            Me(Me.tableConvention_Table_Regroupements.SpécialitéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_Org_ComplémentaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.Num_Org_ComplémentaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_Org_ComplémentaireNull()
            Me(Me.tableConvention_Table_Regroupements.Num_Org_ComplémentaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Islibellé_organisme_complémentaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.libellé_organisme_complémentaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setlibellé_organisme_complémentaireNull()
            Me(Me.tableConvention_Table_Regroupements.libellé_organisme_complémentaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsType_conventionNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.Type_conventionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetType_conventionNull()
            Me(Me.tableConvention_Table_Regroupements.Type_conventionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Islibellé_Type_conventionNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.libellé_Type_conventionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setlibellé_Type_conventionNull()
            Me(Me.tableConvention_Table_Regroupements.libellé_Type_conventionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Iscritère_secondaireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.critère_secondaireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setcritère_secondaireNull()
            Me(Me.tableConvention_Table_Regroupements.critère_secondaireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsId_org_signataireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.Id_org_signataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetId_org_signataireNull()
            Me(Me.tableConvention_Table_Regroupements.Id_org_signataireColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLibellé_org_signataireNull() As Boolean
            Return Me.IsNull(Me.tableConvention_Table_Regroupements.Libellé_org_signataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLibellé_org_signataireNull()
            Me(Me.tableConvention_Table_Regroupements.Libellé_org_signataireColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class _Taux_CodeRégimeRow
        Inherits Global.System.Data.DataRow
        
        Private _tableTaux_CodeRégime As _Taux_CodeRégimeDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me._tableTaux_CodeRégime = CType(Me.Table,_Taux_CodeRégimeDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeRégime() As String
            Get
                Return CType(Me(Me._tableTaux_CodeRégime.CodeRégimeColumn),String)
            End Get
            Set
                Me(Me._tableTaux_CodeRégime.CodeRégimeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeActe() As String
            Get
                Return CType(Me(Me._tableTaux_CodeRégime.CodeActeColumn),String)
            End Get
            Set
                Me(Me._tableTaux_CodeRégime.CodeActeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Taux() As Double
            Get
                Return CType(Me(Me._tableTaux_CodeRégime.TauxColumn),Double)
            End Get
            Set
                Me(Me._tableTaux_CodeRégime.TauxColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateMin() As String
            Get
                Try 
                    Return CType(Me(Me._tableTaux_CodeRégime.DateMinColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateMin' dans la table 'Taux/CodeRégime' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableTaux_CodeRégime.DateMinColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateMax() As String
            Get
                Try 
                    Return CType(Me(Me._tableTaux_CodeRégime.DateMaxColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DateMax' dans la table 'Taux/CodeRégime' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableTaux_CodeRégime.DateMaxColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateMinNull() As Boolean
            Return Me.IsNull(Me._tableTaux_CodeRégime.DateMinColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateMinNull()
            Me(Me._tableTaux_CodeRégime.DateMinColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDateMaxNull() As Boolean
            Return Me.IsNull(Me._tableTaux_CodeRégime.DateMaxColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDateMaxNull()
            Me(Me._tableTaux_CodeRégime.DateMaxColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class _Taux_CodeSituationRow
        Inherits Global.System.Data.DataRow
        
        Private _tableTaux_CodeSituation As _Taux_CodeSituationDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me._tableTaux_CodeSituation = CType(Me.Table,_Taux_CodeSituationDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeSituation() As String
            Get
                Return CType(Me(Me._tableTaux_CodeSituation.CodeSituationColumn),String)
            End Get
            Set
                Me(Me._tableTaux_CodeSituation.CodeSituationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodeActe() As String
            Get
                Return CType(Me(Me._tableTaux_CodeSituation.CodeActeColumn),String)
            End Get
            Set
                Me(Me._tableTaux_CodeSituation.CodeActeColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Taux() As Double
            Get
                Return CType(Me(Me._tableTaux_CodeSituation.TauxColumn),Double)
            End Get
            Set
                Me(Me._tableTaux_CodeSituation.TauxColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateMin() As String
            Get
                Return CType(Me(Me._tableTaux_CodeSituation.DateMinColumn),String)
            End Get
            Set
                Me(Me._tableTaux_CodeSituation.DateMinColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DateMax() As String
            Get
                Return CType(Me(Me._tableTaux_CodeSituation.DateMaxColumn),String)
            End Get
            Set
                Me(Me._tableTaux_CodeSituation.DateMaxColumn) = value
            End Set
        End Property
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class AR_PRow
        Inherits Global.System.Data.DataRow
        
        Private tableAR_P As AR_PDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableAR_P = CType(Me.Table,AR_PDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableAR_P.NumColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num' dans la table 'AR_P' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAR_P.NumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property From_() As String
            Get
                Try 
                    Return CType(Me(Me.tableAR_P.From_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'From_' dans la table 'AR_P' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAR_P.From_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property To_() As String
            Get
                Try 
                    Return CType(Me(Me.tableAR_P.To_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'To_' dans la table 'AR_P' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAR_P.To_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Subject() As String
            Get
                Try 
                    Return CType(Me(Me.tableAR_P.SubjectColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Subject' dans la table 'AR_P' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAR_P.SubjectColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property In_Reply_To() As String
            Get
                Try 
                    Return CType(Me(Me.tableAR_P.In_Reply_ToColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'In_Reply_To' dans la table 'AR_P' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableAR_P.In_Reply_ToColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumNull() As Boolean
            Return Me.IsNull(Me.tableAR_P.NumColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumNull()
            Me(Me.tableAR_P.NumColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFrom_Null() As Boolean
            Return Me.IsNull(Me.tableAR_P.From_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFrom_Null()
            Me(Me.tableAR_P.From_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTo_Null() As Boolean
            Return Me.IsNull(Me.tableAR_P.To_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTo_Null()
            Me(Me.tableAR_P.To_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSubjectNull() As Boolean
            Return Me.IsNull(Me.tableAR_P.SubjectColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSubjectNull()
            Me(Me.tableAR_P.SubjectColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIn_Reply_ToNull() As Boolean
            Return Me.IsNull(Me.tableAR_P.In_Reply_ToColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIn_Reply_ToNull()
            Me(Me.tableAR_P.In_Reply_ToColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class _Service_RejetRow
        Inherits Global.System.Data.DataRow
        
        Private _tableService_Rejet As _Service_RejetDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me._tableService_Rejet = CType(Me.Table,_Service_RejetDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Fichier() As String
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.FichierColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Fichier' dans la table 'Service/Rejet' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.FichierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property From_() As String
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.From_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'From_' dans la table 'Service/Rejet' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.From_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property To_() As String
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.To_Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'To_' dans la table 'Service/Rejet' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.To_Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Subject() As String
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.SubjectColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Subject' dans la table 'Service/Rejet' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.SubjectColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property In_Reply_To() As String
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.In_Reply_ToColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'In_Reply_To' dans la table 'Service/Rejet' est DBNull."& _ 
                            "", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.In_Reply_ToColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Content_Description() As String
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.Content_DescriptionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Content_Description' dans la table 'Service/Rejet' est"& _ 
                            " DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.Content_DescriptionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num() As Decimal
            Get
                Try 
                    Return CType(Me(Me._tableService_Rejet.NumColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num' dans la table 'Service/Rejet' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me._tableService_Rejet.NumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFichierNull() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.FichierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFichierNull()
            Me(Me._tableService_Rejet.FichierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFrom_Null() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.From_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFrom_Null()
            Me(Me._tableService_Rejet.From_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsTo_Null() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.To_Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetTo_Null()
            Me(Me._tableService_Rejet.To_Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSubjectNull() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.SubjectColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSubjectNull()
            Me(Me._tableService_Rejet.SubjectColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIn_Reply_ToNull() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.In_Reply_ToColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIn_Reply_ToNull()
            Me(Me._tableService_Rejet.In_Reply_ToColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsContent_DescriptionNull() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.Content_DescriptionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetContent_DescriptionNull()
            Me(Me._tableService_Rejet.Content_DescriptionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumNull() As Boolean
            Return Me.IsNull(Me._tableService_Rejet.NumColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumNull()
            Me(Me._tableService_Rejet.NumColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class RSP_LIGNE_REJETRow
        Inherits Global.System.Data.DataRow
        
        Private tableRSP_LIGNE_REJET As RSP_LIGNE_REJETDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableRSP_LIGNE_REJET = CType(Me.Table,RSP_LIGNE_REJETDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.NumColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num' dans la table 'RSP_LIGNE_REJET' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.NumColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumFacture() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.NumFactureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumFacture' dans la table 'RSP_LIGNE_REJET' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.NumFactureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.NumLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumLot' dans la table 'RSP_LIGNE_REJET' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.NumLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CODIFICATION() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.CODIFICATIONColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CODIFICATION' dans la table 'RSP_LIGNE_REJET' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.CODIFICATIONColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property LIBELLE() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.LIBELLEColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'LIBELLE' dans la table 'RSP_LIGNE_REJET' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.LIBELLEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NIVEAU() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.NIVEAUColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NIVEAU' dans la table 'RSP_LIGNE_REJET' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.NIVEAUColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property PART_CONCERNE() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.PART_CONCERNEColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'PART CONCERNE' dans la table 'RSP_LIGNE_REJET' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.PART_CONCERNEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NATURE_DE_PRESTATION() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.NATURE_DE_PRESTATIONColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NATURE DE PRESTATION' dans la table 'RSP_LIGNE_REJET' "& _ 
                            "est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.NATURE_DE_PRESTATIONColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property DATE_DES_SOINS() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.DATE_DES_SOINSColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'DATE DES SOINS' dans la table 'RSP_LIGNE_REJET' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.DATE_DES_SOINSColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _N__EXECUTANT() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET._N__EXECUTANTColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'N° EXECUTANT' dans la table 'RSP_LIGNE_REJET' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET._N__EXECUTANTColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _N__DE_LIGNE() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET._N__DE_LIGNEColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'N° DE LIGNE' dans la table 'RSP_LIGNE_REJET' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET._N__DE_LIGNEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property RANG_DU_REJET() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.RANG_DU_REJETColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'RANG DU REJET' dans la table 'RSP_LIGNE_REJET' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.RANG_DU_REJETColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property INFORMATION_COMPLEMENTAIRE() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.INFORMATION_COMPLEMENTAIREColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'INFORMATION COMPLEMENTAIRE' dans la table 'RSP_LIGNE_R"& _ 
                            "EJET' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.INFORMATION_COMPLEMENTAIREColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Acquitement() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.AcquitementColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Acquitement' dans la table 'RSP_LIGNE_REJET' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.AcquitementColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Org_emetteur() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.Org_emetteurColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Org_emetteur' dans la table 'RSP_LIGNE_REJET' est DBNu"& _ 
                            "ll.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.Org_emetteurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property num_destinataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_LIGNE_REJET.num_destinataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'num_destinataire' dans la table 'RSP_LIGNE_REJET' est "& _ 
                            "DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_LIGNE_REJET.num_destinataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.NumColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumNull()
            Me(Me.tableRSP_LIGNE_REJET.NumColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumFactureNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.NumFactureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumFactureNull()
            Me(Me.tableRSP_LIGNE_REJET.NumFactureColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumLotNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.NumLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumLotNull()
            Me(Me.tableRSP_LIGNE_REJET.NumLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCODIFICATIONNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.CODIFICATIONColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCODIFICATIONNull()
            Me(Me.tableRSP_LIGNE_REJET.CODIFICATIONColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLIBELLENull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.LIBELLEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLIBELLENull()
            Me(Me.tableRSP_LIGNE_REJET.LIBELLEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNIVEAUNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.NIVEAUColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNIVEAUNull()
            Me(Me.tableRSP_LIGNE_REJET.NIVEAUColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPART_CONCERNENull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.PART_CONCERNEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPART_CONCERNENull()
            Me(Me.tableRSP_LIGNE_REJET.PART_CONCERNEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNATURE_DE_PRESTATIONNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.NATURE_DE_PRESTATIONColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNATURE_DE_PRESTATIONNull()
            Me(Me.tableRSP_LIGNE_REJET.NATURE_DE_PRESTATIONColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsDATE_DES_SOINSNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.DATE_DES_SOINSColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetDATE_DES_SOINSNull()
            Me(Me.tableRSP_LIGNE_REJET.DATE_DES_SOINSColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_N__EXECUTANTNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET._N__EXECUTANTColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_N__EXECUTANTNull()
            Me(Me.tableRSP_LIGNE_REJET._N__EXECUTANTColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_N__DE_LIGNENull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET._N__DE_LIGNEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_N__DE_LIGNENull()
            Me(Me.tableRSP_LIGNE_REJET._N__DE_LIGNEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsRANG_DU_REJETNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.RANG_DU_REJETColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetRANG_DU_REJETNull()
            Me(Me.tableRSP_LIGNE_REJET.RANG_DU_REJETColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsINFORMATION_COMPLEMENTAIRENull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.INFORMATION_COMPLEMENTAIREColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetINFORMATION_COMPLEMENTAIRENull()
            Me(Me.tableRSP_LIGNE_REJET.INFORMATION_COMPLEMENTAIREColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAcquitementNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.AcquitementColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAcquitementNull()
            Me(Me.tableRSP_LIGNE_REJET.AcquitementColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsOrg_emetteurNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.Org_emetteurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetOrg_emetteurNull()
            Me(Me.tableRSP_LIGNE_REJET.Org_emetteurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isnum_destinataireNull() As Boolean
            Return Me.IsNull(Me.tableRSP_LIGNE_REJET.num_destinataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setnum_destinataireNull()
            Me(Me.tableRSP_LIGNE_REJET.num_destinataireColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class RSP_PaiementsRow
        Inherits Global.System.Data.DataRow
        
        Private tableRSP_Paiements As RSP_PaiementsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableRSP_Paiements = CType(Me.Table,RSP_PaiementsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _Date() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.DateColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date' dans la table 'RSP_Paiements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.DateColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Libellé_Ligne_1() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Libellé_Ligne_1Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Libellé_Ligne_1' dans la table 'RSP_Paiements' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Libellé_Ligne_1Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Libellé_Ligne_2() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Libellé_Ligne_2Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Libellé_Ligne_2' dans la table 'RSP_Paiements' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Libellé_Ligne_2Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Org_Payeur() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Org_PayeurColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Org_Payeur' dans la table 'RSP_Paiements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Org_PayeurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Part() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.PartColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Part' dans la table 'RSP_Paiements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.PartColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Montant_Demandé() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Montant_DemandéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Montant_Demandé' dans la table 'RSP_Paiements' est DBN"& _ 
                            "ull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Montant_DemandéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Etat_Paiement() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Etat_PaiementColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Etat_Paiement' dans la table 'RSP_Paiements' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Etat_PaiementColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Montant_Payé() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Montant_PayéColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Montant_Payé' dans la table 'RSP_Paiements' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Montant_PayéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumFacture() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.NumFactureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumFacture' dans la table 'RSP_Paiements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.NumFactureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.NumLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumLot' dans la table 'RSP_Paiements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.NumLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Fichier() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.FichierColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Fichier' dans la table 'RSP_Paiements' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.FichierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Org_emetteur() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.Org_emetteurColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Org_emetteur' dans la table 'RSP_Paiements' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.Org_emetteurColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property num_destinataire() As String
            Get
                Try 
                    Return CType(Me(Me.tableRSP_Paiements.num_destinataireColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'num_destinataire' dans la table 'RSP_Paiements' est DB"& _ 
                            "Null.", e)
                End Try
            End Get
            Set
                Me(Me.tableRSP_Paiements.num_destinataireColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_DateNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.DateColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_DateNull()
            Me(Me.tableRSP_Paiements.DateColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLibellé_Ligne_1Null() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Libellé_Ligne_1Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLibellé_Ligne_1Null()
            Me(Me.tableRSP_Paiements.Libellé_Ligne_1Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsLibellé_Ligne_2Null() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Libellé_Ligne_2Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetLibellé_Ligne_2Null()
            Me(Me.tableRSP_Paiements.Libellé_Ligne_2Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsOrg_PayeurNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Org_PayeurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetOrg_PayeurNull()
            Me(Me.tableRSP_Paiements.Org_PayeurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPartNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.PartColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPartNull()
            Me(Me.tableRSP_Paiements.PartColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMontant_DemandéNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Montant_DemandéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMontant_DemandéNull()
            Me(Me.tableRSP_Paiements.Montant_DemandéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEtat_PaiementNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Etat_PaiementColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEtat_PaiementNull()
            Me(Me.tableRSP_Paiements.Etat_PaiementColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMontant_PayéNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Montant_PayéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMontant_PayéNull()
            Me(Me.tableRSP_Paiements.Montant_PayéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumFactureNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.NumFactureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumFactureNull()
            Me(Me.tableRSP_Paiements.NumFactureColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumLotNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.NumLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumLotNull()
            Me(Me.tableRSP_Paiements.NumLotColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFichierNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.FichierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFichierNull()
            Me(Me.tableRSP_Paiements.FichierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsOrg_emetteurNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.Org_emetteurColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetOrg_emetteurNull()
            Me(Me.tableRSP_Paiements.Org_emetteurColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isnum_destinataireNull() As Boolean
            Return Me.IsNull(Me.tableRSP_Paiements.num_destinataireColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setnum_destinataireNull()
            Me(Me.tableRSP_Paiements.num_destinataireColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class LOI_DemandeRow
        Inherits Global.System.Data.DataRow
        
        Private tableLOI_Demande As LOI_DemandeDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableLOI_Demande = CType(Me.Table,LOI_DemandeDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _date() As String
            Get
                Try 
                    Return CType(Me(Me.tableLOI_Demande.dateColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'date' dans la table 'LOI_Demande' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLOI_Demande.dateColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property heure() As String
            Get
                Try 
                    Return CType(Me(Me.tableLOI_Demande.heureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'heure' dans la table 'LOI_Demande' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLOI_Demande.heureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ref_loi() As String
            Get
                Try 
                    Return CType(Me(Me.tableLOI_Demande.ref_loiColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ref_loi' dans la table 'LOI_Demande' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLOI_Demande.ref_loiColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property code_resultat_incr_prec() As String
            Get
                Try 
                    Return CType(Me(Me.tableLOI_Demande.code_resultat_incr_precColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'code_resultat_incr_prec' dans la table 'LOI_Demande' e"& _ 
                            "st DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLOI_Demande.code_resultat_incr_precColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Subject() As String
            Get
                Try 
                    Return CType(Me(Me.tableLOI_Demande.SubjectColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Subject' dans la table 'LOI_Demande' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableLOI_Demande.SubjectColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_dateNull() As Boolean
            Return Me.IsNull(Me.tableLOI_Demande.dateColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_dateNull()
            Me(Me.tableLOI_Demande.dateColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsheureNull() As Boolean
            Return Me.IsNull(Me.tableLOI_Demande.heureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetheureNull()
            Me(Me.tableLOI_Demande.heureColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Isref_loiNull() As Boolean
            Return Me.IsNull(Me.tableLOI_Demande.ref_loiColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setref_loiNull()
            Me(Me.tableLOI_Demande.ref_loiColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Iscode_resultat_incr_precNull() As Boolean
            Return Me.IsNull(Me.tableLOI_Demande.code_resultat_incr_precColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Setcode_resultat_incr_precNull()
            Me(Me.tableLOI_Demande.code_resultat_incr_precColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSubjectNull() As Boolean
            Return Me.IsNull(Me.tableLOI_Demande.SubjectColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSubjectNull()
            Me(Me.tableLOI_Demande.SubjectColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class SCOR_PJRow
        Inherits Global.System.Data.DataRow
        
        Private tableSCOR_PJ As SCOR_PJDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableSCOR_PJ = CType(Me.Table,SCOR_PJDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Fichier() As String
            Get
                Try 
                    Return CType(Me(Me.tableSCOR_PJ.FichierColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Fichier' dans la table 'SCOR_PJ' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSCOR_PJ.FichierColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ID() As String
            Get
                Try 
                    Return CType(Me(Me.tableSCOR_PJ.IDColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ID' dans la table 'SCOR_PJ' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSCOR_PJ.IDColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Statut_Transmission() As String
            Get
                Try 
                    Return CType(Me(Me.tableSCOR_PJ.Statut_TransmissionColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Statut_Transmission' dans la table 'SCOR_PJ' est DBNul"& _ 
                            "l.", e)
                End Try
            End Get
            Set
                Me(Me.tableSCOR_PJ.Statut_TransmissionColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Num_Facture() As String
            Get
                Try 
                    Return CType(Me(Me.tableSCOR_PJ.Num_FactureColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Num_Facture' dans la table 'SCOR_PJ' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSCOR_PJ.Num_FactureColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsFichierNull() As Boolean
            Return Me.IsNull(Me.tableSCOR_PJ.FichierColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetFichierNull()
            Me(Me.tableSCOR_PJ.FichierColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsIDNull() As Boolean
            Return Me.IsNull(Me.tableSCOR_PJ.IDColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetIDNull()
            Me(Me.tableSCOR_PJ.IDColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsStatut_TransmissionNull() As Boolean
            Return Me.IsNull(Me.tableSCOR_PJ.Statut_TransmissionColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetStatut_TransmissionNull()
            Me(Me.tableSCOR_PJ.Statut_TransmissionColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNum_FactureNull() As Boolean
            Return Me.IsNull(Me.tableSCOR_PJ.Num_FactureColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNum_FactureNull()
            Me(Me.tableSCOR_PJ.Num_FactureColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class SCOR_lotsRow
        Inherits Global.System.Data.DataRow
        
        Private tableSCOR_lots As SCOR_lotsDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableSCOR_lots = CType(Me.Table,SCOR_lotsDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property EnTete() As String
            Get
                Try 
                    Return CType(Me(Me.tableSCOR_lots.EnTeteColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'EnTete' dans la table 'SCOR_lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSCOR_lots.EnTeteColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property NumLot() As String
            Get
                Try 
                    Return CType(Me(Me.tableSCOR_lots.NumLotColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'NumLot' dans la table 'SCOR_lots' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableSCOR_lots.NumLotColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEnTeteNull() As Boolean
            Return Me.IsNull(Me.tableSCOR_lots.EnTeteColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEnTeteNull()
            Me(Me.tableSCOR_lots.EnTeteColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsNumLotNull() As Boolean
            Return Me.IsNull(Me.tableSCOR_lots.NumLotColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetNumLotNull()
            Me(Me.tableSCOR_lots.NumLotColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class compatibilités__codes_prestation__qualité_bénéficiaireRow
        Inherits Global.System.Data.DataRow
        
        Private tablecompatibilités__codes_prestation__qualité_bénéficiaire As compatibilités__codes_prestation__qualité_bénéficiaireDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire = CType(Me.Table,compatibilités__codes_prestation__qualité_bénéficiaireDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Code_Prestation() As String
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Code_PrestationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Code_Prestation' dans la table 'compatibilités_ codes_"& _ 
                            "prestation_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Code_PrestationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Assuré() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AssuréColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Assuré' dans la table 'compatibilités_ codes_prestatio"& _ 
                            "n_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AssuréColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Ascendant() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AscendantColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Ascendant' dans la table 'compatibilités_ codes_presta"& _ 
                            "tion_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AscendantColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Conjoint() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Conjoint' dans la table 'compatibilités_ codes_prestat"& _ 
                            "ion_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Conjoint_Divorcé() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Conjoint_DivorcéColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Conjoint_Divorcé' dans la table 'compatibilités_ codes"& _ 
                            "_prestation_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Conjoint_DivorcéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Concubin() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConcubinColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Concubin' dans la table 'compatibilités_ codes_prestat"& _ 
                            "ion_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConcubinColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ConjointSéparé() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointSéparéColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ConjointSéparé' dans la table 'compatibilités_ codes_p"& _ 
                            "restation_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointSéparéColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Enfant() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.EnfantColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Enfant' dans la table 'compatibilités_ codes_prestatio"& _ 
                            "n_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.EnfantColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ConjointVeuf() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointVeufColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ConjointVeuf' dans la table 'compatibilités_ codes_pre"& _ 
                            "station_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointVeufColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AgeMinMois() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinMoisColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AgeMinMois' dans la table 'compatibilités_ codes_prest"& _ 
                            "ation_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinMoisColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AgeMinAnnées() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinAnnéesColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AgeMinAnnées' dans la table 'compatibilités_ codes_pre"& _ 
                            "station_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinAnnéesColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AgeMaxMois() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxMoisColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AgeMaxMois' dans la table 'compatibilités_ codes_prest"& _ 
                            "ation_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxMoisColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property AgeMaxAnnées() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxAnnéesColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'AgeMaxAnnées' dans la table 'compatibilités_ codes_pre"& _ 
                            "station_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxAnnéesColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Autre_ayant_droit() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Autre_ayant_droitColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Autre_ayant_droit' dans la table 'compatibilités_ code"& _ 
                            "s_prestation_ qualité_bénéficiaire' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Autre_ayant_droitColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCode_PrestationNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Code_PrestationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCode_PrestationNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Code_PrestationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAssuréNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AssuréColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAssuréNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AssuréColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAscendantNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AscendantColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAscendantNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AscendantColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsConjointNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetConjointNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsConjoint_DivorcéNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Conjoint_DivorcéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetConjoint_DivorcéNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Conjoint_DivorcéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsConcubinNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConcubinColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetConcubinNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConcubinColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsConjointSéparéNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointSéparéColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetConjointSéparéNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointSéparéColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsEnfantNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.EnfantColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetEnfantNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.EnfantColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsConjointVeufNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointVeufColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetConjointVeufNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.ConjointVeufColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAgeMinMoisNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinMoisColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAgeMinMoisNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinMoisColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAgeMinAnnéesNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinAnnéesColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAgeMinAnnéesNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMinAnnéesColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAgeMaxMoisNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxMoisColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAgeMaxMoisNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxMoisColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAgeMaxAnnéesNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxAnnéesColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAgeMaxAnnéesNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.AgeMaxAnnéesColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsAutre_ayant_droitNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Autre_ayant_droitColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetAutre_ayant_droitNull()
            Me(Me.tablecompatibilités__codes_prestation__qualité_bénéficiaire.Autre_ayant_droitColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class compatibilités_codes_prestation_nature_assuranceRow
        Inherits Global.System.Data.DataRow
        
        Private tablecompatibilités_codes_prestation_nature_assurance As compatibilités_codes_prestation_nature_assuranceDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tablecompatibilités_codes_prestation_nature_assurance = CType(Me.Table,compatibilités_codes_prestation_nature_assuranceDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CodePrestation() As String
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités_codes_prestation_nature_assurance.CodePrestationColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CodePrestation' dans la table 'compatibilités_codes_pr"& _ 
                            "estation_nature_assurance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités_codes_prestation_nature_assurance.CodePrestationColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MALADIE() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités_codes_prestation_nature_assurance.MALADIEColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MALADIE' dans la table 'compatibilités_codes_prestatio"& _ 
                            "n_nature_assurance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités_codes_prestation_nature_assurance.MALADIEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property MATERNITE() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités_codes_prestation_nature_assurance.MATERNITEColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'MATERNITE' dans la table 'compatibilités_codes_prestat"& _ 
                            "ion_nature_assurance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités_codes_prestation_nature_assurance.MATERNITEColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ACCIDENTDUTRAVAIL() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités_codes_prestation_nature_assurance.ACCIDENTDUTRAVAILColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'ACCIDENTDUTRAVAIL' dans la table 'compatibilités_codes"& _ 
                            "_prestation_nature_assurance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités_codes_prestation_nature_assurance.ACCIDENTDUTRAVAILColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property SMG() As Boolean
            Get
                Try 
                    Return CType(Me(Me.tablecompatibilités_codes_prestation_nature_assurance.SMGColumn),Boolean)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'SMG' dans la table 'compatibilités_codes_prestation_na"& _ 
                            "ture_assurance' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tablecompatibilités_codes_prestation_nature_assurance.SMGColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCodePrestationNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités_codes_prestation_nature_assurance.CodePrestationColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCodePrestationNull()
            Me(Me.tablecompatibilités_codes_prestation_nature_assurance.CodePrestationColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMALADIENull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités_codes_prestation_nature_assurance.MALADIEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMALADIENull()
            Me(Me.tablecompatibilités_codes_prestation_nature_assurance.MALADIEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsMATERNITENull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités_codes_prestation_nature_assurance.MATERNITEColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetMATERNITENull()
            Me(Me.tablecompatibilités_codes_prestation_nature_assurance.MATERNITEColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsACCIDENTDUTRAVAILNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités_codes_prestation_nature_assurance.ACCIDENTDUTRAVAILColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetACCIDENTDUTRAVAILNull()
            Me(Me.tablecompatibilités_codes_prestation_nature_assurance.ACCIDENTDUTRAVAILColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsSMGNull() As Boolean
            Return Me.IsNull(Me.tablecompatibilités_codes_prestation_nature_assurance.SMGColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetSMGNull()
            Me(Me.tablecompatibilités_codes_prestation_nature_assurance.SMGColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class BDM_PrixRow
        Inherits Global.System.Data.DataRow
        
        Private tableBDM_Prix As BDM_PrixDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableBDM_Prix = CType(Me.Table,BDM_PrixDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CIP13() As String
            Get
                Try 
                    Return CType(Me(Me.tableBDM_Prix.CIP13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CIP13' dans la table 'BDM_Prix' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_Prix.CIP13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CIP7() As String
            Get
                Try 
                    Return CType(Me(Me.tableBDM_Prix.CIP7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CIP7' dans la table 'BDM_Prix' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_Prix.CIP7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prix_Public_TTC() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableBDM_Prix.Prix_Public_TTCColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prix_Public_TTC' dans la table 'BDM_Prix' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_Prix.Prix_Public_TTCColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property Prix_Fabricant_HT() As Decimal
            Get
                Try 
                    Return CType(Me(Me.tableBDM_Prix.Prix_Fabricant_HTColumn),Decimal)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Prix_Fabricant_HT' dans la table 'BDM_Prix' est DBNull"& _ 
                            ".", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_Prix.Prix_Fabricant_HTColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property _Date() As String
            Get
                Try 
                    Return CType(Me(Me.tableBDM_Prix.DateColumn),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'Date' dans la table 'BDM_Prix' est DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_Prix.DateColumn) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCIP13Null() As Boolean
            Return Me.IsNull(Me.tableBDM_Prix.CIP13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCIP13Null()
            Me(Me.tableBDM_Prix.CIP13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCIP7Null() As Boolean
            Return Me.IsNull(Me.tableBDM_Prix.CIP7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCIP7Null()
            Me(Me.tableBDM_Prix.CIP7Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrix_Public_TTCNull() As Boolean
            Return Me.IsNull(Me.tableBDM_Prix.Prix_Public_TTCColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrix_Public_TTCNull()
            Me(Me.tableBDM_Prix.Prix_Public_TTCColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsPrix_Fabricant_HTNull() As Boolean
            Return Me.IsNull(Me.tableBDM_Prix.Prix_Fabricant_HTColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetPrix_Fabricant_HTNull()
            Me(Me.tableBDM_Prix.Prix_Fabricant_HTColumn) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function Is_DateNull() As Boolean
            Return Me.IsNull(Me.tableBDM_Prix.DateColumn)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub Set_DateNull()
            Me(Me.tableBDM_Prix.DateColumn) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Represents strongly named DataRow class.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Partial Public Class BDM_médicaments_detournablesRow
        Inherits Global.System.Data.DataRow
        
        Private tableBDM_médicaments_detournables As BDM_médicaments_detournablesDataTable
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Sub New(ByVal rb As Global.System.Data.DataRowBuilder)
            MyBase.New(rb)
            Me.tableBDM_médicaments_detournables = CType(Me.Table,BDM_médicaments_detournablesDataTable)
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CIP13() As String
            Get
                Try 
                    Return CType(Me(Me.tableBDM_médicaments_detournables.CIP13Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CIP13' dans la table 'BDM_médicaments_detournables' es"& _ 
                            "t DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_médicaments_detournables.CIP13Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property CIP7() As String
            Get
                Try 
                    Return CType(Me(Me.tableBDM_médicaments_detournables.CIP7Column),String)
                Catch e As Global.System.InvalidCastException
                    Throw New Global.System.Data.StrongTypingException("La valeur pour la colonne 'CIP7' dans la table 'BDM_médicaments_detournables' est"& _ 
                            " DBNull.", e)
                End Try
            End Get
            Set
                Me(Me.tableBDM_médicaments_detournables.CIP7Column) = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCIP13Null() As Boolean
            Return Me.IsNull(Me.tableBDM_médicaments_detournables.CIP13Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCIP13Null()
            Me(Me.tableBDM_médicaments_detournables.CIP13Column) = Global.System.Convert.DBNull
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Function IsCIP7Null() As Boolean
            Return Me.IsNull(Me.tableBDM_médicaments_detournables.CIP7Column)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub SetCIP7Null()
            Me(Me.tableBDM_médicaments_detournables.CIP7Column) = Global.System.Convert.DBNull
        End Sub
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class ProduitsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As ProduitsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As ProduitsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As ProduitsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class PrescripteursRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As PrescripteursRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As PrescripteursRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As PrescripteursRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class VitaleRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As VitaleRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As VitaleRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As VitaleRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class LPPRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As LPPRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As LPPRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As LPPRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class FacturesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As FacturesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As FacturesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As FacturesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class FichiersSVRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As FichiersSVRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As FichiersSVRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As FichiersSVRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class ActesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As ActesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As ActesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As ActesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class SMTPRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As SMTPRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As SMTPRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As SMTPRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class LotsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As LotsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As LotsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As LotsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Facture_DétailCodeCIPRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Facture_DétailCodeCIPRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Facture_DétailCodeCIPRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Facture_DétailCodeCIPRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Facture_DétailLppRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Facture_DétailLppRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Facture_DétailLppRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Facture_DétailLppRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Facture_LigneFactureRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Facture_LigneFactureRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Facture_LigneFactureRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Facture_LigneFactureRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class _AMC__Organismes_Contrat_Type_RowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As _AMC__Organismes_Contrat_Type_Row
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As _AMC__Organismes_Contrat_Type_Row, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As _AMC__Organismes_Contrat_Type_Row
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class AMC_Contrat_TypeRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As AMC_Contrat_TypeRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As AMC_Contrat_TypeRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As AMC_Contrat_TypeRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class AMC_OrganismesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As AMC_OrganismesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As AMC_OrganismesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As AMC_OrganismesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class CodePrestationsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As CodePrestationsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As CodePrestationsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As CodePrestationsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class ARLRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As ARLRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As ARLRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As ARLRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class AMORowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As AMORow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As AMORow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As AMORow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Facture_VenteDirecteRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Facture_VenteDirecteRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Facture_VenteDirecteRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Facture_VenteDirecteRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Pop_Allowed_ListRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Pop_Allowed_ListRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Pop_Allowed_ListRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Pop_Allowed_ListRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Convention_Table_correspondanceRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Convention_Table_correspondanceRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Convention_Table_correspondanceRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Convention_Table_correspondanceRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Convention_Table_ConventionsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Convention_Table_ConventionsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Convention_Table_ConventionsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Convention_Table_ConventionsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class Convention_Table_RegroupementsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As Convention_Table_RegroupementsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As Convention_Table_RegroupementsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As Convention_Table_RegroupementsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class _Taux_CodeRégimeRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As _Taux_CodeRégimeRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As _Taux_CodeRégimeRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As _Taux_CodeRégimeRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class _Taux_CodeSituationRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As _Taux_CodeSituationRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As _Taux_CodeSituationRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As _Taux_CodeSituationRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class AR_PRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As AR_PRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As AR_PRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As AR_PRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class _Service_RejetRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As _Service_RejetRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As _Service_RejetRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As _Service_RejetRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class RSP_LIGNE_REJETRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As RSP_LIGNE_REJETRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As RSP_LIGNE_REJETRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As RSP_LIGNE_REJETRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class RSP_PaiementsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As RSP_PaiementsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As RSP_PaiementsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As RSP_PaiementsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class LOI_DemandeRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As LOI_DemandeRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As LOI_DemandeRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As LOI_DemandeRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class SCOR_PJRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As SCOR_PJRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As SCOR_PJRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As SCOR_PJRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class SCOR_lotsRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As SCOR_lotsRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As SCOR_lotsRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As SCOR_lotsRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class compatibilités__codes_prestation__qualité_bénéficiaireRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As compatibilités__codes_prestation__qualité_bénéficiaireRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As compatibilités__codes_prestation__qualité_bénéficiaireRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As compatibilités__codes_prestation__qualité_bénéficiaireRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class compatibilités_codes_prestation_nature_assuranceRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As compatibilités_codes_prestation_nature_assuranceRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As compatibilités_codes_prestation_nature_assuranceRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As compatibilités_codes_prestation_nature_assuranceRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class BDM_PrixRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As BDM_PrixRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As BDM_PrixRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As BDM_PrixRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
    
    '''<summary>
    '''Row event argument class
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
    Public Class BDM_médicaments_detournablesRowChangeEvent
        Inherits Global.System.EventArgs
        
        Private eventRow As BDM_médicaments_detournablesRow
        
        Private eventAction As Global.System.Data.DataRowAction
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New(ByVal row As BDM_médicaments_detournablesRow, ByVal action As Global.System.Data.DataRowAction)
            MyBase.New
            Me.eventRow = row
            Me.eventAction = action
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Row() As BDM_médicaments_detournablesRow
            Get
                Return Me.eventRow
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public ReadOnly Property Action() As Global.System.Data.DataRowAction
            Get
                Return Me.eventAction
            End Get
        End Property
    End Class
End Class

Namespace PharmaDataSetTableAdapters
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class ProduitsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Produits"
            tableMapping.ColumnMappings.Add("CIP", "CIP")
            tableMapping.ColumnMappings.Add("EAN13", "EAN13")
            tableMapping.ColumnMappings.Add("CAB", "CAB")
            tableMapping.ColumnMappings.Add("Designation", "Designation")
            tableMapping.ColumnMappings.Add("PrixachatRemiseHT", "PrixachatRemiseHT")
            tableMapping.ColumnMappings.Add("PrixventeTTC", "PrixventeTTC")
            tableMapping.ColumnMappings.Add("PrixachatHT", "PrixachatHT")
            tableMapping.ColumnMappings.Add("TVA", "TVA")
            tableMapping.ColumnMappings.Add("Stock", "Stock")
            tableMapping.ColumnMappings.Add("Marque", "Marque")
            tableMapping.ColumnMappings.Add("Repartiteurattitre", "Repartiteurattitre")
            tableMapping.ColumnMappings.Add("LPP", "LPP")
            tableMapping.ColumnMappings.Add("Colisage", "Colisage")
            tableMapping.ColumnMappings.Add("CommentaireGestion", "CommentaireGestion")
            tableMapping.ColumnMappings.Add("Contenance", "Contenance")
            tableMapping.ColumnMappings.Add("Unitecontenance", "Unitecontenance")
            tableMapping.ColumnMappings.Add("Conditionnement", "Conditionnement")
            tableMapping.ColumnMappings.Add("DateDernièrevente", "DateDernièrevente")
            tableMapping.ColumnMappings.Add("GestiondeStock", "GestiondeStock")
            tableMapping.ColumnMappings.Add("ZoneGeographique", "ZoneGeographique")
            tableMapping.ColumnMappings.Add("Margetaux", "Margetaux")
            tableMapping.ColumnMappings.Add("MargecoeffsurPAremise", "MargecoeffsurPAremise")
            tableMapping.ColumnMappings.Add("Assimilestupefiant", "Assimilestupefiant")
            tableMapping.ColumnMappings.Add("frigo", "frigo")
            tableMapping.ColumnMappings.Add("Medicamentdexception", "Medicamentdexception")
            tableMapping.ColumnMappings.Add("Veterinaire", "Veterinaire")
            tableMapping.ColumnMappings.Add("Peremptioncourte", "Peremptioncourte")
            tableMapping.ColumnMappings.Add("Prestation", "Prestation")
            tableMapping.ColumnMappings.Add("Liste", "Liste")
            tableMapping.ColumnMappings.Add("Dus", "Dus")
            tableMapping.ColumnMappings.Add("Type", "Type")
            tableMapping.ColumnMappings.Add("TFRtype", "TFRtype")
            tableMapping.ColumnMappings.Add("TFRprix", "TFRprix")
            tableMapping.ColumnMappings.Add("LPP_Type_Service", "LPP_Type_Service")
            tableMapping.ColumnMappings.Add("LPP_Quantité", "LPP_Quantité")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Produits] ([CIP], [EAN13], [CAB], [Designation], [PrixachatRemiseHT]"& _ 
                ", [PrixventeTTC], [PrixachatHT], [TVA], [Stock], [Marque], [Repartiteurattitre],"& _ 
                " [LPP], [Colisage], [CommentaireGestion], [Contenance], [Unitecontenance], [Cond"& _ 
                "itionnement], [DateDernièrevente], [GestiondeStock], [ZoneGeographique], [Marget"& _ 
                "aux], [MargecoeffsurPAremise], [Assimilestupefiant], [frigo], [Medicamentdexcept"& _ 
                "ion], [Veterinaire], [Peremptioncourte], [Dus], [Liste], [Prestation], [Type], ["& _ 
                "TFRprix], [TFRtype], [LPP_Quantité], [LPP_Type_Service]) VALUES (@CIP, @EAN13, @"& _ 
                "CAB, @Designation, @PrixachatRemiseHT, @PrixventeTTC, @PrixachatHT, @TVA, @Stock"& _ 
                ", @Marque, @Repartiteurattitre, @LPP, @Colisage, @CommentaireGestion, @Contenanc"& _ 
                "e, @Unitecontenance, @Conditionnement, @DateDernièrevente, @GestiondeStock, @Zon"& _ 
                "eGeographique, @Margetaux, @MargecoeffsurPAremise, @Assimilestupefiant, @frigo, "& _ 
                "@Medicamentdexception, @Veterinaire, @Peremptioncourte, @Dus, @Liste, @Prestatio"& _ 
                "n, @Type, @TFRprix, @TFRtype, @LPP_Quantité, @LPP_Type_Service)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CAB", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Designation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PrixachatRemiseHT", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixachatRemiseHT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PrixventeTTC", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixventeTTC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PrixachatHT", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixachatHT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TVA", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TVA", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Stock", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Stock", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Marque", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Marque", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Repartiteurattitre", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Repartiteurattitre", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Colisage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Colisage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CommentaireGestion", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CommentaireGestion", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Contenance", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Contenance", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Unitecontenance", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Unitecontenance", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Conditionnement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Conditionnement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateDernièrevente", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateDernièrevente", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GestiondeStock", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GestiondeStock", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ZoneGeographique", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ZoneGeographique", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Margetaux", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Margetaux", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MargecoeffsurPAremise", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MargecoeffsurPAremise", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assimilestupefiant", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Assimilestupefiant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@frigo", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "frigo", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Medicamentdexception", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Medicamentdexception", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Veterinaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Veterinaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Peremptioncourte", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Peremptioncourte", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Dus", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Dus", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Liste", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Liste", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prestation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Type", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TFRprix", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TFRprix", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TFRtype", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TFRtype", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Quantité", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LPP_Quantité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Type_Service", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LPP_Type_Service", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(8) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CIP, EAN13, CAB, Designation, PrixachatRemiseHT, PrixventeTTC, PrixachatHT"& _ 
                ", TVA, Stock, Marque, Repartiteurattitre, LPP, Colisage, CommentaireGestion, Con"& _ 
                "tenance, Unitecontenance, Conditionnement, DateDernièrevente, GestiondeStock, Zo"& _ 
                "neGeographique, Margetaux, MargecoeffsurPAremise, Assimilestupefiant, frigo, Med"& _ 
                "icamentdexception, Veterinaire, Peremptioncourte, Dus, Liste, Prestation, Type, "& _ 
                "TFRprix, TFRtype, LPP_Quantité, LPP_Type_Service FROM Produits"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT CIP, EAN13, CAB, Designation, PrixachatRemiseHT, PrixventeTTC, PrixachatHT"& _ 
                ", TVA, Stock, Marque, Repartiteurattitre, LPP, Colisage, CommentaireGestion, Con"& _ 
                "tenance, Unitecontenance, Conditionnement, DateDernièrevente, GestiondeStock, Zo"& _ 
                "neGeographique, Margetaux, MargecoeffsurPAremise, Assimilestupefiant, frigo, Med"& _ 
                "icamentdexception, Veterinaire, Peremptioncourte, Dus, Liste, Prestation, Type, "& _ 
                "TFRprix, TFRtype, LPP_Quantité, LPP_Type_Service FROM Produits WHERE (CIP = @CIP"& _ 
                "_EAN13) OR (EAN13 = @CIP_EAN13)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP_EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT     Assimilestupefiant"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Produits"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (CAB = @cab) AND "& _ 
                "(CIP = @CIP) AND (EAN13 = @EAN13) AND (Designation = @designation)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cab", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@designation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT     Liste"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Produits"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (CAB = @cab) AND (CIP = @CIP) "& _ 
                "AND (EAN13 = @EAN13) AND (Designation = @designation)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cab", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@designation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT  LPP_Quantité FROM Produits  WHERE (CIP like '%'+@CIP+'%')"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and (EAN13 lik"& _ 
                "e '%'+ @EAN13+'%') "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and (CAB like '%'+ @CAB+'%') "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and (Designation like '%'+@D"& _ 
                "esignation+'%')"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CAB", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Designation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "SELECT LPP_Type_Service FROM Produits WHERE (CIP like '%'+@CIP+'%')"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and (EAN13 l"& _ 
                "ike '%'+ @EAN13+'%') "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and (CAB like '%'+ @CAB+'%') "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and (Designation like '%'+"& _ 
                "@Designation+'%')"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CAB", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Designation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "SELECT COUNT(Designation) FROM Produits WHERE (CIP LIKE '%' + @cip + '%') or (CAB"& _ 
                " = @cab) or(Designation LIKE '%' + @designation + '%') or(EAN13 LIKE '%' + @EAN1"& _ 
                "3+ '%')"
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cip", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cab", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@designation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(7).Connection = Me.Connection
            Me._commandCollection(7).CommandText = "SELECT CIP, EAN13, CAB, Designation, PrixventeTTC, Stock, LPP, Dus, Liste, Presta"& _ 
                "tion, Type, TFRprix, TFRtype, LPP_Quantité, LPP_Type_Service FROM Produits WHERE"& _ 
                " (CIP LIKE '%' + @cip + '%') OR (CAB = @cab ) OR (Designation LIKE '%' + @design"& _ 
                "ation + '%') OR (EAN13 LIKE '%' + @EAN13 + '%')"
            Me._commandCollection(7).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cip", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cab", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CAB", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@designation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Designation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(8).Connection = Me.Connection
            Me._commandCollection(8).CommandText = "UPDATE Produits"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET Stock=Stock+@ModifStock"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where (CIP=@CIP_EAN13 OR EAN13=@CIP"& _ 
                "_EAN13)"
            Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ModifStock", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Stock", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP_EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.ProduitsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.ProduitsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.ProduitsDataTable = New PharmaDataSet.ProduitsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByCIP_EAN13(ByVal CIP_EAN13 As String) As PharmaDataSet.ProduitsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (CIP_EAN13 Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(CIP_EAN13,String)
            End If
            Dim dataTable As PharmaDataSet.ProduitsDataTable = New PharmaDataSet.ProduitsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function selectproduit(ByVal dataTable As PharmaDataSet.ProduitsDataTable, ByVal cip As String, ByVal cab As String, ByVal designation As String, ByVal EAN13 As String) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(7)
            If (cip Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(cip,String)
            End If
            If (cab Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(cab,String)
            End If
            If (designation Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(2).Value = CType(designation,String)
            End If
            If (EAN13 Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(3).Value = CType(EAN13,String)
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.ProduitsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Produits")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal CIP As String,  _
                    ByVal EAN13 As String,  _
                    ByVal CAB As String,  _
                    ByVal Designation As String,  _
                    ByVal PrixachatRemiseHT As String,  _
                    ByVal PrixventeTTC As String,  _
                    ByVal PrixachatHT As String,  _
                    ByVal TVA As String,  _
                    ByVal Stock As Global.System.Nullable(Of Decimal),  _
                    ByVal Marque As String,  _
                    ByVal Repartiteurattitre As String,  _
                    ByVal LPP As String,  _
                    ByVal Colisage As String,  _
                    ByVal CommentaireGestion As String,  _
                    ByVal Contenance As String,  _
                    ByVal Unitecontenance As String,  _
                    ByVal Conditionnement As String,  _
                    ByVal DateDernièrevente As String,  _
                    ByVal GestiondeStock As String,  _
                    ByVal ZoneGeographique As String,  _
                    ByVal Margetaux As String,  _
                    ByVal MargecoeffsurPAremise As String,  _
                    ByVal Assimilestupefiant As String,  _
                    ByVal frigo As String,  _
                    ByVal Medicamentdexception As String,  _
                    ByVal Veterinaire As String,  _
                    ByVal Peremptioncourte As String,  _
                    ByVal Dus As String,  _
                    ByVal Liste As String,  _
                    ByVal Prestation As String,  _
                    ByVal Type As String,  _
                    ByVal TFRprix As String,  _
                    ByVal TFRtype As String,  _
                    ByVal LPP_Quantité As Global.System.Nullable(Of Decimal),  _
                    ByVal LPP_Type_Service As String) As Integer
            If (CIP Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(EAN13,String)
            End If
            If (CAB Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(CAB,String)
            End If
            If (Designation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Designation,String)
            End If
            If (PrixachatRemiseHT Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(PrixachatRemiseHT,String)
            End If
            If (PrixventeTTC Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(PrixventeTTC,String)
            End If
            If (PrixachatHT Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(PrixachatHT,String)
            End If
            If (TVA Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(TVA,String)
            End If
            If (Stock.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(Stock.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            End If
            If (Marque Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(Marque,String)
            End If
            If (Repartiteurattitre Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(Repartiteurattitre,String)
            End If
            If (LPP Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(LPP,String)
            End If
            If (Colisage Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(Colisage,String)
            End If
            If (CommentaireGestion Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(CommentaireGestion,String)
            End If
            If (Contenance Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(Contenance,String)
            End If
            If (Unitecontenance Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(Unitecontenance,String)
            End If
            If (Conditionnement Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(Conditionnement,String)
            End If
            If (DateDernièrevente Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(DateDernièrevente,String)
            End If
            If (GestiondeStock Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(GestiondeStock,String)
            End If
            If (ZoneGeographique Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(ZoneGeographique,String)
            End If
            If (Margetaux Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(Margetaux,String)
            End If
            If (MargecoeffsurPAremise Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(MargecoeffsurPAremise,String)
            End If
            If (Assimilestupefiant Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(22).Value = CType(Assimilestupefiant,String)
            End If
            If (frigo Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(23).Value = CType(frigo,String)
            End If
            If (Medicamentdexception Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(24).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(24).Value = CType(Medicamentdexception,String)
            End If
            If (Veterinaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(25).Value = CType(Veterinaire,String)
            End If
            If (Peremptioncourte Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(26).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(26).Value = CType(Peremptioncourte,String)
            End If
            If (Dus Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(27).Value = CType(Dus,String)
            End If
            If (Liste Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(28).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(28).Value = CType(Liste,String)
            End If
            If (Prestation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(29).Value = CType(Prestation,String)
            End If
            If (Type Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(30).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(30).Value = CType(Type,String)
            End If
            If (TFRprix Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(31).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(31).Value = CType(TFRprix,String)
            End If
            If (TFRtype Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(32).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(32).Value = CType(TFRtype,String)
            End If
            If (LPP_Quantité.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(33).Value = CType(LPP_Quantité.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(33).Value = Global.System.DBNull.Value
            End If
            If (LPP_Type_Service Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(34).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(34).Value = CType(LPP_Type_Service,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Assimilestupefiant(ByVal cab As String, ByVal CIP As String, ByVal EAN13 As String, ByVal designation As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (cab Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(cab,String)
            End If
            If (CIP Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(EAN13,String)
            End If
            If (designation Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(designation,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function select_Liste(ByVal cab As String, ByVal CIP As String, ByVal EAN13 As String, ByVal designation As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (cab Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(cab,String)
            End If
            If (CIP Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(EAN13,String)
            End If
            If (designation Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(designation,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_LPP_Quantité(ByVal CIP As String, ByVal EAN13 As String, ByVal CAB As String, ByVal Designation As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            If (CIP Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(EAN13,String)
            End If
            If (CAB Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(CAB,String)
            End If
            If (Designation Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Designation,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_LPP_Type_Service(ByVal CIP As String, ByVal EAN13 As String, ByVal CAB As String, ByVal Designation As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (CIP Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(EAN13,String)
            End If
            If (CAB Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(CAB,String)
            End If
            If (Designation Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Designation,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function selectcountproduit(ByVal cip As String, ByVal cab As String, ByVal designation As String, ByVal EAN13 As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(6)
            If (cip Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(cip,String)
            End If
            If (cab Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(cab,String)
            End If
            If (designation Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(designation,String)
            End If
            If (EAN13 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(EAN13,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateStock(ByVal ModifStock As Global.System.Nullable(Of Decimal), ByVal CIP_EAN13 As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(8)
            If (ModifStock.HasValue = true) Then
                command.Parameters(0).Value = CType(ModifStock.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (CIP_EAN13 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(CIP_EAN13,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class PrescripteursTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Prescripteurs"
            tableMapping.ColumnMappings.Add("Numidentification", "Numidentification")
            tableMapping.ColumnMappings.Add("Statut", "Statut")
            tableMapping.ColumnMappings.Add("CléRPPS", "CléRPPS")
            tableMapping.ColumnMappings.Add("numStructure", "numStructure")
            tableMapping.ColumnMappings.Add("IDinterne", "IDinterne")
            tableMapping.ColumnMappings.Add("NomPrénom", "NomPrénom")
            tableMapping.ColumnMappings.Add("Adresse", "Adresse")
            tableMapping.ColumnMappings.Add("Clé", "Clé")
            tableMapping.ColumnMappings.Add("CodeSpécialité", "CodeSpécialité")
            tableMapping.ColumnMappings.Add("NumRPPS", "NumRPPS")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.DeleteCommand.Connection = Me.Connection
            Me._adapter.DeleteCommand.CommandText = "DELETE FROM [Prescripteurs] WHERE (([IDinterne] = @Original_IDinterne) AND ((@IsN"& _ 
                "ull_NomPrénom = 1 AND [NomPrénom] IS NULL) OR ([NomPrénom] = @Original_NomPrénom"& _ 
                ")) AND ((@IsNull_Adresse = 1 AND [Adresse] IS NULL) OR ([Adresse] = @Original_Ad"& _ 
                "resse)) AND ((@IsNull_Numidentification = 1 AND [Numidentification] IS NULL) OR "& _ 
                "([Numidentification] = @Original_Numidentification)) AND ((@IsNull_Clé = 1 AND ["& _ 
                "Clé] IS NULL) OR ([Clé] = @Original_Clé)) AND ((@IsNull_Statut = 1 AND [Statut] "& _ 
                "IS NULL) OR ([Statut] = @Original_Statut)) AND ((@IsNull_CodeSpécialité = 1 AND "& _ 
                "[CodeSpécialité] IS NULL) OR ([CodeSpécialité] = @Original_CodeSpécialité)) AND "& _ 
                "((@IsNull_NumRPPS = 1 AND [NumRPPS] IS NULL) OR ([NumRPPS] = @Original_NumRPPS))"& _ 
                " AND ((@IsNull_CléRPPS = 1 AND [CléRPPS] IS NULL) OR ([CléRPPS] = @Original_CléR"& _ 
                "PPS)) AND ((@IsNull_numStructure = 1 AND [numStructure] IS NULL) OR ([numStructu"& _ 
                "re] = @Original_numStructure)))"
            Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_IDinterne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDinterne", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_NomPrénom", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NomPrénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Adresse", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Adresse", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Numidentification", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Numidentification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Clé", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Clé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Statut", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Statut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CodeSpécialité", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CodeSpécialité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_NumRPPS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NumRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CléRPPS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CléRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_numStructure", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_numStructure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Prescripteurs] ([IDinterne], [NomPrénom], [Adresse], [Numidentificat"& _ 
                "ion], [Clé], [Statut], [CodeSpécialité], [NumRPPS], [CléRPPS], [numStructure]) V"& _ 
                "ALUES (@IDinterne, @NomPrénom, @Adresse, @Numidentification, @Clé, @Statut, @Cod"& _ 
                "eSpécialité, @NumRPPS, @CléRPPS, @numStructure);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT IDinterne, NomPrénom, A"& _ 
                "dresse, Numidentification, Clé, Statut, CodeSpécialité, NumRPPS, CléRPPS, numStr"& _ 
                "ucture FROM Prescripteurs WHERE (IDinterne = @IDinterne)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDinterne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDinterne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomPrénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Numidentification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Clé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Statut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeSpécialité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CléRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@numStructure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [Prescripteurs] SET [IDinterne] = @IDinterne, [NomPrénom] = @NomPrénom, [A"& _ 
                "dresse] = @Adresse, [Numidentification] = @Numidentification, [Clé] = @Clé, [Sta"& _ 
                "tut] = @Statut, [CodeSpécialité] = @CodeSpécialité, [NumRPPS] = @NumRPPS, [CléRP"& _ 
                "PS] = @CléRPPS, [numStructure] = @numStructure WHERE (([IDinterne] = @Original_I"& _ 
                "Dinterne) AND ((@IsNull_NomPrénom = 1 AND [NomPrénom] IS NULL) OR ([NomPrénom] ="& _ 
                " @Original_NomPrénom)) AND ((@IsNull_Adresse = 1 AND [Adresse] IS NULL) OR ([Adr"& _ 
                "esse] = @Original_Adresse)) AND ((@IsNull_Numidentification = 1 AND [Numidentifi"& _ 
                "cation] IS NULL) OR ([Numidentification] = @Original_Numidentification)) AND ((@"& _ 
                "IsNull_Clé = 1 AND [Clé] IS NULL) OR ([Clé] = @Original_Clé)) AND ((@IsNull_Stat"& _ 
                "ut = 1 AND [Statut] IS NULL) OR ([Statut] = @Original_Statut)) AND ((@IsNull_Cod"& _ 
                "eSpécialité = 1 AND [CodeSpécialité] IS NULL) OR ([CodeSpécialité] = @Original_C"& _ 
                "odeSpécialité)) AND ((@IsNull_NumRPPS = 1 AND [NumRPPS] IS NULL) OR ([NumRPPS] ="& _ 
                " @Original_NumRPPS)) AND ((@IsNull_CléRPPS = 1 AND [CléRPPS] IS NULL) OR ([CléRP"& _ 
                "PS] = @Original_CléRPPS)) AND ((@IsNull_numStructure = 1 AND [numStructure] IS N"& _ 
                "ULL) OR ([numStructure] = @Original_numStructure)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT IDinterne, NomPréno"& _ 
                "m, Adresse, Numidentification, Clé, Statut, CodeSpécialité, NumRPPS, CléRPPS, nu"& _ 
                "mStructure FROM Prescripteurs WHERE (IDinterne = @IDinterne)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDinterne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDinterne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomPrénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Numidentification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Clé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Statut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeSpécialité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CléRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@numStructure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_IDinterne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDinterne", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_NomPrénom", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NomPrénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Adresse", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Adresse", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Numidentification", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Numidentification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Clé", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Clé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Statut", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Statut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CodeSpécialité", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CodeSpécialité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_NumRPPS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_NumRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CléRPPS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CléRPPS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_numStructure", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_numStructure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(4) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT     Prescripteurs.*"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Prescripteurs"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Adresse, Clé, CléRPPS, CodeSpécialité, IDinterne, NomPrénom, NumRPPS, Numi"& _ 
                "dentification, Statut, numStructure FROM Prescripteurs WHERE (IDinterne = @IDint"& _ 
                "erne)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDinterne", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "IDinterne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Adresse, Clé, CléRPPS, CodeSpécialité, IDinterne, NomPrénom, NumRPPS, Numi"& _ 
                "dentification, Statut, numStructure FROM Prescripteurs WHERE (Numidentification "& _ 
                "= @searchedstring) OR (NumRPPS = @searchedstring) OR (NomPrénom LIKE '%' + @sear"& _ 
                "chedstring + '%')"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@searchedstring", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT   (  NomPrénom+' | '+ Adresse+' |Numidentification:'+Numidentification+' |"& _ 
                " Clé:'+ Clé+' | CodeSpécialité:'+ CodeSpécialité+' | NumRPPS:'+NumRPPS+' | CléRP"& _ 
                "PS:'+CléRPPS+' | numStructure:'+numStructure+' | Statut:'+Statut+' | IDinterne:'"& _ 
                "+IDinterne) FROM Prescripteurs"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" WHERE (Numidentification = @searchedstring ) or"& _ 
                " (NumRPPS = @searchedstring ) or( NomPrénom LIKE '%' +@searchedstring + '%') "
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@searchedstring", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "UPDATE [Prescripteurs] SET [IDinterne] = @IDinterne, [NomPrénom] = @NomPrénom, [A"& _ 
                "dresse] = @Adresse, [Numidentification] = @Numidentification, [Clé] = @Clé, [Sta"& _ 
                "tut] = @Statut, [CodeSpécialité] = @CodeSpécialité, [NumRPPS] = @NumRPPS, [CléRP"& _ 
                "PS] = @CléRPPS, [numStructure] = @numStructure WHERE ([IDinterne] = @IDinterne) "& _ 
                ""
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDinterne", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "IDinterne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomPrénom", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NomPrénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Numidentification", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Numidentification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Clé", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Clé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Statut", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeSpécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSpécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumRPPS", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumRPPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CléRPPS", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CléRPPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@numStructure", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "numStructure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.PrescripteursDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.PrescripteursDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.PrescripteursDataTable = New PharmaDataSet.PrescripteursDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetPrescripteurDataByIDinterne(ByVal IDinterne As String) As PharmaDataSet.PrescripteursDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (IDinterne Is Nothing) Then
                Throw New Global.System.ArgumentNullException("IDinterne")
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(IDinterne,String)
            End If
            Dim dataTable As PharmaDataSet.PrescripteursDataTable = New PharmaDataSet.PrescripteursDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function recherche_prescripteur1(ByVal searchedstring As String) As PharmaDataSet.PrescripteursDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (searchedstring Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(searchedstring,String)
            End If
            Dim dataTable As PharmaDataSet.PrescripteursDataTable = New PharmaDataSet.PrescripteursDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.PrescripteursDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Prescripteurs")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function rechercheprescripteur(ByVal searchedstring As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (searchedstring Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(searchedstring,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateById(ByVal IDinterne As String, ByVal NomPrénom As String, ByVal Adresse As String, ByVal Numidentification As String, ByVal Clé As String, ByVal Statut As String, ByVal CodeSpécialité As String, ByVal NumRPPS As String, ByVal CléRPPS As String, ByVal numStructure As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            If (IDinterne Is Nothing) Then
                Throw New Global.System.ArgumentNullException("IDinterne")
            Else
                command.Parameters(0).Value = CType(IDinterne,String)
            End If
            If (NomPrénom Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(NomPrénom,String)
            End If
            If (Adresse Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Adresse,String)
            End If
            If (Numidentification Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Numidentification,String)
            End If
            If (Clé Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(Clé,String)
            End If
            If (Statut Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Statut,String)
            End If
            If (CodeSpécialité Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(CodeSpécialité,String)
            End If
            If (NumRPPS Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(NumRPPS,String)
            End If
            If (CléRPPS Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(CléRPPS,String)
            End If
            If (numStructure Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(numStructure,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class VitaleTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Vitale"
            tableMapping.ColumnMappings.Add("G101C2", "G101C2")
            tableMapping.ColumnMappings.Add("G101C3", "G101C3")
            tableMapping.ColumnMappings.Add("G101C7", "G101C7")
            tableMapping.ColumnMappings.Add("G101C8", "G101C8")
            tableMapping.ColumnMappings.Add("G101C9", "G101C9")
            tableMapping.ColumnMappings.Add("G101C10", "G101C10")
            tableMapping.ColumnMappings.Add("G101C11", "G101C11")
            tableMapping.ColumnMappings.Add("G101C12", "G101C12")
            tableMapping.ColumnMappings.Add("G101C13", "G101C13")
            tableMapping.ColumnMappings.Add("G102C1", "G102C1")
            tableMapping.ColumnMappings.Add("G102C2", "G102C2")
            tableMapping.ColumnMappings.Add("G102C3", "G102C3")
            tableMapping.ColumnMappings.Add("G103C1", "G103C1")
            tableMapping.ColumnMappings.Add("G103C2", "G103C2")
            tableMapping.ColumnMappings.Add("G103C3", "G103C3")
            tableMapping.ColumnMappings.Add("G103C4", "G103C4")
            tableMapping.ColumnMappings.Add("G103C5", "G103C5")
            tableMapping.ColumnMappings.Add("G103C6", "G103C6")
            tableMapping.ColumnMappings.Add("G103C7", "G103C7")
            tableMapping.ColumnMappings.Add("G103C8", "G103C8")
            tableMapping.ColumnMappings.Add("G103C9", "G103C9")
            tableMapping.ColumnMappings.Add("G104C1", "G104C1")
            tableMapping.ColumnMappings.Add("G104C2", "G104C2")
            tableMapping.ColumnMappings.Add("G104C3", "G104C3")
            tableMapping.ColumnMappings.Add("G104C4", "G104C4")
            tableMapping.ColumnMappings.Add("G104C5", "G104C5")
            tableMapping.ColumnMappings.Add("G104C6", "G104C6")
            tableMapping.ColumnMappings.Add("G104C7", "G104C7")
            tableMapping.ColumnMappings.Add("G104C8", "G104C8")
            tableMapping.ColumnMappings.Add("G104C9", "G104C9")
            tableMapping.ColumnMappings.Add("G104C10", "G104C10")
            tableMapping.ColumnMappings.Add("G104C11", "G104C11")
            tableMapping.ColumnMappings.Add("G104C12", "G104C12")
            tableMapping.ColumnMappings.Add("G104C13", "G104C13")
            tableMapping.ColumnMappings.Add("G104C14", "G104C14")
            tableMapping.ColumnMappings.Add("G104C15", "G104C15")
            tableMapping.ColumnMappings.Add("G104C16", "G104C16")
            tableMapping.ColumnMappings.Add("G104C17", "G104C17")
            tableMapping.ColumnMappings.Add("G104C18", "G104C18")
            tableMapping.ColumnMappings.Add("G105C1O1", "G105C1O1")
            tableMapping.ColumnMappings.Add("G105C2O1", "G105C2O1")
            tableMapping.ColumnMappings.Add("G105C1O2", "G105C1O2")
            tableMapping.ColumnMappings.Add("G105C2O2", "G105C2O2")
            tableMapping.ColumnMappings.Add("G105C1O3", "G105C1O3")
            tableMapping.ColumnMappings.Add("G105C2O3", "G105C2O3")
            tableMapping.ColumnMappings.Add("G106C1O1", "G106C1O1")
            tableMapping.ColumnMappings.Add("G106C2O1", "G106C2O1")
            tableMapping.ColumnMappings.Add("G106C3O1", "G106C3O1")
            tableMapping.ColumnMappings.Add("G106C4O1", "G106C4O1")
            tableMapping.ColumnMappings.Add("G106C1O2", "G106C1O2")
            tableMapping.ColumnMappings.Add("G106C2O2", "G106C2O2")
            tableMapping.ColumnMappings.Add("G106C3O2", "G106C3O2")
            tableMapping.ColumnMappings.Add("G106C4O2", "G106C4O2")
            tableMapping.ColumnMappings.Add("G106C1O3", "G106C1O3")
            tableMapping.ColumnMappings.Add("G106C2O3", "G106C2O3")
            tableMapping.ColumnMappings.Add("G106C3O3", "G106C3O3")
            tableMapping.ColumnMappings.Add("G106C4O3", "G106C4O3")
            tableMapping.ColumnMappings.Add("G106C1O4", "G106C1O4")
            tableMapping.ColumnMappings.Add("G106C2O4", "G106C2O4")
            tableMapping.ColumnMappings.Add("G106C3O4", "G106C3O4")
            tableMapping.ColumnMappings.Add("G106C4O4", "G106C4O4")
            tableMapping.ColumnMappings.Add("G106C1O5", "G106C1O5")
            tableMapping.ColumnMappings.Add("G106C2O5", "G106C2O5")
            tableMapping.ColumnMappings.Add("G106C3O5", "G106C3O5")
            tableMapping.ColumnMappings.Add("G106C4O5", "G106C4O5")
            tableMapping.ColumnMappings.Add("G106C1O6", "G106C1O6")
            tableMapping.ColumnMappings.Add("G106C2O6", "G106C2O6")
            tableMapping.ColumnMappings.Add("G106C3O6", "G106C3O6")
            tableMapping.ColumnMappings.Add("G106C4O6", "G106C4O6")
            tableMapping.ColumnMappings.Add("G106C1O7", "G106C1O7")
            tableMapping.ColumnMappings.Add("G106C2O7", "G106C2O7")
            tableMapping.ColumnMappings.Add("G106C3O7", "G106C3O7")
            tableMapping.ColumnMappings.Add("G106C4O7", "G106C4O7")
            tableMapping.ColumnMappings.Add("G107C1", "G107C1")
            tableMapping.ColumnMappings.Add("G107C2", "G107C2")
            tableMapping.ColumnMappings.Add("G107C3", "G107C3")
            tableMapping.ColumnMappings.Add("G107C4", "G107C4")
            tableMapping.ColumnMappings.Add("G107C5", "G107C5")
            tableMapping.ColumnMappings.Add("G107C6", "G107C6")
            tableMapping.ColumnMappings.Add("G108C1O1", "G108C1O1")
            tableMapping.ColumnMappings.Add("G108C2O1", "G108C2O1")
            tableMapping.ColumnMappings.Add("G108C1O2", "G108C1O2")
            tableMapping.ColumnMappings.Add("G108C2O2", "G108C2O2")
            tableMapping.ColumnMappings.Add("G108C1O3", "G108C1O3")
            tableMapping.ColumnMappings.Add("G108C2O3", "G108C2O3")
            tableMapping.ColumnMappings.Add("G109C1", "G109C1")
            tableMapping.ColumnMappings.Add("G109C2", "G109C2")
            tableMapping.ColumnMappings.Add("G109C3", "G109C3")
            tableMapping.ColumnMappings.Add("G109C4", "G109C4")
            tableMapping.ColumnMappings.Add("G109C5", "G109C5")
            tableMapping.ColumnMappings.Add("G109C6", "G109C6")
            tableMapping.ColumnMappings.Add("G109C7", "G109C7")
            tableMapping.ColumnMappings.Add("G109C8", "G109C8")
            tableMapping.ColumnMappings.Add("G109C9", "G109C9")
            tableMapping.ColumnMappings.Add("G109C10", "G109C10")
            tableMapping.ColumnMappings.Add("G109C11", "G109C11")
            tableMapping.ColumnMappings.Add("G109C12", "G109C12")
            tableMapping.ColumnMappings.Add("G111C1", "G111C1")
            tableMapping.ColumnMappings.Add("IDPrescripteur", "IDPrescripteur")
            tableMapping.ColumnMappings.Add("G101C1", "G101C1")
            tableMapping.ColumnMappings.Add("G101C5", "G101C5")
            tableMapping.ColumnMappings.Add("G101C6", "G101C6")
            tableMapping.ColumnMappings.Add("G101C14", "G101C14")
            tableMapping.ColumnMappings.Add("AMC_NumOrganisme", "AMC_NumOrganisme")
            tableMapping.ColumnMappings.Add("AMC_NumAdherent", "AMC_NumAdherent")
            tableMapping.ColumnMappings.Add("AMC_TypeContrat", "AMC_TypeContrat")
            tableMapping.ColumnMappings.Add("AMC_DateDébut", "AMC_DateDébut")
            tableMapping.ColumnMappings.Add("AMC_DateFin", "AMC_DateFin")
            tableMapping.ColumnMappings.Add("AMC_Piecejustificative", "AMC_Piecejustificative")
            tableMapping.ColumnMappings.Add("G1420C1", "G1420C1")
            tableMapping.ColumnMappings.Add("G1420C2", "G1420C2")
            tableMapping.ColumnMappings.Add("G1420C3", "G1420C3")
            tableMapping.ColumnMappings.Add("Assuré", "Assuré")
            tableMapping.ColumnMappings.Add("G1511C2", "G1511C2")
            tableMapping.ColumnMappings.Add("AMC_Indicateurdetrairement", "AMC_Indicateurdetrairement")
            tableMapping.ColumnMappings.Add("AMC_NumMutuelle", "AMC_NumMutuelle")
            tableMapping.ColumnMappings.Add("AMC_IDassure", "AMC_IDassure")
            tableMapping.ColumnMappings.Add("AMC_Code_Aiguillage_STS", "AMC_Code_Aiguillage_STS")
            tableMapping.ColumnMappings.Add("AMC_CodeRoutage", "AMC_CodeRoutage")
            tableMapping.ColumnMappings.Add("AMC_IdHote", "AMC_IdHote")
            tableMapping.ColumnMappings.Add("AMC_NomDomaine", "AMC_NomDomaine")
            tableMapping.ColumnMappings.Add("AMC_Type_Convention", "AMC_Type_Convention")
            tableMapping.ColumnMappings.Add("AMC_Critère_secondaire", "AMC_Critère_secondaire")
            tableMapping.ColumnMappings.Add("AMC_IdentifiantAMC", "AMC_IdentifiantAMC")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.DeleteCommand.Connection = Me.Connection
            Me._adapter.DeleteCommand.CommandText = "DELETE FROM [Vitale] WHERE (((@IsNull_G101C2 = 1 AND [G101C2] IS NULL) OR ([G101C"& _ 
                "2] = @Original_G101C2)) AND ((@IsNull_G101C3 = 1 AND [G101C3] IS NULL) OR ([G101"& _ 
                "C3] = @Original_G101C3)) AND ((@IsNull_G101C7 = 1 AND [G101C7] IS NULL) OR ([G10"& _ 
                "1C7] = @Original_G101C7)) AND ([G101C8] = @Original_G101C8) AND ([G101C9] = @Ori"& _ 
                "ginal_G101C9) AND ((@IsNull_G101C10 = 1 AND [G101C10] IS NULL) OR ([G101C10] = @"& _ 
                "Original_G101C10)) AND ((@IsNull_G101C11 = 1 AND [G101C11] IS NULL) OR ([G101C11"& _ 
                "] = @Original_G101C11)) AND ((@IsNull_G101C12 = 1 AND [G101C12] IS NULL) OR ([G1"& _ 
                "01C12] = @Original_G101C12)) AND ((@IsNull_G101C13 = 1 AND [G101C13] IS NULL) OR"& _ 
                " ([G101C13] = @Original_G101C13)) AND ((@IsNull_G102C1 = 1 AND [G102C1] IS NULL)"& _ 
                " OR ([G102C1] = @Original_G102C1)) AND ((@IsNull_G102C2 = 1 AND [G102C2] IS NULL"& _ 
                ") OR ([G102C2] = @Original_G102C2)) AND ((@IsNull_G102C3 = 1 AND [G102C3] IS NUL"& _ 
                "L) OR ([G102C3] = @Original_G102C3)) AND ((@IsNull_G103C1 = 1 AND [G103C1] IS NU"& _ 
                "LL) OR ([G103C1] = @Original_G103C1)) AND ((@IsNull_G103C2 = 1 AND [G103C2] IS N"& _ 
                "ULL) OR ([G103C2] = @Original_G103C2)) AND ((@IsNull_G103C3 = 1 AND [G103C3] IS "& _ 
                "NULL) OR ([G103C3] = @Original_G103C3)) AND ((@IsNull_G103C4 = 1 AND [G103C4] IS"& _ 
                " NULL) OR ([G103C4] = @Original_G103C4)) AND ((@IsNull_G103C5 = 1 AND [G103C5] I"& _ 
                "S NULL) OR ([G103C5] = @Original_G103C5)) AND ((@IsNull_G103C6 = 1 AND [G103C6] "& _ 
                "IS NULL) OR ([G103C6] = @Original_G103C6)) AND ((@IsNull_G103C7 = 1 AND [G103C7]"& _ 
                " IS NULL) OR ([G103C7] = @Original_G103C7)) AND ((@IsNull_G103C8 = 1 AND [G103C8"& _ 
                "] IS NULL) OR ([G103C8] = @Original_G103C8)) AND ((@IsNull_G103C9 = 1 AND [G103C"& _ 
                "9] IS NULL) OR ([G103C9] = @Original_G103C9)) AND ((@IsNull_G104C1 = 1 AND [G104"& _ 
                "C1] IS NULL) OR ([G104C1] = @Original_G104C1)) AND ((@IsNull_G104C2 = 1 AND [G10"& _ 
                "4C2] IS NULL) OR ([G104C2] = @Original_G104C2)) AND ((@IsNull_G104C3 = 1 AND [G1"& _ 
                "04C3] IS NULL) OR ([G104C3] = @Original_G104C3)) AND ((@IsNull_G104C4 = 1 AND [G"& _ 
                "104C4] IS NULL) OR ([G104C4] = @Original_G104C4)) AND ((@IsNull_G104C5 = 1 AND ["& _ 
                "G104C5] IS NULL) OR ([G104C5] = @Original_G104C5)) AND ((@IsNull_G104C6 = 1 AND "& _ 
                "[G104C6] IS NULL) OR ([G104C6] = @Original_G104C6)) AND ((@IsNull_G104C7 = 1 AND"& _ 
                " [G104C7] IS NULL) OR ([G104C7] = @Original_G104C7)) AND ((@IsNull_G104C8 = 1 AN"& _ 
                "D [G104C8] IS NULL) OR ([G104C8] = @Original_G104C8)) AND ((@IsNull_G104C9 = 1 A"& _ 
                "ND [G104C9] IS NULL) OR ([G104C9] = @Original_G104C9)) AND ((@IsNull_G104C10 = 1"& _ 
                " AND [G104C10] IS NULL) OR ([G104C10] = @Original_G104C10)) AND ((@IsNull_G104C1"& _ 
                "1 = 1 AND [G104C11] IS NULL) OR ([G104C11] = @Original_G104C11)) AND ([G104C12] "& _ 
                "= @Original_G104C12) AND ([G104C13] = @Original_G104C13) AND ([G104C14] = @Origi"& _ 
                "nal_G104C14) AND ((@IsNull_G104C15 = 1 AND [G104C15] IS NULL) OR ([G104C15] = @O"& _ 
                "riginal_G104C15)) AND ((@IsNull_G104C16 = 1 AND [G104C16] IS NULL) OR ([G104C16]"& _ 
                " = @Original_G104C16)) AND ((@IsNull_G104C17 = 1 AND [G104C17] IS NULL) OR ([G10"& _ 
                "4C17] = @Original_G104C17)) AND ((@IsNull_G104C18 = 1 AND [G104C18] IS NULL) OR "& _ 
                "([G104C18] = @Original_G104C18)) AND ((@IsNull_G105C1O1 = 1 AND [G105C1O1] IS NU"& _ 
                "LL) OR ([G105C1O1] = @Original_G105C1O1)) AND ((@IsNull_G105C2O1 = 1 AND [G105C2"& _ 
                "O1] IS NULL) OR ([G105C2O1] = @Original_G105C2O1)) AND ((@IsNull_G105C1O2 = 1 AN"& _ 
                "D [G105C1O2] IS NULL) OR ([G105C1O2] = @Original_G105C1O2)) AND ((@IsNull_G105C2"& _ 
                "O2 = 1 AND [G105C2O2] IS NULL) OR ([G105C2O2] = @Original_G105C2O2)) AND ((@IsNu"& _ 
                "ll_G105C1O3 = 1 AND [G105C1O3] IS NULL) OR ([G105C1O3] = @Original_G105C1O3)) AN"& _ 
                "D ((@IsNull_G105C2O3 = 1 AND [G105C2O3] IS NULL) OR ([G105C2O3] = @Original_G105"& _ 
                "C2O3)) AND ((@IsNull_G106C1O1 = 1 AND [G106C1O1] IS NULL) OR ([G106C1O1] = @Orig"& _ 
                "inal_G106C1O1)) AND ((@IsNull_G106C2O1 = 1 AND [G106C2O1] IS NULL) OR ([G106C2O1"& _ 
                "] = @Original_G106C2O1)) AND ((@IsNull_G106C3O1 = 1 AND [G106C3O1] IS NULL) OR ("& _ 
                "[G106C3O1] = @Original_G106C3O1)) AND ((@IsNull_G106C4O1 = 1 AND [G106C4O1] IS N"& _ 
                "ULL) OR ([G106C4O1] = @Original_G106C4O1)) AND ((@IsNull_G106C1O2 = 1 AND [G106C"& _ 
                "1O2] IS NULL) OR ([G106C1O2] = @Original_G106C1O2)) AND ((@IsNull_G106C2O2 = 1 A"& _ 
                "ND [G106C2O2] IS NULL) OR ([G106C2O2] = @Original_G106C2O2)) AND ((@IsNull_G106C"& _ 
                "3O2 = 1 AND [G106C3O2] IS NULL) OR ([G106C3O2] = @Original_G106C3O2)) AND ((@IsN"& _ 
                "ull_G106C4O2 = 1 AND [G106C4O2] IS NULL) OR ([G106C4O2] = @Original_G106C4O2)) A"& _ 
                "ND ((@IsNull_G106C1O3 = 1 AND [G106C1O3] IS NULL) OR ([G106C1O3] = @Original_G10"& _ 
                "6C1O3)) AND ((@IsNull_G106C2O3 = 1 AND [G106C2O3] IS NULL) OR ([G106C2O3] = @Ori"& _ 
                "ginal_G106C2O3)) AND ((@IsNull_G106C3O3 = 1 AND [G106C3O3] IS NULL) OR ([G106C3O"& _ 
                "3] = @Original_G106C3O3)) AND ((@IsNull_G106C4O3 = 1 AND [G106C4O3] IS NULL) OR "& _ 
                "([G106C4O3] = @Original_G106C4O3)) AND ((@IsNull_G106C1O4 = 1 AND [G106C1O4] IS "& _ 
                "NULL) OR ([G106C1O4] = @Original_G106C1O4)) AND ((@IsNull_G106C2O4 = 1 AND [G106"& _ 
                "C2O4] IS NULL) OR ([G106C2O4] = @Original_G106C2O4)) AND ((@IsNull_G106C3O4 = 1 "& _ 
                "AND [G106C3O4] IS NULL) OR ([G106C3O4] = @Original_G106C3O4)) AND ((@IsNull_G106"& _ 
                "C4O4 = 1 AND [G106C4O4] IS NULL) OR ([G106C4O4] = @Original_G106C4O4)) AND ((@Is"& _ 
                "Null_G106C1O5 = 1 AND [G106C1O5] IS NULL) OR ([G106C1O5] = @Original_G106C1O5)) "& _ 
                "AND ((@IsNull_G106C2O5 = 1 AND [G106C2O5] IS NULL) OR ([G106C2O5] = @Original_G1"& _ 
                "06C2O5)) AND ((@IsNull_G106C3O5 = 1 AND [G106C3O5] IS NULL) OR ([G106C3O5] = @Or"& _ 
                "iginal_G106C3O5)) AND ((@IsNull_G106C4O5 = 1 AND [G106C4O5] IS NULL) OR ([G106C4"& _ 
                "O5] = @Original_G106C4O5)) AND ((@IsNull_G106C1O6 = 1 AND [G106C1O6] IS NULL) OR"& _ 
                " ([G106C1O6] = @Original_G106C1O6)) AND ((@IsNull_G106C2O6 = 1 AND [G106C2O6] IS"& _ 
                " NULL) OR ([G106C2O6] = @Original_G106C2O6)) AND ((@IsNull_G106C3O6 = 1 AND [G10"& _ 
                "6C3O6] IS NULL) OR ([G106C3O6] = @Original_G106C3O6)) AND ((@IsNull_G106C4O6 = 1"& _ 
                " AND [G106C4O6] IS NULL) OR ([G106C4O6] = @Original_G106C4O6)) AND ((@IsNull_G10"& _ 
                "6C1O7 = 1 AND [G106C1O7] IS NULL) OR ([G106C1O7] = @Original_G106C1O7)) AND ((@I"& _ 
                "sNull_G106C2O7 = 1 AND [G106C2O7] IS NULL) OR ([G106C2O7] = @Original_G106C2O7))"& _ 
                " AND ((@IsNull_G106C3O7 = 1 AND [G106C3O7] IS NULL) OR ([G106C3O7] = @Original_G"& _ 
                "106C3O7)) AND ((@IsNull_G106C4O7 = 1 AND [G106C4O7] IS NULL) OR ([G106C4O7] = @O"& _ 
                "riginal_G106C4O7)) AND ((@IsNull_G107C1 = 1 AND [G107C1] IS NULL) OR ([G107C1] ="& _ 
                " @Original_G107C1)) AND ((@IsNull_G107C2 = 1 AND [G107C2] IS NULL) OR ([G107C2] "& _ 
                "= @Original_G107C2)) AND ((@IsNull_G107C3 = 1 AND [G107C3] IS NULL) OR ([G107C3]"& _ 
                " = @Original_G107C3)) AND ((@IsNull_G107C4 = 1 AND [G107C4] IS NULL) OR ([G107C4"& _ 
                "] = @Original_G107C4)) AND ((@IsNull_G107C5 = 1 AND [G107C5] IS NULL) OR ([G107C"& _ 
                "5] = @Original_G107C5)) AND ((@IsNull_G107C6 = 1 AND [G107C6] IS NULL) OR ([G107"& _ 
                "C6] = @Original_G107C6)) AND ((@IsNull_G108C1O1 = 1 AND [G108C1O1] IS NULL) OR ("& _ 
                "[G108C1O1] = @Original_G108C1O1)) AND ((@IsNull_G108C2O1 = 1 AND [G108C2O1] IS N"& _ 
                "ULL) OR ([G108C2O1] = @Original_G108C2O1)) AND ((@IsNull_G108C1O2 = 1 AND [G108C"& _ 
                "1O2] IS NULL) OR ([G108C1O2] = @Original_G108C1O2)) AND ((@IsNull_G108C2O2 = 1 A"& _ 
                "ND [G108C2O2] IS NULL) OR ([G108C2O2] = @Original_G108C2O2)) AND ((@IsNull_G108C"& _ 
                "1O3 = 1 AND [G108C1O3] IS NULL) OR ([G108C1O3] = @Original_G108C1O3)) AND ((@IsN"& _ 
                "ull_G108C2O3 = 1 AND [G108C2O3] IS NULL) OR ([G108C2O3] = @Original_G108C2O3)) A"& _ 
                "ND ((@IsNull_G109C1 = 1 AND [G109C1] IS NULL) OR ([G109C1] = @Original_G109C1)) "& _ 
                "AND ((@IsNull_G109C2 = 1 AND [G109C2] IS NULL) OR ([G109C2] = @Original_G109C2))"& _ 
                " AND ((@IsNull_G109C3 = 1 AND [G109C3] IS NULL) OR ([G109C3] = @Original_G109C3)"& _ 
                ") AND ((@IsNull_G109C4 = 1 AND [G109C4] IS NULL) OR ([G109C4] = @Original_G109C4"& _ 
                ")) AND ((@IsNull_G109C5 = 1 AND [G109C5] IS NULL) OR ([G109C5] = @Original_G109C"& _ 
                "5)) AND ((@IsNull_G109C6 = 1 AND [G109C6] IS NULL) OR ([G109C6] = @Original_G109"& _ 
                "C6)) AND ((@IsNull_G109C7 = 1 AND [G109C7] IS NULL) OR ([G109C7] = @Original_G10"& _ 
                "9C7)) AND ((@IsNull_G109C8 = 1 AND [G109C8] IS NULL) OR ([G109C8] = @Original_G1"& _ 
                "09C8)) AND ((@IsNull_G109C9 = 1 AND [G109C9] IS NULL) OR ([G109C9] = @Original_G"& _ 
                "109C9)) AND ((@IsNull_G109C10 = 1 AND [G109C10] IS NULL) OR ([G109C10] = @Origin"& _ 
                "al_G109C10)) AND ((@IsNull_G109C11 = 1 AND [G109C11] IS NULL) OR ([G109C11] = @O"& _ 
                "riginal_G109C11)) AND ((@IsNull_G109C12 = 1 AND [G109C12] IS NULL) OR ([G109C12]"& _ 
                " = @Original_G109C12)) AND ((@IsNull_G111C1 = 1 AND [G111C1] IS NULL) OR ([G111C"& _ 
                "1] = @Original_G111C1)) AND ((@IsNull_G101C1 = 1 AND [G101C1] IS NULL) OR ([G101"& _ 
                "C1] = @Original_G101C1)) AND ((@IsNull_G101C14 = 1 AND [G101C14] IS NULL) OR ([G"& _ 
                "101C14] = @Original_G101C14)) AND ((@IsNull_G101C5 = 1 AND [G101C5] IS NULL) OR "& _ 
                "([G101C5] = @Original_G101C5)) AND ((@IsNull_G101C6 = 1 AND [G101C6] IS NULL) OR"& _ 
                " ([G101C6] = @Original_G101C6)) AND ((@IsNull_IDPrescripteur = 1 AND [IDPrescrip"& _ 
                "teur] IS NULL) OR ([IDPrescripteur] = @Original_IDPrescripteur)) AND ((@IsNull_A"& _ 
                "MC_DateDébut = 1 AND [AMC_DateDébut] IS NULL) OR ([AMC_DateDébut] = @Original_AM"& _ 
                "C_DateDébut)) AND ((@IsNull_AMC_DateFin = 1 AND [AMC_DateFin] IS NULL) OR ([AMC_"& _ 
                "DateFin] = @Original_AMC_DateFin)) AND ((@IsNull_AMC_NumAdherent = 1 AND [AMC_Nu"& _ 
                "mAdherent] IS NULL) OR ([AMC_NumAdherent] = @Original_AMC_NumAdherent)) AND ((@I"& _ 
                "sNull_AMC_NumOrganisme = 1 AND [AMC_NumOrganisme] IS NULL) OR ([AMC_NumOrganisme"& _ 
                "] = @Original_AMC_NumOrganisme)) AND ((@IsNull_AMC_Piecejustificative = 1 AND [A"& _ 
                "MC_Piecejustificative] IS NULL) OR ([AMC_Piecejustificative] = @Original_AMC_Pie"& _ 
                "cejustificative)) AND ((@IsNull_AMC_TypeContrat = 1 AND [AMC_TypeContrat] IS NUL"& _ 
                "L) OR ([AMC_TypeContrat] = @Original_AMC_TypeContrat)) AND ((@IsNull_G1420C1 = 1"& _ 
                " AND [G1420C1] IS NULL) OR ([G1420C1] = @Original_G1420C1)) AND ((@IsNull_G1420C"& _ 
                "2 = 1 AND [G1420C2] IS NULL) OR ([G1420C2] = @Original_G1420C2)) AND ((@IsNull_G"& _ 
                "1420C3 = 1 AND [G1420C3] IS NULL) OR ([G1420C3] = @Original_G1420C3)) AND ((@IsN"& _ 
                "ull_G1511C2 = 1 AND [G1511C2] IS NULL) OR ([G1511C2] = @Original_G1511C2)) AND ("& _ 
                "(@IsNull_AMC_Indicateurdetrairement = 1 AND [AMC_Indicateurdetrairement] IS NULL"& _ 
                ") OR ([AMC_Indicateurdetrairement] = @Original_AMC_Indicateurdetrairement)) AND "& _ 
                "((@IsNull_AMC_CodeRoutage = 1 AND [AMC_CodeRoutage] IS NULL) OR ([AMC_CodeRoutag"& _ 
                "e] = @Original_AMC_CodeRoutage)) AND ((@IsNull_AMC_Code_Aiguillage_STS = 1 AND ["& _ 
                "AMC_Code_Aiguillage_STS] IS NULL) OR ([AMC_Code_Aiguillage_STS] = @Original_AMC_"& _ 
                "Code_Aiguillage_STS)) AND ((@IsNull_AMC_Critère_secondaire = 1 AND [AMC_Critère_"& _ 
                "secondaire] IS NULL) OR ([AMC_Critère_secondaire] = @Original_AMC_Critère_second"& _ 
                "aire)) AND ((@IsNull_AMC_IDassure = 1 AND [AMC_IDassure] IS NULL) OR ([AMC_IDass"& _ 
                "ure] = @Original_AMC_IDassure)) AND ((@IsNull_AMC_IdHote = 1 AND [AMC_IdHote] IS"& _ 
                " NULL) OR ([AMC_IdHote] = @Original_AMC_IdHote)) AND ((@IsNull_AMC_NomDomaine = "& _ 
                "1 AND [AMC_NomDomaine] IS NULL) OR ([AMC_NomDomaine] = @Original_AMC_NomDomaine)"& _ 
                ") AND ((@IsNull_AMC_NumMutuelle = 1 AND [AMC_NumMutuelle] IS NULL) OR ([AMC_NumM"& _ 
                "utuelle] = @Original_AMC_NumMutuelle)) AND ((@IsNull_AMC_Type_Convention = 1 AND"& _ 
                " [AMC_Type_Convention] IS NULL) OR ([AMC_Type_Convention] = @Original_AMC_Type_C"& _ 
                "onvention)))"
            Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C10", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C11", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C12", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C13", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G102C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G102C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G102C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G102C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G102C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G102C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C8", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C9", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C8", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C9", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C10", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C11", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C15", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C15", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C16", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C16", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C17", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C17", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C18", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C18", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C1O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C2O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C1O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C2O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C1O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C2O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C1O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C2O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C1O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C2O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C1O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C2O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C8", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C9", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C10", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C11", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C12", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G111C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G111C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C14", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C14", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C14", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_IDPrescripteur", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_DateDébut", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_DateFin", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NumAdherent", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NumOrganisme", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Piecejustificative", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_TypeContrat", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1420C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1420C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1420C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1420C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1420C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1420C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1511C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1511C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_CodeRoutage", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Critère_secondaire", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_IDassure", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_IdHote", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NomDomaine", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NumMutuelle", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Type_Convention", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Vitale] ([G101C2], [G101C3], [G101C7], [G101C8], [G101C9], [G101C10]"& _ 
                ", [G101C11], [G101C12], [G101C13], [G102C1], [G102C2], [G102C3], [G103C1], [G103"& _ 
                "C2], [G103C3], [G103C4], [G103C5], [G103C6], [G103C7], [G103C8], [G103C9], [G104"& _ 
                "C1], [G104C2], [G104C3], [G104C4], [G104C5], [G104C6], [G104C7], [G104C8], [G104"& _ 
                "C9], [G104C10], [G104C11], [G104C12], [G104C13], [G104C14], [G104C15], [G104C16]"& _ 
                ", [G104C17], [G104C18], [G105C1O1], [G105C2O1], [G105C1O2], [G105C2O2], [G105C1O"& _ 
                "3], [G105C2O3], [G106C1O1], [G106C2O1], [G106C3O1], [G106C4O1], [G106C1O2], [G10"& _ 
                "6C2O2], [G106C3O2], [G106C4O2], [G106C1O3], [G106C2O3], [G106C3O3], [G106C4O3], "& _ 
                "[G106C1O4], [G106C2O4], [G106C3O4], [G106C4O4], [G106C1O5], [G106C2O5], [G106C3O"& _ 
                "5], [G106C4O5], [G106C1O6], [G106C2O6], [G106C3O6], [G106C4O6], [G106C1O7], [G10"& _ 
                "6C2O7], [G106C3O7], [G106C4O7], [G107C1], [G107C2], [G107C3], [G107C4], [G107C5]"& _ 
                ", [G107C6], [G108C1O1], [G108C2O1], [G108C1O2], [G108C2O2], [G108C1O3], [G108C2O"& _ 
                "3], [G109C1], [G109C2], [G109C3], [G109C4], [G109C5], [G109C6], [G109C7], [G109C"& _ 
                "8], [G109C9], [G109C10], [G109C11], [G109C12], [G111C1], [G101C1], [G101C14], [G"& _ 
                "101C5], [G101C6], [IDPrescripteur], [AMC_DateDébut], [AMC_DateFin], [AMC_NumAdhe"& _ 
                "rent], [AMC_NumOrganisme], [AMC_Piecejustificative], [AMC_TypeContrat], [G1420C1"& _ 
                "], [G1420C2], [G1420C3], [Assuré], [G1511C2], [AMC_Indicateurdetrairement], [AMC"& _ 
                "_CodeRoutage], [AMC_Code_Aiguillage_STS], [AMC_Critère_secondaire], [AMC_IDassur"& _ 
                "e], [AMC_IdHote], [AMC_NomDomaine], [AMC_NumMutuelle], [AMC_Type_Convention], [A"& _ 
                "MC_IdentifiantAMC]) VALUES (@G101C2, @G101C3, @G101C7, @G101C8, @G101C9, @G101C1"& _ 
                "0, @G101C11, @G101C12, @G101C13, @G102C1, @G102C2, @G102C3, @G103C1, @G103C2, @G"& _ 
                "103C3, @G103C4, @G103C5, @G103C6, @G103C7, @G103C8, @G103C9, @G104C1, @G104C2, @"& _ 
                "G104C3, @G104C4, @G104C5, @G104C6, @G104C7, @G104C8, @G104C9, @G104C10, @G104C11"& _ 
                ", @G104C12, @G104C13, @G104C14, @G104C15, @G104C16, @G104C17, @G104C18, @G105C1O"& _ 
                "1, @G105C2O1, @G105C1O2, @G105C2O2, @G105C1O3, @G105C2O3, @G106C1O1, @G106C2O1, "& _ 
                "@G106C3O1, @G106C4O1, @G106C1O2, @G106C2O2, @G106C3O2, @G106C4O2, @G106C1O3, @G1"& _ 
                "06C2O3, @G106C3O3, @G106C4O3, @G106C1O4, @G106C2O4, @G106C3O4, @G106C4O4, @G106C"& _ 
                "1O5, @G106C2O5, @G106C3O5, @G106C4O5, @G106C1O6, @G106C2O6, @G106C3O6, @G106C4O6"& _ 
                ", @G106C1O7, @G106C2O7, @G106C3O7, @G106C4O7, @G107C1, @G107C2, @G107C3, @G107C4"& _ 
                ", @G107C5, @G107C6, @G108C1O1, @G108C2O1, @G108C1O2, @G108C2O2, @G108C1O3, @G108"& _ 
                "C2O3, @G109C1, @G109C2, @G109C3, @G109C4, @G109C5, @G109C6, @G109C7, @G109C8, @G"& _ 
                "109C9, @G109C10, @G109C11, @G109C12, @G111C1, @G101C1, @G101C14, @G101C5, @G101C"& _ 
                "6, @IDPrescripteur, @AMC_DateDébut, @AMC_DateFin, @AMC_NumAdherent, @AMC_NumOrga"& _ 
                "nisme, @AMC_Piecejustificative, @AMC_TypeContrat, @G1420C1, @G1420C2, @G1420C3, "& _ 
                "@Assuré, @G1511C2, @AMC_Indicateurdetrairement, @AMC_CodeRoutage, @AMC_Code_Aigu"& _ 
                "illage_STS, @AMC_Critère_secondaire, @AMC_IDassure, @AMC_IdHote, @AMC_NomDomaine"& _ 
                ", @AMC_NumMutuelle, @AMC_Type_Convention, @AMC_IdentifiantAMC)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C15", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C16", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C17", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C18", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G111C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdentifiantAMC", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdentifiantAMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [Vitale] SET [G101C2] = @G101C2, [G101C3] = @G101C3, [G101C7] = @G101C7, ["& _ 
                "G101C8] = @G101C8, [G101C9] = @G101C9, [G101C10] = @G101C10, [G101C11] = @G101C1"& _ 
                "1, [G101C12] = @G101C12, [G101C13] = @G101C13, [G102C1] = @G102C1, [G102C2] = @G"& _ 
                "102C2, [G102C3] = @G102C3, [G103C1] = @G103C1, [G103C2] = @G103C2, [G103C3] = @G"& _ 
                "103C3, [G103C4] = @G103C4, [G103C5] = @G103C5, [G103C6] = @G103C6, [G103C7] = @G"& _ 
                "103C7, [G103C8] = @G103C8, [G103C9] = @G103C9, [G104C1] = @G104C1, [G104C2] = @G"& _ 
                "104C2, [G104C3] = @G104C3, [G104C4] = @G104C4, [G104C5] = @G104C5, [G104C6] = @G"& _ 
                "104C6, [G104C7] = @G104C7, [G104C8] = @G104C8, [G104C9] = @G104C9, [G104C10] = @"& _ 
                "G104C10, [G104C11] = @G104C11, [G104C12] = @G104C12, [G104C13] = @G104C13, [G104"& _ 
                "C14] = @G104C14, [G104C15] = @G104C15, [G104C16] = @G104C16, [G104C17] = @G104C1"& _ 
                "7, [G104C18] = @G104C18, [G105C1O1] = @G105C1O1, [G105C2O1] = @G105C2O1, [G105C1"& _ 
                "O2] = @G105C1O2, [G105C2O2] = @G105C2O2, [G105C1O3] = @G105C1O3, [G105C2O3] = @G"& _ 
                "105C2O3, [G106C1O1] = @G106C1O1, [G106C2O1] = @G106C2O1, [G106C3O1] = @G106C3O1,"& _ 
                " [G106C4O1] = @G106C4O1, [G106C1O2] = @G106C1O2, [G106C2O2] = @G106C2O2, [G106C3"& _ 
                "O2] = @G106C3O2, [G106C4O2] = @G106C4O2, [G106C1O3] = @G106C1O3, [G106C2O3] = @G"& _ 
                "106C2O3, [G106C3O3] = @G106C3O3, [G106C4O3] = @G106C4O3, [G106C1O4] = @G106C1O4,"& _ 
                " [G106C2O4] = @G106C2O4, [G106C3O4] = @G106C3O4, [G106C4O4] = @G106C4O4, [G106C1"& _ 
                "O5] = @G106C1O5, [G106C2O5] = @G106C2O5, [G106C3O5] = @G106C3O5, [G106C4O5] = @G"& _ 
                "106C4O5, [G106C1O6] = @G106C1O6, [G106C2O6] = @G106C2O6, [G106C3O6] = @G106C3O6,"& _ 
                " [G106C4O6] = @G106C4O6, [G106C1O7] = @G106C1O7, [G106C2O7] = @G106C2O7, [G106C3"& _ 
                "O7] = @G106C3O7, [G106C4O7] = @G106C4O7, [G107C1] = @G107C1, [G107C2] = @G107C2,"& _ 
                " [G107C3] = @G107C3, [G107C4] = @G107C4, [G107C5] = @G107C5, [G107C6] = @G107C6,"& _ 
                " [G108C1O1] = @G108C1O1, [G108C2O1] = @G108C2O1, [G108C1O2] = @G108C1O2, [G108C2"& _ 
                "O2] = @G108C2O2, [G108C1O3] = @G108C1O3, [G108C2O3] = @G108C2O3, [G109C1] = @G10"& _ 
                "9C1, [G109C2] = @G109C2, [G109C3] = @G109C3, [G109C4] = @G109C4, [G109C5] = @G10"& _ 
                "9C5, [G109C6] = @G109C6, [G109C7] = @G109C7, [G109C8] = @G109C8, [G109C9] = @G10"& _ 
                "9C9, [G109C10] = @G109C10, [G109C11] = @G109C11, [G109C12] = @G109C12, [G111C1] "& _ 
                "= @G111C1, [G101C1] = @G101C1, [G101C14] = @G101C14, [G101C5] = @G101C5, [G101C6"& _ 
                "] = @G101C6, [IDPrescripteur] = @IDPrescripteur, [AMC_DateDébut] = @AMC_DateDébu"& _ 
                "t, [AMC_DateFin] = @AMC_DateFin, [AMC_NumAdherent] = @AMC_NumAdherent, [AMC_NumO"& _ 
                "rganisme] = @AMC_NumOrganisme, [AMC_Piecejustificative] = @AMC_Piecejustificativ"& _ 
                "e, [AMC_TypeContrat] = @AMC_TypeContrat, [G1420C1] = @G1420C1, [G1420C2] = @G142"& _ 
                "0C2, [G1420C3] = @G1420C3, [Assuré] = @Assuré, [G1511C2] = @G1511C2, [AMC_Indica"& _ 
                "teurdetrairement] = @AMC_Indicateurdetrairement, [AMC_CodeRoutage] = @AMC_CodeRo"& _ 
                "utage, [AMC_Code_Aiguillage_STS] = @AMC_Code_Aiguillage_STS, [AMC_Critère_second"& _ 
                "aire] = @AMC_Critère_secondaire, [AMC_IDassure] = @AMC_IDassure, [AMC_IdHote] = "& _ 
                "@AMC_IdHote, [AMC_NomDomaine] = @AMC_NomDomaine, [AMC_NumMutuelle] = @AMC_NumMut"& _ 
                "uelle, [AMC_Type_Convention] = @AMC_Type_Convention WHERE (((@IsNull_G101C2 = 1 "& _ 
                "AND [G101C2] IS NULL) OR ([G101C2] = @Original_G101C2)) AND ((@IsNull_G101C3 = 1"& _ 
                " AND [G101C3] IS NULL) OR ([G101C3] = @Original_G101C3)) AND ((@IsNull_G101C7 = "& _ 
                "1 AND [G101C7] IS NULL) OR ([G101C7] = @Original_G101C7)) AND ([G101C8] = @Origi"& _ 
                "nal_G101C8) AND ([G101C9] = @Original_G101C9) AND ((@IsNull_G101C10 = 1 AND [G10"& _ 
                "1C10] IS NULL) OR ([G101C10] = @Original_G101C10)) AND ((@IsNull_G101C11 = 1 AND"& _ 
                " [G101C11] IS NULL) OR ([G101C11] = @Original_G101C11)) AND ((@IsNull_G101C12 = "& _ 
                "1 AND [G101C12] IS NULL) OR ([G101C12] = @Original_G101C12)) AND ((@IsNull_G101C"& _ 
                "13 = 1 AND [G101C13] IS NULL) OR ([G101C13] = @Original_G101C13)) AND ((@IsNull_"& _ 
                "G102C1 = 1 AND [G102C1] IS NULL) OR ([G102C1] = @Original_G102C1)) AND ((@IsNull"& _ 
                "_G102C2 = 1 AND [G102C2] IS NULL) OR ([G102C2] = @Original_G102C2)) AND ((@IsNul"& _ 
                "l_G102C3 = 1 AND [G102C3] IS NULL) OR ([G102C3] = @Original_G102C3)) AND ((@IsNu"& _ 
                "ll_G103C1 = 1 AND [G103C1] IS NULL) OR ([G103C1] = @Original_G103C1)) AND ((@IsN"& _ 
                "ull_G103C2 = 1 AND [G103C2] IS NULL) OR ([G103C2] = @Original_G103C2)) AND ((@Is"& _ 
                "Null_G103C3 = 1 AND [G103C3] IS NULL) OR ([G103C3] = @Original_G103C3)) AND ((@I"& _ 
                "sNull_G103C4 = 1 AND [G103C4] IS NULL) OR ([G103C4] = @Original_G103C4)) AND ((@"& _ 
                "IsNull_G103C5 = 1 AND [G103C5] IS NULL) OR ([G103C5] = @Original_G103C5)) AND (("& _ 
                "@IsNull_G103C6 = 1 AND [G103C6] IS NULL) OR ([G103C6] = @Original_G103C6)) AND ("& _ 
                "(@IsNull_G103C7 = 1 AND [G103C7] IS NULL) OR ([G103C7] = @Original_G103C7)) AND "& _ 
                "((@IsNull_G103C8 = 1 AND [G103C8] IS NULL) OR ([G103C8] = @Original_G103C8)) AND"& _ 
                " ((@IsNull_G103C9 = 1 AND [G103C9] IS NULL) OR ([G103C9] = @Original_G103C9)) AN"& _ 
                "D ((@IsNull_G104C1 = 1 AND [G104C1] IS NULL) OR ([G104C1] = @Original_G104C1)) A"& _ 
                "ND ((@IsNull_G104C2 = 1 AND [G104C2] IS NULL) OR ([G104C2] = @Original_G104C2)) "& _ 
                "AND ((@IsNull_G104C3 = 1 AND [G104C3] IS NULL) OR ([G104C3] = @Original_G104C3))"& _ 
                " AND ((@IsNull_G104C4 = 1 AND [G104C4] IS NULL) OR ([G104C4] = @Original_G104C4)"& _ 
                ") AND ((@IsNull_G104C5 = 1 AND [G104C5] IS NULL) OR ([G104C5] = @Original_G104C5"& _ 
                ")) AND ((@IsNull_G104C6 = 1 AND [G104C6] IS NULL) OR ([G104C6] = @Original_G104C"& _ 
                "6)) AND ((@IsNull_G104C7 = 1 AND [G104C7] IS NULL) OR ([G104C7] = @Original_G104"& _ 
                "C7)) AND ((@IsNull_G104C8 = 1 AND [G104C8] IS NULL) OR ([G104C8] = @Original_G10"& _ 
                "4C8)) AND ((@IsNull_G104C9 = 1 AND [G104C9] IS NULL) OR ([G104C9] = @Original_G1"& _ 
                "04C9)) AND ((@IsNull_G104C10 = 1 AND [G104C10] IS NULL) OR ([G104C10] = @Origina"& _ 
                "l_G104C10)) AND ((@IsNull_G104C11 = 1 AND [G104C11] IS NULL) OR ([G104C11] = @Or"& _ 
                "iginal_G104C11)) AND ([G104C12] = @Original_G104C12) AND ([G104C13] = @Original_"& _ 
                "G104C13) AND ([G104C14] = @Original_G104C14) AND ((@IsNull_G104C15 = 1 AND [G104"& _ 
                "C15] IS NULL) OR ([G104C15] = @Original_G104C15)) AND ((@IsNull_G104C16 = 1 AND "& _ 
                "[G104C16] IS NULL) OR ([G104C16] = @Original_G104C16)) AND ((@IsNull_G104C17 = 1"& _ 
                " AND [G104C17] IS NULL) OR ([G104C17] = @Original_G104C17)) AND ((@IsNull_G104C1"& _ 
                "8 = 1 AND [G104C18] IS NULL) OR ([G104C18] = @Original_G104C18)) AND ((@IsNull_G"& _ 
                "105C1O1 = 1 AND [G105C1O1] IS NULL) OR ([G105C1O1] = @Original_G105C1O1)) AND (("& _ 
                "@IsNull_G105C2O1 = 1 AND [G105C2O1] IS NULL) OR ([G105C2O1] = @Original_G105C2O1"& _ 
                ")) AND ((@IsNull_G105C1O2 = 1 AND [G105C1O2] IS NULL) OR ([G105C1O2] = @Original"& _ 
                "_G105C1O2)) AND ((@IsNull_G105C2O2 = 1 AND [G105C2O2] IS NULL) OR ([G105C2O2] = "& _ 
                "@Original_G105C2O2)) AND ((@IsNull_G105C1O3 = 1 AND [G105C1O3] IS NULL) OR ([G10"& _ 
                "5C1O3] = @Original_G105C1O3)) AND ((@IsNull_G105C2O3 = 1 AND [G105C2O3] IS NULL)"& _ 
                " OR ([G105C2O3] = @Original_G105C2O3)) AND ((@IsNull_G106C1O1 = 1 AND [G106C1O1]"& _ 
                " IS NULL) OR ([G106C1O1] = @Original_G106C1O1)) AND ((@IsNull_G106C2O1 = 1 AND ["& _ 
                "G106C2O1] IS NULL) OR ([G106C2O1] = @Original_G106C2O1)) AND ((@IsNull_G106C3O1 "& _ 
                "= 1 AND [G106C3O1] IS NULL) OR ([G106C3O1] = @Original_G106C3O1)) AND ((@IsNull_"& _ 
                "G106C4O1 = 1 AND [G106C4O1] IS NULL) OR ([G106C4O1] = @Original_G106C4O1)) AND ("& _ 
                "(@IsNull_G106C1O2 = 1 AND [G106C1O2] IS NULL) OR ([G106C1O2] = @Original_G106C1O"& _ 
                "2)) AND ((@IsNull_G106C2O2 = 1 AND [G106C2O2] IS NULL) OR ([G106C2O2] = @Origina"& _ 
                "l_G106C2O2)) AND ((@IsNull_G106C3O2 = 1 AND [G106C3O2] IS NULL) OR ([G106C3O2] ="& _ 
                " @Original_G106C3O2)) AND ((@IsNull_G106C4O2 = 1 AND [G106C4O2] IS NULL) OR ([G1"& _ 
                "06C4O2] = @Original_G106C4O2)) AND ((@IsNull_G106C1O3 = 1 AND [G106C1O3] IS NULL"& _ 
                ") OR ([G106C1O3] = @Original_G106C1O3)) AND ((@IsNull_G106C2O3 = 1 AND [G106C2O3"& _ 
                "] IS NULL) OR ([G106C2O3] = @Original_G106C2O3)) AND ((@IsNull_G106C3O3 = 1 AND "& _ 
                "[G106C3O3] IS NULL) OR ([G106C3O3] = @Original_G106C3O3)) AND ((@IsNull_G106C4O3"& _ 
                " = 1 AND [G106C4O3] IS NULL) OR ([G106C4O3] = @Original_G106C4O3)) AND ((@IsNull"& _ 
                "_G106C1O4 = 1 AND [G106C1O4] IS NULL) OR ([G106C1O4] = @Original_G106C1O4)) AND "& _ 
                "((@IsNull_G106C2O4 = 1 AND [G106C2O4] IS NULL) OR ([G106C2O4] = @Original_G106C2"& _ 
                "O4)) AND ((@IsNull_G106C3O4 = 1 AND [G106C3O4] IS NULL) OR ([G106C3O4] = @Origin"& _ 
                "al_G106C3O4)) AND ((@IsNull_G106C4O4 = 1 AND [G106C4O4] IS NULL) OR ([G106C4O4] "& _ 
                "= @Original_G106C4O4)) AND ((@IsNull_G106C1O5 = 1 AND [G106C1O5] IS NULL) OR ([G"& _ 
                "106C1O5] = @Original_G106C1O5)) AND ((@IsNull_G106C2O5 = 1 AND [G106C2O5] IS NUL"& _ 
                "L) OR ([G106C2O5] = @Original_G106C2O5)) AND ((@IsNull_G106C3O5 = 1 AND [G106C3O"& _ 
                "5] IS NULL) OR ([G106C3O5] = @Original_G106C3O5)) AND ((@IsNull_G106C4O5 = 1 AND"& _ 
                " [G106C4O5] IS NULL) OR ([G106C4O5] = @Original_G106C4O5)) AND ((@IsNull_G106C1O"& _ 
                "6 = 1 AND [G106C1O6] IS NULL) OR ([G106C1O6] = @Original_G106C1O6)) AND ((@IsNul"& _ 
                "l_G106C2O6 = 1 AND [G106C2O6] IS NULL) OR ([G106C2O6] = @Original_G106C2O6)) AND"& _ 
                " ((@IsNull_G106C3O6 = 1 AND [G106C3O6] IS NULL) OR ([G106C3O6] = @Original_G106C"& _ 
                "3O6)) AND ((@IsNull_G106C4O6 = 1 AND [G106C4O6] IS NULL) OR ([G106C4O6] = @Origi"& _ 
                "nal_G106C4O6)) AND ((@IsNull_G106C1O7 = 1 AND [G106C1O7] IS NULL) OR ([G106C1O7]"& _ 
                " = @Original_G106C1O7)) AND ((@IsNull_G106C2O7 = 1 AND [G106C2O7] IS NULL) OR (["& _ 
                "G106C2O7] = @Original_G106C2O7)) AND ((@IsNull_G106C3O7 = 1 AND [G106C3O7] IS NU"& _ 
                "LL) OR ([G106C3O7] = @Original_G106C3O7)) AND ((@IsNull_G106C4O7 = 1 AND [G106C4"& _ 
                "O7] IS NULL) OR ([G106C4O7] = @Original_G106C4O7)) AND ((@IsNull_G107C1 = 1 AND "& _ 
                "[G107C1] IS NULL) OR ([G107C1] = @Original_G107C1)) AND ((@IsNull_G107C2 = 1 AND"& _ 
                " [G107C2] IS NULL) OR ([G107C2] = @Original_G107C2)) AND ((@IsNull_G107C3 = 1 AN"& _ 
                "D [G107C3] IS NULL) OR ([G107C3] = @Original_G107C3)) AND ((@IsNull_G107C4 = 1 A"& _ 
                "ND [G107C4] IS NULL) OR ([G107C4] = @Original_G107C4)) AND ((@IsNull_G107C5 = 1 "& _ 
                "AND [G107C5] IS NULL) OR ([G107C5] = @Original_G107C5)) AND ((@IsNull_G107C6 = 1"& _ 
                " AND [G107C6] IS NULL) OR ([G107C6] = @Original_G107C6)) AND ((@IsNull_G108C1O1 "& _ 
                "= 1 AND [G108C1O1] IS NULL) OR ([G108C1O1] = @Original_G108C1O1)) AND ((@IsNull_"& _ 
                "G108C2O1 = 1 AND [G108C2O1] IS NULL) OR ([G108C2O1] = @Original_G108C2O1)) AND ("& _ 
                "(@IsNull_G108C1O2 = 1 AND [G108C1O2] IS NULL) OR ([G108C1O2] = @Original_G108C1O"& _ 
                "2)) AND ((@IsNull_G108C2O2 = 1 AND [G108C2O2] IS NULL) OR ([G108C2O2] = @Origina"& _ 
                "l_G108C2O2)) AND ((@IsNull_G108C1O3 = 1 AND [G108C1O3] IS NULL) OR ([G108C1O3] ="& _ 
                " @Original_G108C1O3)) AND ((@IsNull_G108C2O3 = 1 AND [G108C2O3] IS NULL) OR ([G1"& _ 
                "08C2O3] = @Original_G108C2O3)) AND ((@IsNull_G109C1 = 1 AND [G109C1] IS NULL) OR"& _ 
                " ([G109C1] = @Original_G109C1)) AND ((@IsNull_G109C2 = 1 AND [G109C2] IS NULL) O"& _ 
                "R ([G109C2] = @Original_G109C2)) AND ((@IsNull_G109C3 = 1 AND [G109C3] IS NULL) "& _ 
                "OR ([G109C3] = @Original_G109C3)) AND ((@IsNull_G109C4 = 1 AND [G109C4] IS NULL)"& _ 
                " OR ([G109C4] = @Original_G109C4)) AND ((@IsNull_G109C5 = 1 AND [G109C5] IS NULL"& _ 
                ") OR ([G109C5] = @Original_G109C5)) AND ((@IsNull_G109C6 = 1 AND [G109C6] IS NUL"& _ 
                "L) OR ([G109C6] = @Original_G109C6)) AND ((@IsNull_G109C7 = 1 AND [G109C7] IS NU"& _ 
                "LL) OR ([G109C7] = @Original_G109C7)) AND ((@IsNull_G109C8 = 1 AND [G109C8] IS N"& _ 
                "ULL) OR ([G109C8] = @Original_G109C8)) AND ((@IsNull_G109C9 = 1 AND [G109C9] IS "& _ 
                "NULL) OR ([G109C9] = @Original_G109C9)) AND ((@IsNull_G109C10 = 1 AND [G109C10] "& _ 
                "IS NULL) OR ([G109C10] = @Original_G109C10)) AND ((@IsNull_G109C11 = 1 AND [G109"& _ 
                "C11] IS NULL) OR ([G109C11] = @Original_G109C11)) AND ((@IsNull_G109C12 = 1 AND "& _ 
                "[G109C12] IS NULL) OR ([G109C12] = @Original_G109C12)) AND ((@IsNull_G111C1 = 1 "& _ 
                "AND [G111C1] IS NULL) OR ([G111C1] = @Original_G111C1)) AND ((@IsNull_G101C1 = 1"& _ 
                " AND [G101C1] IS NULL) OR ([G101C1] = @Original_G101C1)) AND ((@IsNull_G101C14 ="& _ 
                " 1 AND [G101C14] IS NULL) OR ([G101C14] = @Original_G101C14)) AND ((@IsNull_G101"& _ 
                "C5 = 1 AND [G101C5] IS NULL) OR ([G101C5] = @Original_G101C5)) AND ((@IsNull_G10"& _ 
                "1C6 = 1 AND [G101C6] IS NULL) OR ([G101C6] = @Original_G101C6)) AND ((@IsNull_ID"& _ 
                "Prescripteur = 1 AND [IDPrescripteur] IS NULL) OR ([IDPrescripteur] = @Original_"& _ 
                "IDPrescripteur)) AND ((@IsNull_AMC_DateDébut = 1 AND [AMC_DateDébut] IS NULL) OR"& _ 
                " ([AMC_DateDébut] = @Original_AMC_DateDébut)) AND ((@IsNull_AMC_DateFin = 1 AND "& _ 
                "[AMC_DateFin] IS NULL) OR ([AMC_DateFin] = @Original_AMC_DateFin)) AND ((@IsNull"& _ 
                "_AMC_NumAdherent = 1 AND [AMC_NumAdherent] IS NULL) OR ([AMC_NumAdherent] = @Ori"& _ 
                "ginal_AMC_NumAdherent)) AND ((@IsNull_AMC_NumOrganisme = 1 AND [AMC_NumOrganisme"& _ 
                "] IS NULL) OR ([AMC_NumOrganisme] = @Original_AMC_NumOrganisme)) AND ((@IsNull_A"& _ 
                "MC_Piecejustificative = 1 AND [AMC_Piecejustificative] IS NULL) OR ([AMC_Pieceju"& _ 
                "stificative] = @Original_AMC_Piecejustificative)) AND ((@IsNull_AMC_TypeContrat "& _ 
                "= 1 AND [AMC_TypeContrat] IS NULL) OR ([AMC_TypeContrat] = @Original_AMC_TypeCon"& _ 
                "trat)) AND ((@IsNull_G1420C1 = 1 AND [G1420C1] IS NULL) OR ([G1420C1] = @Origina"& _ 
                "l_G1420C1)) AND ((@IsNull_G1420C2 = 1 AND [G1420C2] IS NULL) OR ([G1420C2] = @Or"& _ 
                "iginal_G1420C2)) AND ((@IsNull_G1420C3 = 1 AND [G1420C3] IS NULL) OR ([G1420C3] "& _ 
                "= @Original_G1420C3)) AND ((@IsNull_G1511C2 = 1 AND [G1511C2] IS NULL) OR ([G151"& _ 
                "1C2] = @Original_G1511C2)) AND ((@IsNull_AMC_Indicateurdetrairement = 1 AND [AMC"& _ 
                "_Indicateurdetrairement] IS NULL) OR ([AMC_Indicateurdetrairement] = @Original_A"& _ 
                "MC_Indicateurdetrairement)) AND ((@IsNull_AMC_CodeRoutage = 1 AND [AMC_CodeRouta"& _ 
                "ge] IS NULL) OR ([AMC_CodeRoutage] = @Original_AMC_CodeRoutage)) AND ((@IsNull_A"& _ 
                "MC_Code_Aiguillage_STS = 1 AND [AMC_Code_Aiguillage_STS] IS NULL) OR ([AMC_Code_"& _ 
                "Aiguillage_STS] = @Original_AMC_Code_Aiguillage_STS)) AND ((@IsNull_AMC_Critère_"& _ 
                "secondaire = 1 AND [AMC_Critère_secondaire] IS NULL) OR ([AMC_Critère_secondaire"& _ 
                "] = @Original_AMC_Critère_secondaire)) AND ((@IsNull_AMC_IDassure = 1 AND [AMC_I"& _ 
                "Dassure] IS NULL) OR ([AMC_IDassure] = @Original_AMC_IDassure)) AND ((@IsNull_AM"& _ 
                "C_IdHote = 1 AND [AMC_IdHote] IS NULL) OR ([AMC_IdHote] = @Original_AMC_IdHote))"& _ 
                " AND ((@IsNull_AMC_NomDomaine = 1 AND [AMC_NomDomaine] IS NULL) OR ([AMC_NomDoma"& _ 
                "ine] = @Original_AMC_NomDomaine)) AND ((@IsNull_AMC_NumMutuelle = 1 AND [AMC_Num"& _ 
                "Mutuelle] IS NULL) OR ([AMC_NumMutuelle] = @Original_AMC_NumMutuelle)) AND ((@Is"& _ 
                "Null_AMC_Type_Convention = 1 AND [AMC_Type_Convention] IS NULL) OR ([AMC_Type_Co"& _ 
                "nvention] = @Original_AMC_Type_Convention)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT G101C2, G101C3, G101C7, G1"& _ 
                "01C8, G101C9, G101C10, G101C11, G101C12, G101C13, G102C1, G102C2, G102C3, G103C1"& _ 
                ", G103C2, G103C3, G103C4, G103C5, G103C6, G103C7, G103C8, G103C9, G104C1, G104C2"& _ 
                ", G104C3, G104C4, G104C5, G104C6, G104C7, G104C8, G104C9, G104C10, G104C11, G104"& _ 
                "C12, G104C13, G104C14, G104C15, G104C16, G104C17, G104C18, G105C1O1, G105C2O1, G"& _ 
                "105C1O2, G105C2O2, G105C1O3, G105C2O3, G106C1O1, G106C2O1, G106C3O1, G106C4O1, G"& _ 
                "106C1O2, G106C2O2, G106C3O2, G106C4O2, G106C1O3, G106C2O3, G106C3O3, G106C4O3, G"& _ 
                "106C1O4, G106C2O4, G106C3O4, G106C4O4, G106C1O5, G106C2O5, G106C3O5, G106C4O5, G"& _ 
                "106C1O6, G106C2O6, G106C3O6, G106C4O6, G106C1O7, G106C2O7, G106C3O7, G106C4O7, G"& _ 
                "107C1, G107C2, G107C3, G107C4, G107C5, G107C6, G108C1O1, G108C2O1, G108C1O2, G10"& _ 
                "8C2O2, G108C1O3, G108C2O3, G109C1, G109C2, G109C3, G109C4, G109C5, G109C6, G109C"& _ 
                "7, G109C8, G109C9, G109C10, G109C11, G109C12, G111C1, G101C1, G101C14, G101C5, G"& _ 
                "101C6, IDPrescripteur, AMC_DateDébut, AMC_DateFin, AMC_NumAdherent, AMC_NumOrgan"& _ 
                "isme, AMC_Piecejustificative, AMC_TypeContrat, G1420C1, G1420C2, G1420C3, Assuré"& _ 
                ", G1511C2, AMC_Indicateurdetrairement, AMC_CodeRoutage, AMC_Code_Aiguillage_STS,"& _ 
                " AMC_Critère_secondaire, AMC_IDassure, AMC_IdHote, AMC_NomDomaine, AMC_NumMutuel"& _ 
                "le, AMC_Type_Convention FROM Vitale WHERE (G101C8 = @G101C8) AND (G101C9 = @G101"& _ 
                "C9) AND (G104C12 = @G104C12) AND (G104C13 = @G104C13) AND (G104C14 = @G104C14)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C15", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C16", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C17", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C18", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G111C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C10", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C11", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C12", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C13", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G102C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G102C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G102C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G102C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G102C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G102C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C8", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G103C9", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G103C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C8", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C9", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C10", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C11", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C15", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C15", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C16", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C16", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C17", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C17", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G104C18", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G104C18", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C1O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C2O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C1O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C2O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C1O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G105C2O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G105C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C1O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C1O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C2O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C2O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C3O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C3O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G106C4O7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G106C4O7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G107C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G107C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C1O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C1O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C2O1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C2O1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C1O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C1O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C2O2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C2O2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C1O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C1O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G108C2O3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G108C2O3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C8", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C9", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C10", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C11", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G109C12", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G109C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G111C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G111C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C14", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C14", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C14", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C5", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C5", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C5", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G101C6", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C6", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G101C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C6", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_IDPrescripteur", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_DateDébut", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_DateFin", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NumAdherent", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NumOrganisme", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Piecejustificative", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_TypeContrat", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1420C1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1420C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1420C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1420C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1420C3", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1420C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_G1511C2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_G1511C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_CodeRoutage", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Critère_secondaire", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_IDassure", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_IdHote", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NomDomaine", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_NumMutuelle", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AMC_Type_Convention", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(10) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT G101C2, G101C3, G101C7, G101C8, G101C9, G101C10, G101C11, G101C12, G101C13"& _ 
                ", G102C1, G102C2, G102C3, G103C1, G103C2, G103C3, G103C4, G103C5, G103C6, G103C7"& _ 
                ", G103C8, G103C9, G104C1, G104C2, G104C3, G104C4, G104C5, G104C6, G104C7, G104C8"& _ 
                ", G104C9, G104C10, G104C11, G104C12, G104C13, G104C14, G104C15, G104C16, G104C17"& _ 
                ", G104C18, G105C1O1, G105C2O1, G105C1O2, G105C2O2, G105C1O3, G105C2O3, G106C1O1,"& _ 
                " G106C2O1, G106C3O1, G106C4O1, G106C1O2, G106C2O2, G106C3O2, G106C4O2, G106C1O3,"& _ 
                " G106C2O3, G106C3O3, G106C4O3, G106C1O4, G106C2O4, G106C3O4, G106C4O4, G106C1O5,"& _ 
                " G106C2O5, G106C3O5, G106C4O5, G106C1O6, G106C2O6, G106C3O6, G106C4O6, G106C1O7,"& _ 
                " G106C2O7, G106C3O7, G106C4O7, G107C1, G107C2, G107C3, G107C4, G107C5, G107C6, G"& _ 
                "108C1O1, G108C2O1, G108C1O2, G108C2O2, G108C1O3, G108C2O3, G109C1, G109C2, G109C"& _ 
                "3, G109C4, G109C5, G109C6, G109C7, G109C8, G109C9, G109C10, G109C11, G109C12, G1"& _ 
                "11C1, G101C1, G101C14, G101C5, G101C6, IDPrescripteur, AMC_DateDébut, AMC_DateFi"& _ 
                "n, AMC_NumAdherent, AMC_NumOrganisme, AMC_Piecejustificative, AMC_TypeContrat, G"& _ 
                "1420C1, G1420C2, G1420C3, Assuré, G1511C2, AMC_Indicateurdetrairement, AMC_CodeR"& _ 
                "outage, AMC_Code_Aiguillage_STS, AMC_Critère_secondaire, AMC_IDassure, AMC_IdHot"& _ 
                "e, AMC_NomDomaine, AMC_NumMutuelle, AMC_Type_Convention, AMC_IdentifiantAMC FROM"& _ 
                " Vitale"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT G101C2, G101C3, G101C7, G101C8, G101C9, G101C10, G101C11, G101C12, G101C13"& _ 
                ", G102C1, G102C2, G102C3, G103C1, G103C2, G103C3, G103C4, G103C5, G103C6, G103C7"& _ 
                ", G103C8, G103C9, G104C1, G104C2, G104C3, G104C4, G104C5, G104C6, G104C7, G104C8"& _ 
                ", G104C9, G104C10, G104C11, G104C12, G104C13, G104C14, G104C15, G104C16, G104C17"& _ 
                ", G104C18, G105C1O1, G105C2O1, G105C1O2, G105C2O2, G105C1O3, G105C2O3, G106C1O1,"& _ 
                " G106C2O1, G106C3O1, G106C4O1, G106C1O2, G106C2O2, G106C3O2, G106C4O2, G106C1O3,"& _ 
                " G106C2O3, G106C3O3, G106C4O3, G106C1O4, G106C2O4, G106C3O4, G106C4O4, G106C1O5,"& _ 
                " G106C2O5, G106C3O5, G106C4O5, G106C1O6, G106C2O6, G106C3O6, G106C4O6, G106C1O7,"& _ 
                " G106C2O7, G106C3O7, G106C4O7, G107C1, G107C2, G107C3, G107C4, G107C5, G107C6, G"& _ 
                "108C1O1, G108C2O1, G108C1O2, G108C2O2, G108C1O3, G108C2O3, G109C1, G109C2, G109C"& _ 
                "3, G109C4, G109C5, G109C6, G109C7, G109C8, G109C9, G109C10, G109C11, G109C12, G1"& _ 
                "11C1, G101C1, G101C14, G101C5, G101C6, IDPrescripteur, AMC_DateDébut, AMC_DateFi"& _ 
                "n, AMC_NumAdherent, AMC_NumOrganisme, AMC_Piecejustificative, AMC_TypeContrat, G"& _ 
                "1420C1, G1420C2, G1420C3, Assuré, G1511C2, AMC_Indicateurdetrairement, AMC_CodeR"& _ 
                "outage, AMC_Code_Aiguillage_STS, AMC_Critère_secondaire, AMC_IDassure, AMC_IdHot"& _ 
                "e, AMC_NomDomaine, AMC_NumMutuelle, AMC_Type_Convention, AMC_IdentifiantAMC FROM"& _ 
                " Vitale WHERE (G101C8 = @G101C8) AND (G104C12 = @G104C12) AND (G104C13 = @G104C1"& _ 
                "3) AND (G104C14 = @G104C14)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT G101C2, G101C3, G101C7, G101C8, G101C9, G101C10, G101C11, G101C12, G101C13"& _ 
                ", G102C1, G102C2, G102C3, G103C1, G103C2, G103C3, G103C4, G103C5, G103C6, G103C7"& _ 
                ", G103C8, G103C9, G104C1, G104C2, G104C3, G104C4, G104C5, G104C6, G104C7, G104C8"& _ 
                ", G104C9, G104C10, G104C11, G104C12, G104C13, G104C14, G104C15, G104C16, G104C17"& _ 
                ", G104C18, G105C1O1, G105C2O1, G105C1O2, G105C2O2, G105C1O3, G105C2O3, G106C1O1,"& _ 
                " G106C2O1, G106C3O1, G106C4O1, G106C1O2, G106C2O2, G106C3O2, G106C4O2, G106C1O3,"& _ 
                " G106C2O3, G106C3O3, G106C4O3, G106C1O4, G106C2O4, G106C3O4, G106C4O4, G106C1O5,"& _ 
                " G106C2O5, G106C3O5, G106C4O5, G106C1O6, G106C2O6, G106C3O6, G106C4O6, G106C1O7,"& _ 
                " G106C2O7, G106C3O7, G106C4O7, G107C1, G107C2, G107C3, G107C4, G107C5, G107C6, G"& _ 
                "108C1O1, G108C2O1, G108C1O2, G108C2O2, G108C1O3, G108C2O3, G109C1, G109C2, G109C"& _ 
                "3, G109C4, G109C5, G109C6, G109C7, G109C8, G109C9, G109C10, G109C11, G109C12, G1"& _ 
                "11C1, G101C1, G101C14, G101C5, G101C6, IDPrescripteur, AMC_DateDébut, AMC_DateFi"& _ 
                "n, AMC_NumAdherent, AMC_NumOrganisme, AMC_Piecejustificative, AMC_TypeContrat, G"& _ 
                "1420C1, G1420C2, G1420C3, Assuré, G1511C2, AMC_Indicateurdetrairement, AMC_CodeR"& _ 
                "outage, AMC_Code_Aiguillage_STS, AMC_Critère_secondaire, AMC_IDassure, AMC_IdHot"& _ 
                "e, AMC_NomDomaine, AMC_NumMutuelle, AMC_Type_Convention, AMC_IdentifiantAMC FROM"& _ 
                " Vitale WHERE (G104C1 LIKE '%' + @searchedstring + '%')"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@searchedstring", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "INSERT INTO Vitale"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      (G101C1, G101C2, G101C3, G101C7, G101C8"& _ 
                ", G101C9, G101C10, G101C11, G101C12, G101C13, G102C1, G102C2, G102C3, G103C1, G1"& _ 
                "03C2, G103C3, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G103C4, G103C5, G103C6, G103C7, G103C8, G1"& _ 
                "03C9, G104C1, G104C2, G104C3, G104C4, G104C5, G104C6, G104C7, G104C8, G104C9, G1"& _ 
                "04C10, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G104C11, G104C12, G104C13, G104C14, G104C15, G104"& _ 
                "C16, G104C17, G104C18, G105C1O1, G105C2O1, G105C1O2, G105C2O2, G105C1O3, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"     "& _ 
                "                 G105C2O3, G106C1O1, G106C2O1, G106C3O1, G106C4O1, G106C1O2, G10"& _ 
                "6C2O2, G106C3O2, G106C4O2, G106C1O3, G106C2O3, G106C3O3, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                     "& _ 
                " G106C4O3, G106C1O4, G106C2O4, G106C3O4, G106C4O4, G106C1O5, G106C2O5, G106C3O5,"& _ 
                " G106C4O5, G106C1O6, G106C2O6, G106C3O6, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G106C4O6, G106C"& _ 
                "1O7, G106C2O7, G106C3O7, G106C4O7, G107C1, G107C2, G107C3, G107C4, G107C5, G107C"& _ 
                "6, G108C1O1, G108C2O1, G108C1O2, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G108C2O2, G108C1O3, G10"& _ 
                "8C2O3, G109C1, G109C2, G109C3, G109C4, G109C5, G109C6, G109C7, G109C8, G109C9, G"& _ 
                "109C10, G109C11, G109C12, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G111C1, IDPrescripteur, AMC_Da"& _ 
                "teDébut, AMC_DateFin, AMC_NumAdherent, AMC_NumOrganisme, AMC_Piecejustificative,"& _ 
                " AMC_TypeContrat, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      AMC_Indicateurdetrairement,AMC_NumMutu"& _ 
                "elle,AMC_IDassure,AMC_Code_Aiguillage_STS,AMC_CodeRoutage,AMC_IdHote, AMC_NomDom"& _ 
                "aine,AMC_Type_Convention,AMC_Critère_secondaire,AMC_IdentifiantAMC,Assuré)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALU"& _ 
                "ES     (@G101C1,@G101C2,@G101C3,@G101C7,@G101C8,@G101C9,@G101C10,@G101C11,@G101C"& _ 
                "12,@G101C13,@G102C1,@G102C2,@G102C3,@G103C1,@G103C2,@G103C3,@G103C4,@G103C5,@G10"& _ 
                "3C6,@G103C7,@G103C8,@G103C9,@G104C1,@G104C2,@G104C3,@G104C4,@G104C5,@G104C6,@G10"& _ 
                "4C7,@G104C8,@G104C9,@G104C10,@G104C11,@G104C12,@G104C13,@G104C14,@G104C15,@G104C"& _ 
                "16,@G104C17,@G104C18,@G105C1O1,@G105C2O1,@G105C1O2,@G105C2O2,@G105C1O3,@G105C2O3"& _ 
                ",@G106C1O1,@G106C2O1,@G106C3O1,@G106C4O1,@G106C1O2,@G106C2O2,@G106C3O2,@G106C4O2"& _ 
                ",@G106C1O3,@G106C2O3,@G106C3O3,@G106C4O3,@G106C1O4,@G106C2O4,@G106C3O4,@G106C4O4"& _ 
                ",@G106C1O5,@G106C2O5,@G106C3O5,@G106C4O5,@G106C1O6,@G106C2O6,@G106C3O6,@G106C4O6"& _ 
                ",@G106C1O7,@G106C2O7,@G106C3O7,@G106C4O7,@G107C1,@G107C2,@G107C3,@G107C4,@G107C5"& _ 
                ",@G107C6,@G108C1O1,@G108C2O1,@G108C1O2,@G108C2O2,@G108C1O3,@G108C2O3,@G109C1,@G1"& _ 
                "09C2,@G109C3,@G109C4,@G109C5,@G109C6,@G109C7,@G109C8,@G109C9,@G109C10,@G109C11,@"& _ 
                "G109C12,@G111C1,@IDPrescripteur,@AMC_DateDébut,@AMC_DateFin,@AMC_NumAdherent,@AM"& _ 
                "C_NumOrganisme,@AMC_Piecejustificative,@AMC_TypeContrat,@AMC_Indicateurdetrairem"& _ 
                "ent,@AMC_NumMutuelle,@AMC_IDassure,@AMC_Code_Aiguillage_STS,@AMC_CodeRoutage,@AM"& _ 
                "C_IdHote, @AMC_NomDomaine,@AMC_Type_Convention,@AMC_Critère_secondaire,@AMC_Iden"& _ 
                "tifiantAMC,@Assuré)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C15", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C16", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C17", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C18", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G111C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdentifiantAMC", Global.System.Data.SqlDbType.NVarChar, 15, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdentifiantAMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "INSERT INTO Vitale"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      (G101C1,G101C7, G101C8, G101C9, G101C10"& _ 
                ", G101C11, G101C12, G104C1, G104C2, G104C3, G104C12, G104C13, G104C14, G106C1O1,"& _ 
                " G106C2O1, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G106C3O1, G106C4O1, G106C1O2, G106C2O2, G106C"& _ 
                "3O2, G106C4O2, G106C1O3, G106C2O3, G106C3O3, G106C4O3, G106C1O4, G106C2O4, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"   "& _ 
                "                   G106C3O4, G106C4O4, G106C1O5, G106C2O5, G106C3O5, G106C4O5, G"& _ 
                "106C1O6, G106C2O6, G106C3O6, G106C4O6, G106C1O7, G106C2O7, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                   "& _ 
                "   G106C3O7, G106C4O7,IDPrescripteur,Assuré,G1420C1,G1420C2,G1420C3,G1511C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AM"& _ 
                "C_NumOrganisme,AMC_NumMutuelle,AMC_NumAdherent,AMC_IDassure,AMC_TypeContrat,AMC_"& _ 
                "DateDébut,AMC_DateFin,AMC_Piecejustificative,AMC_Code_Aiguillage_STS,AMC_Indicat"& _ 
                "eurdetrairement,AMC_CodeRoutage,AMC_IdHote,AMC_NomDomaine,AMC_Type_Convention,AM"& _ 
                "C_Critère_secondaire,AMC_IdentifiantAMC)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES     (@G101C1,@G101C7,@G101C8,@G"& _ 
                "101C9,@G101C10,@G101C11,@G101C12,@G104C1,@G104C2,@G104C3,@G104C12,@G104C13,@G104"& _ 
                "C14,@G106C1O1,@G106C2O1,@G106C3O1,@G106C4O1,@G106C1O2,@G106C2O2,@G106C3O2,@G106C"& _ 
                "4O2,@G106C1O3,@G106C2O3,@G106C3O3,@G106C4O3,@G106C1O4,@G106C2O4,@G106C3O4,@G106C"& _ 
                "4O4,@G106C1O5,@G106C2O5,@G106C3O5,@G106C4O5,@G106C1O6,@G106C2O6,@G106C3O6,@G106C"& _ 
                "4O6,@G106C1O7,@G106C2O7,@G106C3O7,@G106C4O7,@IDPrescripteur,@Assuré,@G1420C1,@G1"& _ 
                "420C2,@G1420C3,@G1511C2,@AMC_NumOrganisme,@AMC_NumMutuelle,@AMC_NumAdherent,@AMC"& _ 
                "_IDassure,@AMC_TypeContrat,@AMC_DateDébut,@AMC_DateFin,@AMC_Piecejustificative,@"& _ 
                "AMC_Code_Aiguillage_STS,@AMC_Indicateurdetrairement,@AMC_CodeRoutage,@AMC_IdHote"& _ 
                ",@AMC_NomDomaine,@AMC_Type_Convention,@AMC_Critère_secondaire,@AMC_IdentifiantAM"& _ 
                "C)"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C1", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C2", Global.System.Data.SqlDbType.NVarChar, 12, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C3", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdentifiantAMC", Global.System.Data.SqlDbType.NVarChar, 15, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdentifiantAMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "SELECT COUNT(*) FROM Vitale"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE  (G101C8 = @G101C8) and (G101C9 = @G101C9) and"& _ 
                " (G104C1 = @G104C1) and (G104C2 = @G104C2) and (G104C3 = @G104C3) and (G104C12 ="& _ 
                " @G104C12) and (G104C13 = @G104C13) and (G104C14 = @G104C14)"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "SELECT  AMC_NumOrganisme + '@/@/@' + AMC_NumAdherent+ '@/@/@' +AMC_TypeContrat + "& _ 
                "'@/@/@' +AMC_DateDébut + '@/@/@' +AMC_DateFin + '@/@/@' + AMC_Piecejustificative"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM Vitale"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" WHERE (G101C8 = @G101C8) AND (G101C9 = @G101C9) AND (G104C1 = @G"& _ 
                "104C1) AND (G104C2 = @G104C2) AND (G104C3 = @G104C3) AND (G104C12 = @G104C12) AN"& _ 
                "D (G104C13 = @G104C13)"
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(7).Connection = Me.Connection
            Me._commandCollection(7).CommandText = "SELECT IDPrescripteur, G1420C1, G1420C2, G1420C3, Assuré, G1511C2, AMC_Indicateur"& _ 
                "detrairement, AMC_CodeRoutage, AMC_Code_Aiguillage_STS, AMC_Critère_secondaire, "& _ 
                "AMC_IDassure, AMC_IdHote, AMC_NomDomaine, AMC_NumMutuelle, AMC_Type_Convention, "& _ 
                "AMC_IdentifiantAMC FROM Vitale WHERE (G101C8 = @G101C8) AND (G101C9 = @G101C9) A"& _ 
                "ND (G104C1 = @G104C1) AND (G104C2 = @G104C2) AND (G104C3 = @G104C3) AND (G104C12"& _ 
                " = @G104C12) AND (G104C14 = @G104C14)"
            Me._commandCollection(7).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(8).Connection = Me.Connection
            Me._commandCollection(8).CommandText = "SELECT      G104C1+' '+ G104C2+' '+  G104C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Vitale"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (G101C8 ="& _ 
                " @G101C8)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (G101C9 = @G101C9)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (G104C12 = @G104C12)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (G104C13 = @G10"& _ 
                "4C13)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (G104C14 = @G104C14)"
            Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(9).Connection = Me.Connection
            Me._commandCollection(9).CommandText = "UPDATE  [dbo].[Vitale]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"set [G101C1]=@G101C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C7]=@G101C7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C8]=@G101C"& _ 
                "8"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C9]=@G101C9"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C10]=@G101C10"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C11]=@G101C11"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C12]=@G101"& _ 
                "C12"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C1]=@G104C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C2]=@G104C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C3]=@G104C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C12]=@G104C1"& _ 
                "2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C13]=@G104C13"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C14]=@G104C14"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O1]=@G106C1O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O1]="& _ 
                "@G106C2O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O1]=@G106C3O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O1]=@G106C4O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O2]=@G106C1O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                ",[G106C2O2]=@G106C2O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O2]=@G106C3O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O2]=@G106C4O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O3]"& _ 
                "=@G106C1O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O3]=@G106C2O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O3]=@G106C3O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O3]=@G106C4O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O4]=@G106C1O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O4]=@G106C2O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O4]=@G106C3O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O4"& _ 
                "]=@G106C4O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O5]=@G106C1O5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O5]=@G106C2O5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O5]=@G106C3O5"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O5]=@G106C4O5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O6]=@G106C1O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O6]=@G106C2O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O"& _ 
                "6]=@G106C3O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O6]=@G106C4O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O7]=@G106C1O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O7]=@G106C2O"& _ 
                "7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O7]=@G106C3O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O7]=@G106C4O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[Assuré]=@Assuré"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G1420C1]=@"& _ 
                "G1420C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G1420C2]=@G1420C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G1420C3]=@G1420C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G1511C2]=@G1511C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE  ("& _ 
                "G101C8 = @G101C8) and (G104C12 = @G104C12) and (G104C13 = @G104C13) and (G104C14"& _ 
                " = @G104C14)"
            Me._commandCollection(9).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C1", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C2", Global.System.Data.SqlDbType.NVarChar, 12, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C3", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(10).Connection = Me.Connection
            Me._commandCollection(10).CommandText = "UPDATE  [dbo].[Vitale]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"set[G101C1]=@G101C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G101C2]=@G101C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C3]=@G101C3"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C7]=@G101C7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C8]=@G101C8"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C9]=@G101C9"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C10]=@G101C10"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                ",[G101C11]=@G101C11"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C12]=@G101C12"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G101C13]=@G101C13"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G102C1]=@G102C1"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G102C2]=@G102C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G102C3]=@G102C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C1]=@G103C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C2]=@G103C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",["& _ 
                "G103C3]=@G103C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C4]=@G103C4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C5]=@G103C5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C6]=@G103C6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103"& _ 
                "C7]=@G103C7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C8]=@G103C8"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G103C9]=@G103C9"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C1]=@G104C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C2]="& _ 
                "@G104C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C3]=@G104C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C4]=@G104C4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C5]=@G104C5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C6]=@G10"& _ 
                "4C6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C7]=@G104C7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C8]=@G104C8"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C9]=@G104C9"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C10]=@G104C1"& _ 
                "0"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C11]=@G104C11"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C12]=@G104C12"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C13]=@G104C13"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C14]=@G1"& _ 
                "04C14"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C15]=@G104C15"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C16]=@G104C16"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C17]=@G104C17"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G104C18]"& _ 
                "=@G104C18"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G105C1O1]=@G105C1O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G105C2O1]=@G105C2O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G105C1O2]=@G105C1O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                ",[G105C2O2]=@G105C2O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G105C1O3]=@G105C1O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G105C2O3]=@G105C2O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O1]"& _ 
                "=@G106C1O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O1]=@G106C2O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O1]=@G106C3O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O1]=@G106C4O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O2]=@G106C1O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O2]=@G106C2O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O2]=@G106C3O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O2"& _ 
                "]=@G106C4O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O3]=@G106C1O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O3]=@G106C2O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O3]=@G106C3O3"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O3]=@G106C4O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O4]=@G106C1O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O4]=@G106C2O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O"& _ 
                "4]=@G106C3O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O4]=@G106C4O4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O5]=@G106C1O5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O5]=@G106C2O"& _ 
                "5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O5]=@G106C3O5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O5]=@G106C4O5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O6]=@G106C1O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2"& _ 
                "O6]=@G106C2O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O6]=@G106C3O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O6]=@G106C4O6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C1O7]=@G106C1"& _ 
                "O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C2O7]=@G106C2O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C3O7]=@G106C3O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G106C4O7]=@G106C4O7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G107C"& _ 
                "1]=@G107C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G107C2]=@G107C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G107C3]=@G107C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G107C4]=@G107C4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G107C5]=@"& _ 
                "G107C5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G107C6]=@G107C6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G108C1O1]=@G108C1O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G108C2O1]=@G108C2O1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G108C"& _ 
                "1O2]=@G108C1O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G108C2O2]=@G108C2O2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G108C1O3]=@G108C1O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G108C2O3]=@G108C"& _ 
                "2O3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C1]=@G109C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C2]=@G109C2"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C3]=@G109C3"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C4]=@G109C4"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C5]=@G109C5"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C6]=@G109C6"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C7]=@G109C7"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C8]=@G109C8"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G"& _ 
                "109C9]=@G109C9"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C10]=@G109C10"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C11]=@G109C11"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[G109C12]=@G109C12"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&","& _ 
                "[G111C1]=@G111C1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_NumOrganisme]=@AMC_NumOrganisme"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_NumAdherent]=@AMC"& _ 
                "_NumAdherent"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_TypeContrat]=@AMC_TypeContrat"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_DateDébut]=@AMC_DateDéb"& _ 
                "ut"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_DateFin]=@AMC_DateFin"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_Piecejustificative]=@AMC_Piecejustificati"& _ 
                "ve"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_Indicateurdetrairement]=@AMC_Indicateurdetrairement"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_NumMutuelle"& _ 
                "]=@AMC_NumMutuelle"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_IDassure]=@AMC_IDassure"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_Code_Aiguillage_STS]=@A"& _ 
                "MC_Code_Aiguillage_STS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_CodeRoutage]=@AMC_CodeRoutage"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_IdHote]=@AMC_"& _ 
                "IdHote"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_NomDomaine]=@AMC_NomDomaine"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_Type_Convention]=@AMC_Type_Conv"& _ 
                "ention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_Critère_secondaire]=@AMC_Critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[IDPrescripteur]=@ID"& _ 
                "Prescripteur"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[AMC_IdentifiantAMC]=@AMC_IdentifiantAMC"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&",[Assuré]=@Assuré"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHER"& _ 
                "E  (G101C8 = @G101C8) and (G101C9 = @G101C9)  and (G104C12 = @G104C12) and (G104"& _ 
                "C13 = @G104C13) and (G104C14 = @G104C14)"
            Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G101C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G101C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G102C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G102C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G103C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G103C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C14", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C15", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C16", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C17", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C17", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G104C18", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G104C18", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G105C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G105C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C1O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C1O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C2O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C2O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C3O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C3O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G106C4O7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G106C4O7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G107C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G107C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C1O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C1O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G108C2O3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G108C2O3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G109C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G109C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G111C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G111C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumOrganisme", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumOrganisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumAdherent", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumAdherent", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_TypeContrat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_TypeContrat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateDébut", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateDébut", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_DateFin", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_DateFin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Piecejustificative", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Piecejustificative", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Indicateurdetrairement", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Indicateurdetrairement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NumMutuelle", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NumMutuelle", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IDassure", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IDassure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Code_Aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Code_Aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_CodeRoutage", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_CodeRoutage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdHote", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdHote", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_NomDomaine", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_NomDomaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Type_Convention", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Type_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_Critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_Critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AMC_IdentifiantAMC", Global.System.Data.SqlDbType.NVarChar, 15, Global.System.Data.ParameterDirection.Input, 0, 0, "AMC_IdentifiantAMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.VitaleDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.VitaleDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.VitaleDataTable = New PharmaDataSet.VitaleDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBénéficiaire(ByVal G101C8 As String, ByVal G104C12 As String, ByVal G104C13 As String, ByVal G104C14 As String) As PharmaDataSet.VitaleDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(G101C8,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                Me.Adapter.SelectCommand.Parameters(2).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                Me.Adapter.SelectCommand.Parameters(3).Value = CType(G104C14,String)
            End If
            Dim dataTable As PharmaDataSet.VitaleDataTable = New PharmaDataSet.VitaleDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByNom(ByVal searchedstring As String) As PharmaDataSet.VitaleDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (searchedstring Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(searchedstring,String)
            End If
            Dim dataTable As PharmaDataSet.VitaleDataTable = New PharmaDataSet.VitaleDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.VitaleDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Vitale")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)>  _
        Public Overloads Overridable Function Delete( _
                    ByVal Original_G101C2 As String,  _
                    ByVal Original_G101C3 As String,  _
                    ByVal Original_G101C7 As String,  _
                    ByVal Original_G101C8 As String,  _
                    ByVal Original_G101C9 As String,  _
                    ByVal Original_G101C10 As String,  _
                    ByVal Original_G101C11 As String,  _
                    ByVal Original_G101C12 As String,  _
                    ByVal Original_G101C13 As String,  _
                    ByVal Original_G102C1 As String,  _
                    ByVal Original_G102C2 As String,  _
                    ByVal Original_G102C3 As String,  _
                    ByVal Original_G103C1 As String,  _
                    ByVal Original_G103C2 As String,  _
                    ByVal Original_G103C3 As String,  _
                    ByVal Original_G103C4 As String,  _
                    ByVal Original_G103C5 As String,  _
                    ByVal Original_G103C6 As String,  _
                    ByVal Original_G103C7 As String,  _
                    ByVal Original_G103C8 As String,  _
                    ByVal Original_G103C9 As String,  _
                    ByVal Original_G104C1 As String,  _
                    ByVal Original_G104C2 As String,  _
                    ByVal Original_G104C3 As String,  _
                    ByVal Original_G104C4 As String,  _
                    ByVal Original_G104C5 As String,  _
                    ByVal Original_G104C6 As String,  _
                    ByVal Original_G104C7 As String,  _
                    ByVal Original_G104C8 As String,  _
                    ByVal Original_G104C9 As String,  _
                    ByVal Original_G104C10 As String,  _
                    ByVal Original_G104C11 As String,  _
                    ByVal Original_G104C12 As String,  _
                    ByVal Original_G104C13 As String,  _
                    ByVal Original_G104C14 As String,  _
                    ByVal Original_G104C15 As String,  _
                    ByVal Original_G104C16 As String,  _
                    ByVal Original_G104C17 As String,  _
                    ByVal Original_G104C18 As String,  _
                    ByVal Original_G105C1O1 As String,  _
                    ByVal Original_G105C2O1 As String,  _
                    ByVal Original_G105C1O2 As String,  _
                    ByVal Original_G105C2O2 As String,  _
                    ByVal Original_G105C1O3 As String,  _
                    ByVal Original_G105C2O3 As String,  _
                    ByVal Original_G106C1O1 As String,  _
                    ByVal Original_G106C2O1 As String,  _
                    ByVal Original_G106C3O1 As String,  _
                    ByVal Original_G106C4O1 As String,  _
                    ByVal Original_G106C1O2 As String,  _
                    ByVal Original_G106C2O2 As String,  _
                    ByVal Original_G106C3O2 As String,  _
                    ByVal Original_G106C4O2 As String,  _
                    ByVal Original_G106C1O3 As String,  _
                    ByVal Original_G106C2O3 As String,  _
                    ByVal Original_G106C3O3 As String,  _
                    ByVal Original_G106C4O3 As String,  _
                    ByVal Original_G106C1O4 As String,  _
                    ByVal Original_G106C2O4 As String,  _
                    ByVal Original_G106C3O4 As String,  _
                    ByVal Original_G106C4O4 As String,  _
                    ByVal Original_G106C1O5 As String,  _
                    ByVal Original_G106C2O5 As String,  _
                    ByVal Original_G106C3O5 As String,  _
                    ByVal Original_G106C4O5 As String,  _
                    ByVal Original_G106C1O6 As String,  _
                    ByVal Original_G106C2O6 As String,  _
                    ByVal Original_G106C3O6 As String,  _
                    ByVal Original_G106C4O6 As String,  _
                    ByVal Original_G106C1O7 As String,  _
                    ByVal Original_G106C2O7 As String,  _
                    ByVal Original_G106C3O7 As String,  _
                    ByVal Original_G106C4O7 As String,  _
                    ByVal Original_G107C1 As String,  _
                    ByVal Original_G107C2 As String,  _
                    ByVal Original_G107C3 As String,  _
                    ByVal Original_G107C4 As String,  _
                    ByVal Original_G107C5 As String,  _
                    ByVal Original_G107C6 As String,  _
                    ByVal Original_G108C1O1 As String,  _
                    ByVal Original_G108C2O1 As String,  _
                    ByVal Original_G108C1O2 As String,  _
                    ByVal Original_G108C2O2 As String,  _
                    ByVal Original_G108C1O3 As String,  _
                    ByVal Original_G108C2O3 As String,  _
                    ByVal Original_G109C1 As String,  _
                    ByVal Original_G109C2 As String,  _
                    ByVal Original_G109C3 As String,  _
                    ByVal Original_G109C4 As String,  _
                    ByVal Original_G109C5 As String,  _
                    ByVal Original_G109C6 As String,  _
                    ByVal Original_G109C7 As String,  _
                    ByVal Original_G109C8 As String,  _
                    ByVal Original_G109C9 As String,  _
                    ByVal Original_G109C10 As String,  _
                    ByVal Original_G109C11 As String,  _
                    ByVal Original_G109C12 As String,  _
                    ByVal Original_G111C1 As String,  _
                    ByVal Original_G101C1 As String,  _
                    ByVal Original_G101C14 As String,  _
                    ByVal Original_G101C5 As String,  _
                    ByVal Original_G101C6 As String,  _
                    ByVal Original_IDPrescripteur As String,  _
                    ByVal Original_AMC_DateDébut As String,  _
                    ByVal Original_AMC_DateFin As String,  _
                    ByVal Original_AMC_NumAdherent As String,  _
                    ByVal Original_AMC_NumOrganisme As String,  _
                    ByVal Original_AMC_Piecejustificative As String,  _
                    ByVal Original_AMC_TypeContrat As String,  _
                    ByVal Original_G1420C1 As String,  _
                    ByVal Original_G1420C2 As String,  _
                    ByVal Original_G1420C3 As String,  _
                    ByVal Original_G1511C2 As String,  _
                    ByVal Original_AMC_Indicateurdetrairement As String,  _
                    ByVal Original_AMC_CodeRoutage As String,  _
                    ByVal Original_AMC_Code_Aiguillage_STS As String,  _
                    ByVal Original_AMC_Critère_secondaire As String,  _
                    ByVal Original_AMC_IDassure As String,  _
                    ByVal Original_AMC_IdHote As String,  _
                    ByVal Original_AMC_NomDomaine As String,  _
                    ByVal Original_AMC_NumMutuelle As String,  _
                    ByVal Original_AMC_Type_Convention As String) As Integer
            If (Original_G101C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(0).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(0).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(Original_G101C2,String)
            End If
            If (Original_G101C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(2).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(2).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(Original_G101C3,String)
            End If
            If (Original_G101C7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(4).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(4).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(Original_G101C7,String)
            End If
            If (Original_G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G101C8")
            Else
                Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_G101C8,String)
            End If
            If (Original_G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G101C9")
            Else
                Me.Adapter.DeleteCommand.Parameters(7).Value = CType(Original_G101C9,String)
            End If
            If (Original_G101C10 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(8).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(8).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(9).Value = CType(Original_G101C10,String)
            End If
            If (Original_G101C11 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(10).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(10).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(11).Value = CType(Original_G101C11,String)
            End If
            If (Original_G101C12 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(12).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(12).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(13).Value = CType(Original_G101C12,String)
            End If
            If (Original_G101C13 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(14).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(14).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(15).Value = CType(Original_G101C13,String)
            End If
            If (Original_G102C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(16).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(16).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(17).Value = CType(Original_G102C1,String)
            End If
            If (Original_G102C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(18).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(18).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(19).Value = CType(Original_G102C2,String)
            End If
            If (Original_G102C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(20).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(20).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(21).Value = CType(Original_G102C3,String)
            End If
            If (Original_G103C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(22).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(22).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(23).Value = CType(Original_G103C1,String)
            End If
            If (Original_G103C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(24).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(24).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(25).Value = CType(Original_G103C2,String)
            End If
            If (Original_G103C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(26).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(26).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(27).Value = CType(Original_G103C3,String)
            End If
            If (Original_G103C4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(28).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(28).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(29).Value = CType(Original_G103C4,String)
            End If
            If (Original_G103C5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(30).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(31).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(30).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(31).Value = CType(Original_G103C5,String)
            End If
            If (Original_G103C6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(32).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(33).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(32).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(33).Value = CType(Original_G103C6,String)
            End If
            If (Original_G103C7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(34).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(35).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(34).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(35).Value = CType(Original_G103C7,String)
            End If
            If (Original_G103C8 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(36).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(37).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(36).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(37).Value = CType(Original_G103C8,String)
            End If
            If (Original_G103C9 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(38).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(39).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(38).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(39).Value = CType(Original_G103C9,String)
            End If
            If (Original_G104C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(40).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(41).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(40).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(41).Value = CType(Original_G104C1,String)
            End If
            If (Original_G104C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(42).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(43).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(42).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(43).Value = CType(Original_G104C2,String)
            End If
            If (Original_G104C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(44).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(45).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(44).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(45).Value = CType(Original_G104C3,String)
            End If
            If (Original_G104C4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(46).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(47).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(46).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(47).Value = CType(Original_G104C4,String)
            End If
            If (Original_G104C5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(48).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(49).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(48).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(49).Value = CType(Original_G104C5,String)
            End If
            If (Original_G104C6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(50).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(51).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(50).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(51).Value = CType(Original_G104C6,String)
            End If
            If (Original_G104C7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(52).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(53).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(52).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(53).Value = CType(Original_G104C7,String)
            End If
            If (Original_G104C8 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(54).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(55).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(54).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(55).Value = CType(Original_G104C8,String)
            End If
            If (Original_G104C9 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(56).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(57).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(56).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(57).Value = CType(Original_G104C9,String)
            End If
            If (Original_G104C10 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(58).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(59).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(58).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(59).Value = CType(Original_G104C10,String)
            End If
            If (Original_G104C11 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(60).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(61).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(60).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(61).Value = CType(Original_G104C11,String)
            End If
            If (Original_G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G104C12")
            Else
                Me.Adapter.DeleteCommand.Parameters(62).Value = CType(Original_G104C12,String)
            End If
            If (Original_G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G104C13")
            Else
                Me.Adapter.DeleteCommand.Parameters(63).Value = CType(Original_G104C13,String)
            End If
            If (Original_G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G104C14")
            Else
                Me.Adapter.DeleteCommand.Parameters(64).Value = CType(Original_G104C14,String)
            End If
            If (Original_G104C15 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(65).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(66).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(65).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(66).Value = CType(Original_G104C15,String)
            End If
            If (Original_G104C16 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(67).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(68).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(67).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(68).Value = CType(Original_G104C16,String)
            End If
            If (Original_G104C17 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(69).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(70).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(69).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(70).Value = CType(Original_G104C17,String)
            End If
            If (Original_G104C18 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(71).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(72).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(71).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(72).Value = CType(Original_G104C18,String)
            End If
            If (Original_G105C1O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(73).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(74).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(73).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(74).Value = CType(Original_G105C1O1,String)
            End If
            If (Original_G105C2O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(75).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(76).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(75).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(76).Value = CType(Original_G105C2O1,String)
            End If
            If (Original_G105C1O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(77).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(78).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(77).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(78).Value = CType(Original_G105C1O2,String)
            End If
            If (Original_G105C2O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(79).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(80).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(79).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(80).Value = CType(Original_G105C2O2,String)
            End If
            If (Original_G105C1O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(81).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(82).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(81).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(82).Value = CType(Original_G105C1O3,String)
            End If
            If (Original_G105C2O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(83).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(84).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(83).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(84).Value = CType(Original_G105C2O3,String)
            End If
            If (Original_G106C1O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(85).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(86).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(85).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(86).Value = CType(Original_G106C1O1,String)
            End If
            If (Original_G106C2O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(87).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(88).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(87).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(88).Value = CType(Original_G106C2O1,String)
            End If
            If (Original_G106C3O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(89).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(90).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(89).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(90).Value = CType(Original_G106C3O1,String)
            End If
            If (Original_G106C4O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(91).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(92).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(91).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(92).Value = CType(Original_G106C4O1,String)
            End If
            If (Original_G106C1O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(93).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(94).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(93).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(94).Value = CType(Original_G106C1O2,String)
            End If
            If (Original_G106C2O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(95).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(96).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(95).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(96).Value = CType(Original_G106C2O2,String)
            End If
            If (Original_G106C3O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(97).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(98).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(97).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(98).Value = CType(Original_G106C3O2,String)
            End If
            If (Original_G106C4O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(99).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(100).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(99).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(100).Value = CType(Original_G106C4O2,String)
            End If
            If (Original_G106C1O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(101).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(102).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(101).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(102).Value = CType(Original_G106C1O3,String)
            End If
            If (Original_G106C2O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(103).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(104).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(103).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(104).Value = CType(Original_G106C2O3,String)
            End If
            If (Original_G106C3O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(105).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(106).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(105).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(106).Value = CType(Original_G106C3O3,String)
            End If
            If (Original_G106C4O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(107).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(108).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(107).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(108).Value = CType(Original_G106C4O3,String)
            End If
            If (Original_G106C1O4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(109).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(110).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(109).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(110).Value = CType(Original_G106C1O4,String)
            End If
            If (Original_G106C2O4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(111).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(112).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(111).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(112).Value = CType(Original_G106C2O4,String)
            End If
            If (Original_G106C3O4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(113).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(114).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(113).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(114).Value = CType(Original_G106C3O4,String)
            End If
            If (Original_G106C4O4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(115).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(116).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(115).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(116).Value = CType(Original_G106C4O4,String)
            End If
            If (Original_G106C1O5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(117).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(118).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(117).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(118).Value = CType(Original_G106C1O5,String)
            End If
            If (Original_G106C2O5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(119).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(120).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(119).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(120).Value = CType(Original_G106C2O5,String)
            End If
            If (Original_G106C3O5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(121).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(122).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(121).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(122).Value = CType(Original_G106C3O5,String)
            End If
            If (Original_G106C4O5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(123).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(124).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(123).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(124).Value = CType(Original_G106C4O5,String)
            End If
            If (Original_G106C1O6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(125).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(126).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(125).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(126).Value = CType(Original_G106C1O6,String)
            End If
            If (Original_G106C2O6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(127).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(128).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(127).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(128).Value = CType(Original_G106C2O6,String)
            End If
            If (Original_G106C3O6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(129).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(130).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(129).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(130).Value = CType(Original_G106C3O6,String)
            End If
            If (Original_G106C4O6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(131).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(132).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(131).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(132).Value = CType(Original_G106C4O6,String)
            End If
            If (Original_G106C1O7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(133).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(134).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(133).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(134).Value = CType(Original_G106C1O7,String)
            End If
            If (Original_G106C2O7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(135).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(136).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(135).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(136).Value = CType(Original_G106C2O7,String)
            End If
            If (Original_G106C3O7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(137).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(138).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(137).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(138).Value = CType(Original_G106C3O7,String)
            End If
            If (Original_G106C4O7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(139).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(140).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(139).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(140).Value = CType(Original_G106C4O7,String)
            End If
            If (Original_G107C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(141).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(142).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(141).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(142).Value = CType(Original_G107C1,String)
            End If
            If (Original_G107C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(143).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(144).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(143).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(144).Value = CType(Original_G107C2,String)
            End If
            If (Original_G107C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(145).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(146).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(145).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(146).Value = CType(Original_G107C3,String)
            End If
            If (Original_G107C4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(147).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(148).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(147).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(148).Value = CType(Original_G107C4,String)
            End If
            If (Original_G107C5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(149).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(150).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(149).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(150).Value = CType(Original_G107C5,String)
            End If
            If (Original_G107C6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(151).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(152).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(151).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(152).Value = CType(Original_G107C6,String)
            End If
            If (Original_G108C1O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(153).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(154).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(153).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(154).Value = CType(Original_G108C1O1,String)
            End If
            If (Original_G108C2O1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(155).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(156).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(155).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(156).Value = CType(Original_G108C2O1,String)
            End If
            If (Original_G108C1O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(157).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(158).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(157).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(158).Value = CType(Original_G108C1O2,String)
            End If
            If (Original_G108C2O2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(159).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(160).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(159).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(160).Value = CType(Original_G108C2O2,String)
            End If
            If (Original_G108C1O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(161).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(162).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(161).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(162).Value = CType(Original_G108C1O3,String)
            End If
            If (Original_G108C2O3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(163).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(164).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(163).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(164).Value = CType(Original_G108C2O3,String)
            End If
            If (Original_G109C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(165).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(166).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(165).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(166).Value = CType(Original_G109C1,String)
            End If
            If (Original_G109C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(167).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(168).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(167).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(168).Value = CType(Original_G109C2,String)
            End If
            If (Original_G109C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(169).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(170).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(169).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(170).Value = CType(Original_G109C3,String)
            End If
            If (Original_G109C4 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(171).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(172).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(171).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(172).Value = CType(Original_G109C4,String)
            End If
            If (Original_G109C5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(173).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(174).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(173).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(174).Value = CType(Original_G109C5,String)
            End If
            If (Original_G109C6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(175).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(176).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(175).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(176).Value = CType(Original_G109C6,String)
            End If
            If (Original_G109C7 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(177).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(178).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(177).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(178).Value = CType(Original_G109C7,String)
            End If
            If (Original_G109C8 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(179).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(180).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(179).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(180).Value = CType(Original_G109C8,String)
            End If
            If (Original_G109C9 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(181).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(182).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(181).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(182).Value = CType(Original_G109C9,String)
            End If
            If (Original_G109C10 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(183).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(184).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(183).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(184).Value = CType(Original_G109C10,String)
            End If
            If (Original_G109C11 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(185).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(186).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(185).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(186).Value = CType(Original_G109C11,String)
            End If
            If (Original_G109C12 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(187).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(188).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(187).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(188).Value = CType(Original_G109C12,String)
            End If
            If (Original_G111C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(189).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(190).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(189).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(190).Value = CType(Original_G111C1,String)
            End If
            If (Original_G101C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(191).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(192).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(191).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(192).Value = CType(Original_G101C1,String)
            End If
            If (Original_G101C14 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(193).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(194).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(193).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(194).Value = CType(Original_G101C14,String)
            End If
            If (Original_G101C5 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(195).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(196).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(195).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(196).Value = CType(Original_G101C5,String)
            End If
            If (Original_G101C6 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(197).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(198).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(197).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(198).Value = CType(Original_G101C6,String)
            End If
            If (Original_IDPrescripteur Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(199).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(200).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(199).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(200).Value = CType(Original_IDPrescripteur,String)
            End If
            If (Original_AMC_DateDébut Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(201).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(202).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(201).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(202).Value = CType(Original_AMC_DateDébut,String)
            End If
            If (Original_AMC_DateFin Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(203).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(204).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(203).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(204).Value = CType(Original_AMC_DateFin,String)
            End If
            If (Original_AMC_NumAdherent Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(205).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(206).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(205).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(206).Value = CType(Original_AMC_NumAdherent,String)
            End If
            If (Original_AMC_NumOrganisme Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(207).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(208).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(207).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(208).Value = CType(Original_AMC_NumOrganisme,String)
            End If
            If (Original_AMC_Piecejustificative Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(209).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(210).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(209).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(210).Value = CType(Original_AMC_Piecejustificative,String)
            End If
            If (Original_AMC_TypeContrat Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(211).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(212).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(211).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(212).Value = CType(Original_AMC_TypeContrat,String)
            End If
            If (Original_G1420C1 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(213).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(214).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(213).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(214).Value = CType(Original_G1420C1,String)
            End If
            If (Original_G1420C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(215).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(216).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(215).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(216).Value = CType(Original_G1420C2,String)
            End If
            If (Original_G1420C3 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(217).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(218).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(217).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(218).Value = CType(Original_G1420C3,String)
            End If
            If (Original_G1511C2 Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(219).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(220).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(219).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(220).Value = CType(Original_G1511C2,String)
            End If
            If (Original_AMC_Indicateurdetrairement Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(221).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(222).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(221).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(222).Value = CType(Original_AMC_Indicateurdetrairement,String)
            End If
            If (Original_AMC_CodeRoutage Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(223).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(224).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(223).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(224).Value = CType(Original_AMC_CodeRoutage,String)
            End If
            If (Original_AMC_Code_Aiguillage_STS Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(225).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(226).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(225).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(226).Value = CType(Original_AMC_Code_Aiguillage_STS,String)
            End If
            If (Original_AMC_Critère_secondaire Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(227).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(228).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(227).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(228).Value = CType(Original_AMC_Critère_secondaire,String)
            End If
            If (Original_AMC_IDassure Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(229).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(230).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(229).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(230).Value = CType(Original_AMC_IDassure,String)
            End If
            If (Original_AMC_IdHote Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(231).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(232).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(231).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(232).Value = CType(Original_AMC_IdHote,String)
            End If
            If (Original_AMC_NomDomaine Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(233).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(234).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(233).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(234).Value = CType(Original_AMC_NomDomaine,String)
            End If
            If (Original_AMC_NumMutuelle Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(235).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(236).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(235).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(236).Value = CType(Original_AMC_NumMutuelle,String)
            End If
            If (Original_AMC_Type_Convention Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(237).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(238).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(237).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(238).Value = CType(Original_AMC_Type_Convention,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
            If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.DeleteCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.DeleteCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal G101C2 As String,  _
                    ByVal G101C3 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G101C13 As String,  _
                    ByVal G102C1 As String,  _
                    ByVal G102C2 As String,  _
                    ByVal G102C3 As String,  _
                    ByVal G103C1 As String,  _
                    ByVal G103C2 As String,  _
                    ByVal G103C3 As String,  _
                    ByVal G103C4 As String,  _
                    ByVal G103C5 As String,  _
                    ByVal G103C6 As String,  _
                    ByVal G103C7 As String,  _
                    ByVal G103C8 As String,  _
                    ByVal G103C9 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C4 As String,  _
                    ByVal G104C5 As String,  _
                    ByVal G104C6 As String,  _
                    ByVal G104C7 As String,  _
                    ByVal G104C8 As String,  _
                    ByVal G104C9 As String,  _
                    ByVal G104C10 As String,  _
                    ByVal G104C11 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G104C15 As String,  _
                    ByVal G104C16 As String,  _
                    ByVal G104C17 As String,  _
                    ByVal G104C18 As String,  _
                    ByVal G105C1O1 As String,  _
                    ByVal G105C2O1 As String,  _
                    ByVal G105C1O2 As String,  _
                    ByVal G105C2O2 As String,  _
                    ByVal G105C1O3 As String,  _
                    ByVal G105C2O3 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal G107C1 As String,  _
                    ByVal G107C2 As String,  _
                    ByVal G107C3 As String,  _
                    ByVal G107C4 As String,  _
                    ByVal G107C5 As String,  _
                    ByVal G107C6 As String,  _
                    ByVal G108C1O1 As String,  _
                    ByVal G108C2O1 As String,  _
                    ByVal G108C1O2 As String,  _
                    ByVal G108C2O2 As String,  _
                    ByVal G108C1O3 As String,  _
                    ByVal G108C2O3 As String,  _
                    ByVal G109C1 As String,  _
                    ByVal G109C2 As String,  _
                    ByVal G109C3 As String,  _
                    ByVal G109C4 As String,  _
                    ByVal G109C5 As String,  _
                    ByVal G109C6 As String,  _
                    ByVal G109C7 As String,  _
                    ByVal G109C8 As String,  _
                    ByVal G109C9 As String,  _
                    ByVal G109C10 As String,  _
                    ByVal G109C11 As String,  _
                    ByVal G109C12 As String,  _
                    ByVal G111C1 As String,  _
                    ByVal G101C1 As String,  _
                    ByVal G101C14 As String,  _
                    ByVal G101C5 As String,  _
                    ByVal G101C6 As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal AMC_DateDébut As String,  _
                    ByVal AMC_DateFin As String,  _
                    ByVal AMC_NumAdherent As String,  _
                    ByVal AMC_NumOrganisme As String,  _
                    ByVal AMC_Piecejustificative As String,  _
                    ByVal AMC_TypeContrat As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal Assuré As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal AMC_Indicateurdetrairement As String,  _
                    ByVal AMC_CodeRoutage As String,  _
                    ByVal AMC_Code_Aiguillage_STS As String,  _
                    ByVal AMC_Critère_secondaire As String,  _
                    ByVal AMC_IDassure As String,  _
                    ByVal AMC_IdHote As String,  _
                    ByVal AMC_NomDomaine As String,  _
                    ByVal AMC_NumMutuelle As String,  _
                    ByVal AMC_Type_Convention As String,  _
                    ByVal AMC_IdentifiantAMC As String) As Integer
            If (G101C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(G101C2,String)
            End If
            If (G101C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(G101C3,String)
            End If
            If (G101C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(G101C7,String)
            End If
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(G101C9,String)
            End If
            If (G101C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(G101C10,String)
            End If
            If (G101C11 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(G101C11,String)
            End If
            If (G101C12 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(G101C12,String)
            End If
            If (G101C13 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(G101C13,String)
            End If
            If (G102C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(G102C1,String)
            End If
            If (G102C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(G102C2,String)
            End If
            If (G102C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(G102C3,String)
            End If
            If (G103C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(G103C1,String)
            End If
            If (G103C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(G103C2,String)
            End If
            If (G103C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(G103C3,String)
            End If
            If (G103C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(G103C4,String)
            End If
            If (G103C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(G103C5,String)
            End If
            If (G103C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(G103C6,String)
            End If
            If (G103C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(G103C7,String)
            End If
            If (G103C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(G103C8,String)
            End If
            If (G103C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(G103C9,String)
            End If
            If (G104C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(22).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(23).Value = CType(G104C3,String)
            End If
            If (G104C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(24).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(24).Value = CType(G104C4,String)
            End If
            If (G104C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(25).Value = CType(G104C5,String)
            End If
            If (G104C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(26).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(26).Value = CType(G104C6,String)
            End If
            If (G104C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(27).Value = CType(G104C7,String)
            End If
            If (G104C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(28).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(28).Value = CType(G104C8,String)
            End If
            If (G104C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(29).Value = CType(G104C9,String)
            End If
            If (G104C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(30).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(30).Value = CType(G104C10,String)
            End If
            If (G104C11 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(31).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(31).Value = CType(G104C11,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                Me.Adapter.InsertCommand.Parameters(32).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                Me.Adapter.InsertCommand.Parameters(33).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                Me.Adapter.InsertCommand.Parameters(34).Value = CType(G104C14,String)
            End If
            If (G104C15 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(35).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(35).Value = CType(G104C15,String)
            End If
            If (G104C16 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(36).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(36).Value = CType(G104C16,String)
            End If
            If (G104C17 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(37).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(37).Value = CType(G104C17,String)
            End If
            If (G104C18 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(38).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(38).Value = CType(G104C18,String)
            End If
            If (G105C1O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(39).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(39).Value = CType(G105C1O1,String)
            End If
            If (G105C2O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(40).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(40).Value = CType(G105C2O1,String)
            End If
            If (G105C1O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(41).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(41).Value = CType(G105C1O2,String)
            End If
            If (G105C2O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(42).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(42).Value = CType(G105C2O2,String)
            End If
            If (G105C1O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(43).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(43).Value = CType(G105C1O3,String)
            End If
            If (G105C2O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(44).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(44).Value = CType(G105C2O3,String)
            End If
            If (G106C1O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(45).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(45).Value = CType(G106C1O1,String)
            End If
            If (G106C2O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(46).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(46).Value = CType(G106C2O1,String)
            End If
            If (G106C3O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(47).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(47).Value = CType(G106C3O1,String)
            End If
            If (G106C4O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(48).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(48).Value = CType(G106C4O1,String)
            End If
            If (G106C1O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(49).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(49).Value = CType(G106C1O2,String)
            End If
            If (G106C2O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(50).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(50).Value = CType(G106C2O2,String)
            End If
            If (G106C3O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(51).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(51).Value = CType(G106C3O2,String)
            End If
            If (G106C4O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(52).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(52).Value = CType(G106C4O2,String)
            End If
            If (G106C1O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(53).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(53).Value = CType(G106C1O3,String)
            End If
            If (G106C2O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(54).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(54).Value = CType(G106C2O3,String)
            End If
            If (G106C3O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(55).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(55).Value = CType(G106C3O3,String)
            End If
            If (G106C4O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(56).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(56).Value = CType(G106C4O3,String)
            End If
            If (G106C1O4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(57).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(57).Value = CType(G106C1O4,String)
            End If
            If (G106C2O4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(58).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(58).Value = CType(G106C2O4,String)
            End If
            If (G106C3O4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(59).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(59).Value = CType(G106C3O4,String)
            End If
            If (G106C4O4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(60).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(60).Value = CType(G106C4O4,String)
            End If
            If (G106C1O5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(61).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(61).Value = CType(G106C1O5,String)
            End If
            If (G106C2O5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(62).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(62).Value = CType(G106C2O5,String)
            End If
            If (G106C3O5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(63).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(63).Value = CType(G106C3O5,String)
            End If
            If (G106C4O5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(64).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(64).Value = CType(G106C4O5,String)
            End If
            If (G106C1O6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(65).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(65).Value = CType(G106C1O6,String)
            End If
            If (G106C2O6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(66).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(66).Value = CType(G106C2O6,String)
            End If
            If (G106C3O6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(67).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(67).Value = CType(G106C3O6,String)
            End If
            If (G106C4O6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(68).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(68).Value = CType(G106C4O6,String)
            End If
            If (G106C1O7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(69).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(69).Value = CType(G106C1O7,String)
            End If
            If (G106C2O7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(70).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(70).Value = CType(G106C2O7,String)
            End If
            If (G106C3O7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(71).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(71).Value = CType(G106C3O7,String)
            End If
            If (G106C4O7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(72).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(72).Value = CType(G106C4O7,String)
            End If
            If (G107C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(73).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(73).Value = CType(G107C1,String)
            End If
            If (G107C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(74).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(74).Value = CType(G107C2,String)
            End If
            If (G107C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(75).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(75).Value = CType(G107C3,String)
            End If
            If (G107C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(76).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(76).Value = CType(G107C4,String)
            End If
            If (G107C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(77).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(77).Value = CType(G107C5,String)
            End If
            If (G107C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(78).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(78).Value = CType(G107C6,String)
            End If
            If (G108C1O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(79).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(79).Value = CType(G108C1O1,String)
            End If
            If (G108C2O1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(80).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(80).Value = CType(G108C2O1,String)
            End If
            If (G108C1O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(81).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(81).Value = CType(G108C1O2,String)
            End If
            If (G108C2O2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(82).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(82).Value = CType(G108C2O2,String)
            End If
            If (G108C1O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(83).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(83).Value = CType(G108C1O3,String)
            End If
            If (G108C2O3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(84).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(84).Value = CType(G108C2O3,String)
            End If
            If (G109C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(85).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(85).Value = CType(G109C1,String)
            End If
            If (G109C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(86).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(86).Value = CType(G109C2,String)
            End If
            If (G109C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(87).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(87).Value = CType(G109C3,String)
            End If
            If (G109C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(88).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(88).Value = CType(G109C4,String)
            End If
            If (G109C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(89).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(89).Value = CType(G109C5,String)
            End If
            If (G109C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(90).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(90).Value = CType(G109C6,String)
            End If
            If (G109C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(91).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(91).Value = CType(G109C7,String)
            End If
            If (G109C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(92).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(92).Value = CType(G109C8,String)
            End If
            If (G109C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(93).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(93).Value = CType(G109C9,String)
            End If
            If (G109C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(94).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(94).Value = CType(G109C10,String)
            End If
            If (G109C11 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(95).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(95).Value = CType(G109C11,String)
            End If
            If (G109C12 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(96).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(96).Value = CType(G109C12,String)
            End If
            If (G111C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(97).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(97).Value = CType(G111C1,String)
            End If
            If (G101C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(98).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(98).Value = CType(G101C1,String)
            End If
            If (G101C14 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(99).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(99).Value = CType(G101C14,String)
            End If
            If (G101C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(100).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(100).Value = CType(G101C5,String)
            End If
            If (G101C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(101).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(101).Value = CType(G101C6,String)
            End If
            If (IDPrescripteur Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(102).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(102).Value = CType(IDPrescripteur,String)
            End If
            If (AMC_DateDébut Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(103).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(103).Value = CType(AMC_DateDébut,String)
            End If
            If (AMC_DateFin Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(104).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(104).Value = CType(AMC_DateFin,String)
            End If
            If (AMC_NumAdherent Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(105).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(105).Value = CType(AMC_NumAdherent,String)
            End If
            If (AMC_NumOrganisme Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(106).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(106).Value = CType(AMC_NumOrganisme,String)
            End If
            If (AMC_Piecejustificative Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(107).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(107).Value = CType(AMC_Piecejustificative,String)
            End If
            If (AMC_TypeContrat Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(108).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(108).Value = CType(AMC_TypeContrat,String)
            End If
            If (G1420C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(109).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(109).Value = CType(G1420C1,String)
            End If
            If (G1420C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(110).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(110).Value = CType(G1420C2,String)
            End If
            If (G1420C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(111).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(111).Value = CType(G1420C3,String)
            End If
            If (Assuré Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(112).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(112).Value = CType(Assuré,String)
            End If
            If (G1511C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(113).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(113).Value = CType(G1511C2,String)
            End If
            If (AMC_Indicateurdetrairement Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(114).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(114).Value = CType(AMC_Indicateurdetrairement,String)
            End If
            If (AMC_CodeRoutage Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(115).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(115).Value = CType(AMC_CodeRoutage,String)
            End If
            If (AMC_Code_Aiguillage_STS Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(116).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(116).Value = CType(AMC_Code_Aiguillage_STS,String)
            End If
            If (AMC_Critère_secondaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(117).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(117).Value = CType(AMC_Critère_secondaire,String)
            End If
            If (AMC_IDassure Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(118).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(118).Value = CType(AMC_IDassure,String)
            End If
            If (AMC_IdHote Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(119).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(119).Value = CType(AMC_IdHote,String)
            End If
            If (AMC_NomDomaine Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(120).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(120).Value = CType(AMC_NomDomaine,String)
            End If
            If (AMC_NumMutuelle Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(121).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(121).Value = CType(AMC_NumMutuelle,String)
            End If
            If (AMC_Type_Convention Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(122).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(122).Value = CType(AMC_Type_Convention,String)
            End If
            If (AMC_IdentifiantAMC Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(123).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(123).Value = CType(AMC_IdentifiantAMC,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update( _
                    ByVal G101C2 As String,  _
                    ByVal G101C3 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G101C13 As String,  _
                    ByVal G102C1 As String,  _
                    ByVal G102C2 As String,  _
                    ByVal G102C3 As String,  _
                    ByVal G103C1 As String,  _
                    ByVal G103C2 As String,  _
                    ByVal G103C3 As String,  _
                    ByVal G103C4 As String,  _
                    ByVal G103C5 As String,  _
                    ByVal G103C6 As String,  _
                    ByVal G103C7 As String,  _
                    ByVal G103C8 As String,  _
                    ByVal G103C9 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C4 As String,  _
                    ByVal G104C5 As String,  _
                    ByVal G104C6 As String,  _
                    ByVal G104C7 As String,  _
                    ByVal G104C8 As String,  _
                    ByVal G104C9 As String,  _
                    ByVal G104C10 As String,  _
                    ByVal G104C11 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G104C15 As String,  _
                    ByVal G104C16 As String,  _
                    ByVal G104C17 As String,  _
                    ByVal G104C18 As String,  _
                    ByVal G105C1O1 As String,  _
                    ByVal G105C2O1 As String,  _
                    ByVal G105C1O2 As String,  _
                    ByVal G105C2O2 As String,  _
                    ByVal G105C1O3 As String,  _
                    ByVal G105C2O3 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal G107C1 As String,  _
                    ByVal G107C2 As String,  _
                    ByVal G107C3 As String,  _
                    ByVal G107C4 As String,  _
                    ByVal G107C5 As String,  _
                    ByVal G107C6 As String,  _
                    ByVal G108C1O1 As String,  _
                    ByVal G108C2O1 As String,  _
                    ByVal G108C1O2 As String,  _
                    ByVal G108C2O2 As String,  _
                    ByVal G108C1O3 As String,  _
                    ByVal G108C2O3 As String,  _
                    ByVal G109C1 As String,  _
                    ByVal G109C2 As String,  _
                    ByVal G109C3 As String,  _
                    ByVal G109C4 As String,  _
                    ByVal G109C5 As String,  _
                    ByVal G109C6 As String,  _
                    ByVal G109C7 As String,  _
                    ByVal G109C8 As String,  _
                    ByVal G109C9 As String,  _
                    ByVal G109C10 As String,  _
                    ByVal G109C11 As String,  _
                    ByVal G109C12 As String,  _
                    ByVal G111C1 As String,  _
                    ByVal G101C1 As String,  _
                    ByVal G101C14 As String,  _
                    ByVal G101C5 As String,  _
                    ByVal G101C6 As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal AMC_DateDébut As String,  _
                    ByVal AMC_DateFin As String,  _
                    ByVal AMC_NumAdherent As String,  _
                    ByVal AMC_NumOrganisme As String,  _
                    ByVal AMC_Piecejustificative As String,  _
                    ByVal AMC_TypeContrat As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal Assuré As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal AMC_Indicateurdetrairement As String,  _
                    ByVal AMC_CodeRoutage As String,  _
                    ByVal AMC_Code_Aiguillage_STS As String,  _
                    ByVal AMC_Critère_secondaire As String,  _
                    ByVal AMC_IDassure As String,  _
                    ByVal AMC_IdHote As String,  _
                    ByVal AMC_NomDomaine As String,  _
                    ByVal AMC_NumMutuelle As String,  _
                    ByVal AMC_Type_Convention As String,  _
                    ByVal Original_G101C2 As String,  _
                    ByVal Original_G101C3 As String,  _
                    ByVal Original_G101C7 As String,  _
                    ByVal Original_G101C8 As String,  _
                    ByVal Original_G101C9 As String,  _
                    ByVal Original_G101C10 As String,  _
                    ByVal Original_G101C11 As String,  _
                    ByVal Original_G101C12 As String,  _
                    ByVal Original_G101C13 As String,  _
                    ByVal Original_G102C1 As String,  _
                    ByVal Original_G102C2 As String,  _
                    ByVal Original_G102C3 As String,  _
                    ByVal Original_G103C1 As String,  _
                    ByVal Original_G103C2 As String,  _
                    ByVal Original_G103C3 As String,  _
                    ByVal Original_G103C4 As String,  _
                    ByVal Original_G103C5 As String,  _
                    ByVal Original_G103C6 As String,  _
                    ByVal Original_G103C7 As String,  _
                    ByVal Original_G103C8 As String,  _
                    ByVal Original_G103C9 As String,  _
                    ByVal Original_G104C1 As String,  _
                    ByVal Original_G104C2 As String,  _
                    ByVal Original_G104C3 As String,  _
                    ByVal Original_G104C4 As String,  _
                    ByVal Original_G104C5 As String,  _
                    ByVal Original_G104C6 As String,  _
                    ByVal Original_G104C7 As String,  _
                    ByVal Original_G104C8 As String,  _
                    ByVal Original_G104C9 As String,  _
                    ByVal Original_G104C10 As String,  _
                    ByVal Original_G104C11 As String,  _
                    ByVal Original_G104C12 As String,  _
                    ByVal Original_G104C13 As String,  _
                    ByVal Original_G104C14 As String,  _
                    ByVal Original_G104C15 As String,  _
                    ByVal Original_G104C16 As String,  _
                    ByVal Original_G104C17 As String,  _
                    ByVal Original_G104C18 As String,  _
                    ByVal Original_G105C1O1 As String,  _
                    ByVal Original_G105C2O1 As String,  _
                    ByVal Original_G105C1O2 As String,  _
                    ByVal Original_G105C2O2 As String,  _
                    ByVal Original_G105C1O3 As String,  _
                    ByVal Original_G105C2O3 As String,  _
                    ByVal Original_G106C1O1 As String,  _
                    ByVal Original_G106C2O1 As String,  _
                    ByVal Original_G106C3O1 As String,  _
                    ByVal Original_G106C4O1 As String,  _
                    ByVal Original_G106C1O2 As String,  _
                    ByVal Original_G106C2O2 As String,  _
                    ByVal Original_G106C3O2 As String,  _
                    ByVal Original_G106C4O2 As String,  _
                    ByVal Original_G106C1O3 As String,  _
                    ByVal Original_G106C2O3 As String,  _
                    ByVal Original_G106C3O3 As String,  _
                    ByVal Original_G106C4O3 As String,  _
                    ByVal Original_G106C1O4 As String,  _
                    ByVal Original_G106C2O4 As String,  _
                    ByVal Original_G106C3O4 As String,  _
                    ByVal Original_G106C4O4 As String,  _
                    ByVal Original_G106C1O5 As String,  _
                    ByVal Original_G106C2O5 As String,  _
                    ByVal Original_G106C3O5 As String,  _
                    ByVal Original_G106C4O5 As String,  _
                    ByVal Original_G106C1O6 As String,  _
                    ByVal Original_G106C2O6 As String,  _
                    ByVal Original_G106C3O6 As String,  _
                    ByVal Original_G106C4O6 As String,  _
                    ByVal Original_G106C1O7 As String,  _
                    ByVal Original_G106C2O7 As String,  _
                    ByVal Original_G106C3O7 As String,  _
                    ByVal Original_G106C4O7 As String,  _
                    ByVal Original_G107C1 As String,  _
                    ByVal Original_G107C2 As String,  _
                    ByVal Original_G107C3 As String,  _
                    ByVal Original_G107C4 As String,  _
                    ByVal Original_G107C5 As String,  _
                    ByVal Original_G107C6 As String,  _
                    ByVal Original_G108C1O1 As String,  _
                    ByVal Original_G108C2O1 As String,  _
                    ByVal Original_G108C1O2 As String,  _
                    ByVal Original_G108C2O2 As String,  _
                    ByVal Original_G108C1O3 As String,  _
                    ByVal Original_G108C2O3 As String,  _
                    ByVal Original_G109C1 As String,  _
                    ByVal Original_G109C2 As String,  _
                    ByVal Original_G109C3 As String,  _
                    ByVal Original_G109C4 As String,  _
                    ByVal Original_G109C5 As String,  _
                    ByVal Original_G109C6 As String,  _
                    ByVal Original_G109C7 As String,  _
                    ByVal Original_G109C8 As String,  _
                    ByVal Original_G109C9 As String,  _
                    ByVal Original_G109C10 As String,  _
                    ByVal Original_G109C11 As String,  _
                    ByVal Original_G109C12 As String,  _
                    ByVal Original_G111C1 As String,  _
                    ByVal Original_G101C1 As String,  _
                    ByVal Original_G101C14 As String,  _
                    ByVal Original_G101C5 As String,  _
                    ByVal Original_G101C6 As String,  _
                    ByVal Original_IDPrescripteur As String,  _
                    ByVal Original_AMC_DateDébut As String,  _
                    ByVal Original_AMC_DateFin As String,  _
                    ByVal Original_AMC_NumAdherent As String,  _
                    ByVal Original_AMC_NumOrganisme As String,  _
                    ByVal Original_AMC_Piecejustificative As String,  _
                    ByVal Original_AMC_TypeContrat As String,  _
                    ByVal Original_G1420C1 As String,  _
                    ByVal Original_G1420C2 As String,  _
                    ByVal Original_G1420C3 As String,  _
                    ByVal Original_G1511C2 As String,  _
                    ByVal Original_AMC_Indicateurdetrairement As String,  _
                    ByVal Original_AMC_CodeRoutage As String,  _
                    ByVal Original_AMC_Code_Aiguillage_STS As String,  _
                    ByVal Original_AMC_Critère_secondaire As String,  _
                    ByVal Original_AMC_IDassure As String,  _
                    ByVal Original_AMC_IdHote As String,  _
                    ByVal Original_AMC_NomDomaine As String,  _
                    ByVal Original_AMC_NumMutuelle As String,  _
                    ByVal Original_AMC_Type_Convention As String) As Integer
            If (G101C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(0).Value = CType(G101C2,String)
            End If
            If (G101C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(1).Value = CType(G101C3,String)
            End If
            If (G101C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(2).Value = CType(G101C7,String)
            End If
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                Me.Adapter.UpdateCommand.Parameters(3).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                Me.Adapter.UpdateCommand.Parameters(4).Value = CType(G101C9,String)
            End If
            If (G101C10 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(5).Value = CType(G101C10,String)
            End If
            If (G101C11 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(6).Value = CType(G101C11,String)
            End If
            If (G101C12 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(G101C12,String)
            End If
            If (G101C13 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(8).Value = CType(G101C13,String)
            End If
            If (G102C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(9).Value = CType(G102C1,String)
            End If
            If (G102C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(10).Value = CType(G102C2,String)
            End If
            If (G102C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(11).Value = CType(G102C3,String)
            End If
            If (G103C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(12).Value = CType(G103C1,String)
            End If
            If (G103C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(13).Value = CType(G103C2,String)
            End If
            If (G103C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(14).Value = CType(G103C3,String)
            End If
            If (G103C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(15).Value = CType(G103C4,String)
            End If
            If (G103C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(16).Value = CType(G103C5,String)
            End If
            If (G103C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(17).Value = CType(G103C6,String)
            End If
            If (G103C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(18).Value = CType(G103C7,String)
            End If
            If (G103C8 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(19).Value = CType(G103C8,String)
            End If
            If (G103C9 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(20).Value = CType(G103C9,String)
            End If
            If (G104C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(21).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(22).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(23).Value = CType(G104C3,String)
            End If
            If (G104C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(24).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(24).Value = CType(G104C4,String)
            End If
            If (G104C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(25).Value = CType(G104C5,String)
            End If
            If (G104C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(26).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(26).Value = CType(G104C6,String)
            End If
            If (G104C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(27).Value = CType(G104C7,String)
            End If
            If (G104C8 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(28).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(28).Value = CType(G104C8,String)
            End If
            If (G104C9 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(29).Value = CType(G104C9,String)
            End If
            If (G104C10 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(30).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(30).Value = CType(G104C10,String)
            End If
            If (G104C11 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(31).Value = CType(G104C11,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                Me.Adapter.UpdateCommand.Parameters(32).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                Me.Adapter.UpdateCommand.Parameters(33).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                Me.Adapter.UpdateCommand.Parameters(34).Value = CType(G104C14,String)
            End If
            If (G104C15 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(35).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(35).Value = CType(G104C15,String)
            End If
            If (G104C16 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(36).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(36).Value = CType(G104C16,String)
            End If
            If (G104C17 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(37).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(37).Value = CType(G104C17,String)
            End If
            If (G104C18 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(38).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(38).Value = CType(G104C18,String)
            End If
            If (G105C1O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(39).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(39).Value = CType(G105C1O1,String)
            End If
            If (G105C2O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(40).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(40).Value = CType(G105C2O1,String)
            End If
            If (G105C1O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(41).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(41).Value = CType(G105C1O2,String)
            End If
            If (G105C2O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(42).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(42).Value = CType(G105C2O2,String)
            End If
            If (G105C1O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(43).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(43).Value = CType(G105C1O3,String)
            End If
            If (G105C2O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(44).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(44).Value = CType(G105C2O3,String)
            End If
            If (G106C1O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(45).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(45).Value = CType(G106C1O1,String)
            End If
            If (G106C2O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(46).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(46).Value = CType(G106C2O1,String)
            End If
            If (G106C3O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(47).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(47).Value = CType(G106C3O1,String)
            End If
            If (G106C4O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(48).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(48).Value = CType(G106C4O1,String)
            End If
            If (G106C1O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(49).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(49).Value = CType(G106C1O2,String)
            End If
            If (G106C2O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(50).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(50).Value = CType(G106C2O2,String)
            End If
            If (G106C3O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(51).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(51).Value = CType(G106C3O2,String)
            End If
            If (G106C4O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(52).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(52).Value = CType(G106C4O2,String)
            End If
            If (G106C1O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(53).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(53).Value = CType(G106C1O3,String)
            End If
            If (G106C2O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(54).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(54).Value = CType(G106C2O3,String)
            End If
            If (G106C3O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(55).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(55).Value = CType(G106C3O3,String)
            End If
            If (G106C4O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(56).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(56).Value = CType(G106C4O3,String)
            End If
            If (G106C1O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(57).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(57).Value = CType(G106C1O4,String)
            End If
            If (G106C2O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(58).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(58).Value = CType(G106C2O4,String)
            End If
            If (G106C3O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(59).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(59).Value = CType(G106C3O4,String)
            End If
            If (G106C4O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(60).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(60).Value = CType(G106C4O4,String)
            End If
            If (G106C1O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(61).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(61).Value = CType(G106C1O5,String)
            End If
            If (G106C2O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(62).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(62).Value = CType(G106C2O5,String)
            End If
            If (G106C3O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(63).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(63).Value = CType(G106C3O5,String)
            End If
            If (G106C4O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(64).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(64).Value = CType(G106C4O5,String)
            End If
            If (G106C1O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(65).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(65).Value = CType(G106C1O6,String)
            End If
            If (G106C2O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(66).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(66).Value = CType(G106C2O6,String)
            End If
            If (G106C3O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(67).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(67).Value = CType(G106C3O6,String)
            End If
            If (G106C4O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(68).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(68).Value = CType(G106C4O6,String)
            End If
            If (G106C1O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(69).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(69).Value = CType(G106C1O7,String)
            End If
            If (G106C2O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(70).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(70).Value = CType(G106C2O7,String)
            End If
            If (G106C3O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(71).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(71).Value = CType(G106C3O7,String)
            End If
            If (G106C4O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(72).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(72).Value = CType(G106C4O7,String)
            End If
            If (G107C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(73).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(73).Value = CType(G107C1,String)
            End If
            If (G107C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(74).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(74).Value = CType(G107C2,String)
            End If
            If (G107C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(75).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(75).Value = CType(G107C3,String)
            End If
            If (G107C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(76).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(76).Value = CType(G107C4,String)
            End If
            If (G107C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(77).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(77).Value = CType(G107C5,String)
            End If
            If (G107C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(78).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(78).Value = CType(G107C6,String)
            End If
            If (G108C1O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(79).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(79).Value = CType(G108C1O1,String)
            End If
            If (G108C2O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(80).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(80).Value = CType(G108C2O1,String)
            End If
            If (G108C1O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(81).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(81).Value = CType(G108C1O2,String)
            End If
            If (G108C2O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(82).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(82).Value = CType(G108C2O2,String)
            End If
            If (G108C1O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(83).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(83).Value = CType(G108C1O3,String)
            End If
            If (G108C2O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(84).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(84).Value = CType(G108C2O3,String)
            End If
            If (G109C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(85).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(85).Value = CType(G109C1,String)
            End If
            If (G109C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(86).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(86).Value = CType(G109C2,String)
            End If
            If (G109C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(87).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(87).Value = CType(G109C3,String)
            End If
            If (G109C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(88).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(88).Value = CType(G109C4,String)
            End If
            If (G109C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(89).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(89).Value = CType(G109C5,String)
            End If
            If (G109C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(90).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(90).Value = CType(G109C6,String)
            End If
            If (G109C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(91).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(91).Value = CType(G109C7,String)
            End If
            If (G109C8 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(92).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(92).Value = CType(G109C8,String)
            End If
            If (G109C9 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(93).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(93).Value = CType(G109C9,String)
            End If
            If (G109C10 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(94).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(94).Value = CType(G109C10,String)
            End If
            If (G109C11 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(95).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(95).Value = CType(G109C11,String)
            End If
            If (G109C12 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(96).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(96).Value = CType(G109C12,String)
            End If
            If (G111C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(97).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(97).Value = CType(G111C1,String)
            End If
            If (G101C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(98).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(98).Value = CType(G101C1,String)
            End If
            If (G101C14 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(99).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(99).Value = CType(G101C14,String)
            End If
            If (G101C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(100).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(100).Value = CType(G101C5,String)
            End If
            If (G101C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(101).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(101).Value = CType(G101C6,String)
            End If
            If (IDPrescripteur Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(102).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(102).Value = CType(IDPrescripteur,String)
            End If
            If (AMC_DateDébut Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(103).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(103).Value = CType(AMC_DateDébut,String)
            End If
            If (AMC_DateFin Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(104).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(104).Value = CType(AMC_DateFin,String)
            End If
            If (AMC_NumAdherent Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(105).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(105).Value = CType(AMC_NumAdherent,String)
            End If
            If (AMC_NumOrganisme Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(106).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(106).Value = CType(AMC_NumOrganisme,String)
            End If
            If (AMC_Piecejustificative Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(107).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(107).Value = CType(AMC_Piecejustificative,String)
            End If
            If (AMC_TypeContrat Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(108).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(108).Value = CType(AMC_TypeContrat,String)
            End If
            If (G1420C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(109).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(109).Value = CType(G1420C1,String)
            End If
            If (G1420C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(110).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(110).Value = CType(G1420C2,String)
            End If
            If (G1420C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(111).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(111).Value = CType(G1420C3,String)
            End If
            If (Assuré Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(112).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(112).Value = CType(Assuré,String)
            End If
            If (G1511C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(113).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(113).Value = CType(G1511C2,String)
            End If
            If (AMC_Indicateurdetrairement Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(114).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(114).Value = CType(AMC_Indicateurdetrairement,String)
            End If
            If (AMC_CodeRoutage Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(115).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(115).Value = CType(AMC_CodeRoutage,String)
            End If
            If (AMC_Code_Aiguillage_STS Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(116).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(116).Value = CType(AMC_Code_Aiguillage_STS,String)
            End If
            If (AMC_Critère_secondaire Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(117).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(117).Value = CType(AMC_Critère_secondaire,String)
            End If
            If (AMC_IDassure Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(118).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(118).Value = CType(AMC_IDassure,String)
            End If
            If (AMC_IdHote Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(119).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(119).Value = CType(AMC_IdHote,String)
            End If
            If (AMC_NomDomaine Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(120).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(120).Value = CType(AMC_NomDomaine,String)
            End If
            If (AMC_NumMutuelle Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(121).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(121).Value = CType(AMC_NumMutuelle,String)
            End If
            If (AMC_Type_Convention Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(122).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(122).Value = CType(AMC_Type_Convention,String)
            End If
            If (Original_G101C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(123).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(124).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(123).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(124).Value = CType(Original_G101C2,String)
            End If
            If (Original_G101C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(125).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(126).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(125).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(126).Value = CType(Original_G101C3,String)
            End If
            If (Original_G101C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(127).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(128).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(127).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(128).Value = CType(Original_G101C7,String)
            End If
            If (Original_G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G101C8")
            Else
                Me.Adapter.UpdateCommand.Parameters(129).Value = CType(Original_G101C8,String)
            End If
            If (Original_G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G101C9")
            Else
                Me.Adapter.UpdateCommand.Parameters(130).Value = CType(Original_G101C9,String)
            End If
            If (Original_G101C10 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(131).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(132).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(131).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(132).Value = CType(Original_G101C10,String)
            End If
            If (Original_G101C11 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(133).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(134).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(133).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(134).Value = CType(Original_G101C11,String)
            End If
            If (Original_G101C12 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(135).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(136).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(135).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(136).Value = CType(Original_G101C12,String)
            End If
            If (Original_G101C13 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(137).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(138).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(137).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(138).Value = CType(Original_G101C13,String)
            End If
            If (Original_G102C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(139).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(140).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(139).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(140).Value = CType(Original_G102C1,String)
            End If
            If (Original_G102C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(141).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(142).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(141).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(142).Value = CType(Original_G102C2,String)
            End If
            If (Original_G102C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(143).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(144).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(143).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(144).Value = CType(Original_G102C3,String)
            End If
            If (Original_G103C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(145).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(146).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(145).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(146).Value = CType(Original_G103C1,String)
            End If
            If (Original_G103C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(147).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(148).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(147).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(148).Value = CType(Original_G103C2,String)
            End If
            If (Original_G103C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(149).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(150).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(149).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(150).Value = CType(Original_G103C3,String)
            End If
            If (Original_G103C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(151).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(152).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(151).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(152).Value = CType(Original_G103C4,String)
            End If
            If (Original_G103C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(153).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(154).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(153).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(154).Value = CType(Original_G103C5,String)
            End If
            If (Original_G103C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(155).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(156).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(155).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(156).Value = CType(Original_G103C6,String)
            End If
            If (Original_G103C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(157).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(158).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(157).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(158).Value = CType(Original_G103C7,String)
            End If
            If (Original_G103C8 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(159).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(160).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(159).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(160).Value = CType(Original_G103C8,String)
            End If
            If (Original_G103C9 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(161).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(162).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(161).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(162).Value = CType(Original_G103C9,String)
            End If
            If (Original_G104C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(163).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(164).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(163).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(164).Value = CType(Original_G104C1,String)
            End If
            If (Original_G104C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(165).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(166).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(165).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(166).Value = CType(Original_G104C2,String)
            End If
            If (Original_G104C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(167).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(168).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(167).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(168).Value = CType(Original_G104C3,String)
            End If
            If (Original_G104C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(169).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(170).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(169).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(170).Value = CType(Original_G104C4,String)
            End If
            If (Original_G104C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(171).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(172).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(171).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(172).Value = CType(Original_G104C5,String)
            End If
            If (Original_G104C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(173).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(174).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(173).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(174).Value = CType(Original_G104C6,String)
            End If
            If (Original_G104C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(175).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(176).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(175).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(176).Value = CType(Original_G104C7,String)
            End If
            If (Original_G104C8 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(177).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(178).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(177).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(178).Value = CType(Original_G104C8,String)
            End If
            If (Original_G104C9 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(179).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(180).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(179).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(180).Value = CType(Original_G104C9,String)
            End If
            If (Original_G104C10 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(181).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(182).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(181).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(182).Value = CType(Original_G104C10,String)
            End If
            If (Original_G104C11 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(183).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(184).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(183).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(184).Value = CType(Original_G104C11,String)
            End If
            If (Original_G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G104C12")
            Else
                Me.Adapter.UpdateCommand.Parameters(185).Value = CType(Original_G104C12,String)
            End If
            If (Original_G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G104C13")
            Else
                Me.Adapter.UpdateCommand.Parameters(186).Value = CType(Original_G104C13,String)
            End If
            If (Original_G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_G104C14")
            Else
                Me.Adapter.UpdateCommand.Parameters(187).Value = CType(Original_G104C14,String)
            End If
            If (Original_G104C15 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(188).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(189).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(188).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(189).Value = CType(Original_G104C15,String)
            End If
            If (Original_G104C16 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(190).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(191).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(190).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(191).Value = CType(Original_G104C16,String)
            End If
            If (Original_G104C17 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(192).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(193).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(192).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(193).Value = CType(Original_G104C17,String)
            End If
            If (Original_G104C18 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(194).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(195).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(194).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(195).Value = CType(Original_G104C18,String)
            End If
            If (Original_G105C1O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(196).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(197).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(196).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(197).Value = CType(Original_G105C1O1,String)
            End If
            If (Original_G105C2O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(198).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(199).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(198).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(199).Value = CType(Original_G105C2O1,String)
            End If
            If (Original_G105C1O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(200).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(201).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(200).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(201).Value = CType(Original_G105C1O2,String)
            End If
            If (Original_G105C2O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(202).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(203).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(202).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(203).Value = CType(Original_G105C2O2,String)
            End If
            If (Original_G105C1O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(204).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(205).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(204).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(205).Value = CType(Original_G105C1O3,String)
            End If
            If (Original_G105C2O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(206).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(207).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(206).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(207).Value = CType(Original_G105C2O3,String)
            End If
            If (Original_G106C1O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(208).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(209).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(208).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(209).Value = CType(Original_G106C1O1,String)
            End If
            If (Original_G106C2O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(210).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(211).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(210).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(211).Value = CType(Original_G106C2O1,String)
            End If
            If (Original_G106C3O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(212).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(213).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(212).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(213).Value = CType(Original_G106C3O1,String)
            End If
            If (Original_G106C4O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(214).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(215).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(214).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(215).Value = CType(Original_G106C4O1,String)
            End If
            If (Original_G106C1O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(216).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(217).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(216).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(217).Value = CType(Original_G106C1O2,String)
            End If
            If (Original_G106C2O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(218).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(219).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(218).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(219).Value = CType(Original_G106C2O2,String)
            End If
            If (Original_G106C3O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(220).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(221).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(220).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(221).Value = CType(Original_G106C3O2,String)
            End If
            If (Original_G106C4O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(222).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(223).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(222).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(223).Value = CType(Original_G106C4O2,String)
            End If
            If (Original_G106C1O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(224).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(225).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(224).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(225).Value = CType(Original_G106C1O3,String)
            End If
            If (Original_G106C2O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(226).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(227).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(226).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(227).Value = CType(Original_G106C2O3,String)
            End If
            If (Original_G106C3O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(228).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(229).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(228).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(229).Value = CType(Original_G106C3O3,String)
            End If
            If (Original_G106C4O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(230).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(231).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(230).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(231).Value = CType(Original_G106C4O3,String)
            End If
            If (Original_G106C1O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(232).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(233).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(232).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(233).Value = CType(Original_G106C1O4,String)
            End If
            If (Original_G106C2O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(234).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(235).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(234).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(235).Value = CType(Original_G106C2O4,String)
            End If
            If (Original_G106C3O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(236).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(237).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(236).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(237).Value = CType(Original_G106C3O4,String)
            End If
            If (Original_G106C4O4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(238).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(239).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(238).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(239).Value = CType(Original_G106C4O4,String)
            End If
            If (Original_G106C1O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(240).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(241).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(240).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(241).Value = CType(Original_G106C1O5,String)
            End If
            If (Original_G106C2O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(242).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(243).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(242).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(243).Value = CType(Original_G106C2O5,String)
            End If
            If (Original_G106C3O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(244).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(245).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(244).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(245).Value = CType(Original_G106C3O5,String)
            End If
            If (Original_G106C4O5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(246).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(247).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(246).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(247).Value = CType(Original_G106C4O5,String)
            End If
            If (Original_G106C1O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(248).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(249).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(248).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(249).Value = CType(Original_G106C1O6,String)
            End If
            If (Original_G106C2O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(250).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(251).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(250).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(251).Value = CType(Original_G106C2O6,String)
            End If
            If (Original_G106C3O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(252).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(253).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(252).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(253).Value = CType(Original_G106C3O6,String)
            End If
            If (Original_G106C4O6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(254).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(255).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(254).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(255).Value = CType(Original_G106C4O6,String)
            End If
            If (Original_G106C1O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(256).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(257).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(256).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(257).Value = CType(Original_G106C1O7,String)
            End If
            If (Original_G106C2O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(258).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(259).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(258).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(259).Value = CType(Original_G106C2O7,String)
            End If
            If (Original_G106C3O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(260).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(261).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(260).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(261).Value = CType(Original_G106C3O7,String)
            End If
            If (Original_G106C4O7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(262).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(263).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(262).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(263).Value = CType(Original_G106C4O7,String)
            End If
            If (Original_G107C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(264).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(265).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(264).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(265).Value = CType(Original_G107C1,String)
            End If
            If (Original_G107C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(266).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(267).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(266).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(267).Value = CType(Original_G107C2,String)
            End If
            If (Original_G107C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(268).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(269).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(268).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(269).Value = CType(Original_G107C3,String)
            End If
            If (Original_G107C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(270).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(271).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(270).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(271).Value = CType(Original_G107C4,String)
            End If
            If (Original_G107C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(272).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(273).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(272).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(273).Value = CType(Original_G107C5,String)
            End If
            If (Original_G107C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(274).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(275).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(274).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(275).Value = CType(Original_G107C6,String)
            End If
            If (Original_G108C1O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(276).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(277).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(276).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(277).Value = CType(Original_G108C1O1,String)
            End If
            If (Original_G108C2O1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(278).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(279).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(278).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(279).Value = CType(Original_G108C2O1,String)
            End If
            If (Original_G108C1O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(280).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(281).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(280).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(281).Value = CType(Original_G108C1O2,String)
            End If
            If (Original_G108C2O2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(282).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(283).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(282).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(283).Value = CType(Original_G108C2O2,String)
            End If
            If (Original_G108C1O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(284).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(285).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(284).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(285).Value = CType(Original_G108C1O3,String)
            End If
            If (Original_G108C2O3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(286).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(287).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(286).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(287).Value = CType(Original_G108C2O3,String)
            End If
            If (Original_G109C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(288).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(289).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(288).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(289).Value = CType(Original_G109C1,String)
            End If
            If (Original_G109C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(290).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(291).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(290).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(291).Value = CType(Original_G109C2,String)
            End If
            If (Original_G109C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(292).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(293).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(292).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(293).Value = CType(Original_G109C3,String)
            End If
            If (Original_G109C4 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(294).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(295).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(294).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(295).Value = CType(Original_G109C4,String)
            End If
            If (Original_G109C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(296).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(297).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(296).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(297).Value = CType(Original_G109C5,String)
            End If
            If (Original_G109C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(298).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(299).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(298).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(299).Value = CType(Original_G109C6,String)
            End If
            If (Original_G109C7 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(300).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(301).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(300).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(301).Value = CType(Original_G109C7,String)
            End If
            If (Original_G109C8 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(302).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(303).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(302).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(303).Value = CType(Original_G109C8,String)
            End If
            If (Original_G109C9 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(304).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(305).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(304).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(305).Value = CType(Original_G109C9,String)
            End If
            If (Original_G109C10 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(306).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(307).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(306).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(307).Value = CType(Original_G109C10,String)
            End If
            If (Original_G109C11 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(308).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(309).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(308).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(309).Value = CType(Original_G109C11,String)
            End If
            If (Original_G109C12 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(310).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(311).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(310).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(311).Value = CType(Original_G109C12,String)
            End If
            If (Original_G111C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(312).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(313).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(312).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(313).Value = CType(Original_G111C1,String)
            End If
            If (Original_G101C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(314).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(315).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(314).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(315).Value = CType(Original_G101C1,String)
            End If
            If (Original_G101C14 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(316).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(317).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(316).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(317).Value = CType(Original_G101C14,String)
            End If
            If (Original_G101C5 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(318).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(319).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(318).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(319).Value = CType(Original_G101C5,String)
            End If
            If (Original_G101C6 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(320).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(321).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(320).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(321).Value = CType(Original_G101C6,String)
            End If
            If (Original_IDPrescripteur Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(322).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(323).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(322).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(323).Value = CType(Original_IDPrescripteur,String)
            End If
            If (Original_AMC_DateDébut Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(324).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(325).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(324).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(325).Value = CType(Original_AMC_DateDébut,String)
            End If
            If (Original_AMC_DateFin Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(326).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(327).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(326).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(327).Value = CType(Original_AMC_DateFin,String)
            End If
            If (Original_AMC_NumAdherent Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(328).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(329).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(328).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(329).Value = CType(Original_AMC_NumAdherent,String)
            End If
            If (Original_AMC_NumOrganisme Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(330).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(331).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(330).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(331).Value = CType(Original_AMC_NumOrganisme,String)
            End If
            If (Original_AMC_Piecejustificative Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(332).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(333).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(332).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(333).Value = CType(Original_AMC_Piecejustificative,String)
            End If
            If (Original_AMC_TypeContrat Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(334).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(335).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(334).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(335).Value = CType(Original_AMC_TypeContrat,String)
            End If
            If (Original_G1420C1 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(336).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(337).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(336).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(337).Value = CType(Original_G1420C1,String)
            End If
            If (Original_G1420C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(338).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(339).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(338).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(339).Value = CType(Original_G1420C2,String)
            End If
            If (Original_G1420C3 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(340).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(341).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(340).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(341).Value = CType(Original_G1420C3,String)
            End If
            If (Original_G1511C2 Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(342).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(343).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(342).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(343).Value = CType(Original_G1511C2,String)
            End If
            If (Original_AMC_Indicateurdetrairement Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(344).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(345).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(344).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(345).Value = CType(Original_AMC_Indicateurdetrairement,String)
            End If
            If (Original_AMC_CodeRoutage Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(346).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(347).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(346).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(347).Value = CType(Original_AMC_CodeRoutage,String)
            End If
            If (Original_AMC_Code_Aiguillage_STS Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(348).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(349).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(348).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(349).Value = CType(Original_AMC_Code_Aiguillage_STS,String)
            End If
            If (Original_AMC_Critère_secondaire Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(350).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(351).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(350).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(351).Value = CType(Original_AMC_Critère_secondaire,String)
            End If
            If (Original_AMC_IDassure Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(352).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(353).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(352).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(353).Value = CType(Original_AMC_IDassure,String)
            End If
            If (Original_AMC_IdHote Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(354).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(355).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(354).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(355).Value = CType(Original_AMC_IdHote,String)
            End If
            If (Original_AMC_NomDomaine Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(356).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(357).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(356).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(357).Value = CType(Original_AMC_NomDomaine,String)
            End If
            If (Original_AMC_NumMutuelle Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(358).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(359).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(358).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(359).Value = CType(Original_AMC_NumMutuelle,String)
            End If
            If (Original_AMC_Type_Convention Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(360).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(361).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(360).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(361).Value = CType(Original_AMC_Type_Convention,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
            If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.UpdateCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.UpdateCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1( _
                    ByVal G101C1 As String,  _
                    ByVal G101C2 As String,  _
                    ByVal G101C3 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G101C13 As String,  _
                    ByVal G102C1 As String,  _
                    ByVal G102C2 As String,  _
                    ByVal G102C3 As String,  _
                    ByVal G103C1 As String,  _
                    ByVal G103C2 As String,  _
                    ByVal G103C3 As String,  _
                    ByVal G103C4 As String,  _
                    ByVal G103C5 As String,  _
                    ByVal G103C6 As String,  _
                    ByVal G103C7 As String,  _
                    ByVal G103C8 As String,  _
                    ByVal G103C9 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C4 As String,  _
                    ByVal G104C5 As String,  _
                    ByVal G104C6 As String,  _
                    ByVal G104C7 As String,  _
                    ByVal G104C8 As String,  _
                    ByVal G104C9 As String,  _
                    ByVal G104C10 As String,  _
                    ByVal G104C11 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G104C15 As String,  _
                    ByVal G104C16 As String,  _
                    ByVal G104C17 As String,  _
                    ByVal G104C18 As String,  _
                    ByVal G105C1O1 As String,  _
                    ByVal G105C2O1 As String,  _
                    ByVal G105C1O2 As String,  _
                    ByVal G105C2O2 As String,  _
                    ByVal G105C1O3 As String,  _
                    ByVal G105C2O3 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal G107C1 As String,  _
                    ByVal G107C2 As String,  _
                    ByVal G107C3 As String,  _
                    ByVal G107C4 As String,  _
                    ByVal G107C5 As String,  _
                    ByVal G107C6 As String,  _
                    ByVal G108C1O1 As String,  _
                    ByVal G108C2O1 As String,  _
                    ByVal G108C1O2 As String,  _
                    ByVal G108C2O2 As String,  _
                    ByVal G108C1O3 As String,  _
                    ByVal G108C2O3 As String,  _
                    ByVal G109C1 As String,  _
                    ByVal G109C2 As String,  _
                    ByVal G109C3 As String,  _
                    ByVal G109C4 As String,  _
                    ByVal G109C5 As String,  _
                    ByVal G109C6 As String,  _
                    ByVal G109C7 As String,  _
                    ByVal G109C8 As String,  _
                    ByVal G109C9 As String,  _
                    ByVal G109C10 As String,  _
                    ByVal G109C11 As String,  _
                    ByVal G109C12 As String,  _
                    ByVal G111C1 As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal AMC_DateDébut As String,  _
                    ByVal AMC_DateFin As String,  _
                    ByVal AMC_NumAdherent As String,  _
                    ByVal AMC_NumOrganisme As String,  _
                    ByVal AMC_Piecejustificative As String,  _
                    ByVal AMC_TypeContrat As String,  _
                    ByVal AMC_Indicateurdetrairement As String,  _
                    ByVal AMC_NumMutuelle As String,  _
                    ByVal AMC_IDassure As String,  _
                    ByVal AMC_Code_Aiguillage_STS As String,  _
                    ByVal AMC_CodeRoutage As String,  _
                    ByVal AMC_IdHote As String,  _
                    ByVal AMC_NomDomaine As String,  _
                    ByVal AMC_Type_Convention As String,  _
                    ByVal AMC_Critère_secondaire As String,  _
                    ByVal AMC_IdentifiantAMC As String,  _
                    ByVal Assuré As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (G101C1 Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(G101C1,String)
            End If
            If (G101C2 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G101C2,String)
            End If
            If (G101C3 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G101C3,String)
            End If
            If (G101C7 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G101C7,String)
            End If
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(4).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(5).Value = CType(G101C9,String)
            End If
            If (G101C10 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G101C10,String)
            End If
            If (G101C11 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G101C11,String)
            End If
            If (G101C12 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G101C12,String)
            End If
            If (G101C13 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G101C13,String)
            End If
            If (G102C1 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G102C1,String)
            End If
            If (G102C2 Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(G102C2,String)
            End If
            If (G102C3 Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(G102C3,String)
            End If
            If (G103C1 Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(G103C1,String)
            End If
            If (G103C2 Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(G103C2,String)
            End If
            If (G103C3 Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(G103C3,String)
            End If
            If (G103C4 Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(G103C4,String)
            End If
            If (G103C5 Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(G103C5,String)
            End If
            If (G103C6 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G103C6,String)
            End If
            If (G103C7 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G103C7,String)
            End If
            If (G103C8 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G103C8,String)
            End If
            If (G103C9 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G103C9,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(24).Value = Global.System.DBNull.Value
            Else
                command.Parameters(24).Value = CType(G104C3,String)
            End If
            If (G104C4 Is Nothing) Then
                command.Parameters(25).Value = Global.System.DBNull.Value
            Else
                command.Parameters(25).Value = CType(G104C4,String)
            End If
            If (G104C5 Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(G104C5,String)
            End If
            If (G104C6 Is Nothing) Then
                command.Parameters(27).Value = Global.System.DBNull.Value
            Else
                command.Parameters(27).Value = CType(G104C6,String)
            End If
            If (G104C7 Is Nothing) Then
                command.Parameters(28).Value = Global.System.DBNull.Value
            Else
                command.Parameters(28).Value = CType(G104C7,String)
            End If
            If (G104C8 Is Nothing) Then
                command.Parameters(29).Value = Global.System.DBNull.Value
            Else
                command.Parameters(29).Value = CType(G104C8,String)
            End If
            If (G104C9 Is Nothing) Then
                command.Parameters(30).Value = Global.System.DBNull.Value
            Else
                command.Parameters(30).Value = CType(G104C9,String)
            End If
            If (G104C10 Is Nothing) Then
                command.Parameters(31).Value = Global.System.DBNull.Value
            Else
                command.Parameters(31).Value = CType(G104C10,String)
            End If
            If (G104C11 Is Nothing) Then
                command.Parameters(32).Value = Global.System.DBNull.Value
            Else
                command.Parameters(32).Value = CType(G104C11,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(33).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(34).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(35).Value = CType(G104C14,String)
            End If
            If (G104C15 Is Nothing) Then
                command.Parameters(36).Value = Global.System.DBNull.Value
            Else
                command.Parameters(36).Value = CType(G104C15,String)
            End If
            If (G104C16 Is Nothing) Then
                command.Parameters(37).Value = Global.System.DBNull.Value
            Else
                command.Parameters(37).Value = CType(G104C16,String)
            End If
            If (G104C17 Is Nothing) Then
                command.Parameters(38).Value = Global.System.DBNull.Value
            Else
                command.Parameters(38).Value = CType(G104C17,String)
            End If
            If (G104C18 Is Nothing) Then
                command.Parameters(39).Value = Global.System.DBNull.Value
            Else
                command.Parameters(39).Value = CType(G104C18,String)
            End If
            If (G105C1O1 Is Nothing) Then
                command.Parameters(40).Value = Global.System.DBNull.Value
            Else
                command.Parameters(40).Value = CType(G105C1O1,String)
            End If
            If (G105C2O1 Is Nothing) Then
                command.Parameters(41).Value = Global.System.DBNull.Value
            Else
                command.Parameters(41).Value = CType(G105C2O1,String)
            End If
            If (G105C1O2 Is Nothing) Then
                command.Parameters(42).Value = Global.System.DBNull.Value
            Else
                command.Parameters(42).Value = CType(G105C1O2,String)
            End If
            If (G105C2O2 Is Nothing) Then
                command.Parameters(43).Value = Global.System.DBNull.Value
            Else
                command.Parameters(43).Value = CType(G105C2O2,String)
            End If
            If (G105C1O3 Is Nothing) Then
                command.Parameters(44).Value = Global.System.DBNull.Value
            Else
                command.Parameters(44).Value = CType(G105C1O3,String)
            End If
            If (G105C2O3 Is Nothing) Then
                command.Parameters(45).Value = Global.System.DBNull.Value
            Else
                command.Parameters(45).Value = CType(G105C2O3,String)
            End If
            If (G106C1O1 Is Nothing) Then
                command.Parameters(46).Value = Global.System.DBNull.Value
            Else
                command.Parameters(46).Value = CType(G106C1O1,String)
            End If
            If (G106C2O1 Is Nothing) Then
                command.Parameters(47).Value = Global.System.DBNull.Value
            Else
                command.Parameters(47).Value = CType(G106C2O1,String)
            End If
            If (G106C3O1 Is Nothing) Then
                command.Parameters(48).Value = Global.System.DBNull.Value
            Else
                command.Parameters(48).Value = CType(G106C3O1,String)
            End If
            If (G106C4O1 Is Nothing) Then
                command.Parameters(49).Value = Global.System.DBNull.Value
            Else
                command.Parameters(49).Value = CType(G106C4O1,String)
            End If
            If (G106C1O2 Is Nothing) Then
                command.Parameters(50).Value = Global.System.DBNull.Value
            Else
                command.Parameters(50).Value = CType(G106C1O2,String)
            End If
            If (G106C2O2 Is Nothing) Then
                command.Parameters(51).Value = Global.System.DBNull.Value
            Else
                command.Parameters(51).Value = CType(G106C2O2,String)
            End If
            If (G106C3O2 Is Nothing) Then
                command.Parameters(52).Value = Global.System.DBNull.Value
            Else
                command.Parameters(52).Value = CType(G106C3O2,String)
            End If
            If (G106C4O2 Is Nothing) Then
                command.Parameters(53).Value = Global.System.DBNull.Value
            Else
                command.Parameters(53).Value = CType(G106C4O2,String)
            End If
            If (G106C1O3 Is Nothing) Then
                command.Parameters(54).Value = Global.System.DBNull.Value
            Else
                command.Parameters(54).Value = CType(G106C1O3,String)
            End If
            If (G106C2O3 Is Nothing) Then
                command.Parameters(55).Value = Global.System.DBNull.Value
            Else
                command.Parameters(55).Value = CType(G106C2O3,String)
            End If
            If (G106C3O3 Is Nothing) Then
                command.Parameters(56).Value = Global.System.DBNull.Value
            Else
                command.Parameters(56).Value = CType(G106C3O3,String)
            End If
            If (G106C4O3 Is Nothing) Then
                command.Parameters(57).Value = Global.System.DBNull.Value
            Else
                command.Parameters(57).Value = CType(G106C4O3,String)
            End If
            If (G106C1O4 Is Nothing) Then
                command.Parameters(58).Value = Global.System.DBNull.Value
            Else
                command.Parameters(58).Value = CType(G106C1O4,String)
            End If
            If (G106C2O4 Is Nothing) Then
                command.Parameters(59).Value = Global.System.DBNull.Value
            Else
                command.Parameters(59).Value = CType(G106C2O4,String)
            End If
            If (G106C3O4 Is Nothing) Then
                command.Parameters(60).Value = Global.System.DBNull.Value
            Else
                command.Parameters(60).Value = CType(G106C3O4,String)
            End If
            If (G106C4O4 Is Nothing) Then
                command.Parameters(61).Value = Global.System.DBNull.Value
            Else
                command.Parameters(61).Value = CType(G106C4O4,String)
            End If
            If (G106C1O5 Is Nothing) Then
                command.Parameters(62).Value = Global.System.DBNull.Value
            Else
                command.Parameters(62).Value = CType(G106C1O5,String)
            End If
            If (G106C2O5 Is Nothing) Then
                command.Parameters(63).Value = Global.System.DBNull.Value
            Else
                command.Parameters(63).Value = CType(G106C2O5,String)
            End If
            If (G106C3O5 Is Nothing) Then
                command.Parameters(64).Value = Global.System.DBNull.Value
            Else
                command.Parameters(64).Value = CType(G106C3O5,String)
            End If
            If (G106C4O5 Is Nothing) Then
                command.Parameters(65).Value = Global.System.DBNull.Value
            Else
                command.Parameters(65).Value = CType(G106C4O5,String)
            End If
            If (G106C1O6 Is Nothing) Then
                command.Parameters(66).Value = Global.System.DBNull.Value
            Else
                command.Parameters(66).Value = CType(G106C1O6,String)
            End If
            If (G106C2O6 Is Nothing) Then
                command.Parameters(67).Value = Global.System.DBNull.Value
            Else
                command.Parameters(67).Value = CType(G106C2O6,String)
            End If
            If (G106C3O6 Is Nothing) Then
                command.Parameters(68).Value = Global.System.DBNull.Value
            Else
                command.Parameters(68).Value = CType(G106C3O6,String)
            End If
            If (G106C4O6 Is Nothing) Then
                command.Parameters(69).Value = Global.System.DBNull.Value
            Else
                command.Parameters(69).Value = CType(G106C4O6,String)
            End If
            If (G106C1O7 Is Nothing) Then
                command.Parameters(70).Value = Global.System.DBNull.Value
            Else
                command.Parameters(70).Value = CType(G106C1O7,String)
            End If
            If (G106C2O7 Is Nothing) Then
                command.Parameters(71).Value = Global.System.DBNull.Value
            Else
                command.Parameters(71).Value = CType(G106C2O7,String)
            End If
            If (G106C3O7 Is Nothing) Then
                command.Parameters(72).Value = Global.System.DBNull.Value
            Else
                command.Parameters(72).Value = CType(G106C3O7,String)
            End If
            If (G106C4O7 Is Nothing) Then
                command.Parameters(73).Value = Global.System.DBNull.Value
            Else
                command.Parameters(73).Value = CType(G106C4O7,String)
            End If
            If (G107C1 Is Nothing) Then
                command.Parameters(74).Value = Global.System.DBNull.Value
            Else
                command.Parameters(74).Value = CType(G107C1,String)
            End If
            If (G107C2 Is Nothing) Then
                command.Parameters(75).Value = Global.System.DBNull.Value
            Else
                command.Parameters(75).Value = CType(G107C2,String)
            End If
            If (G107C3 Is Nothing) Then
                command.Parameters(76).Value = Global.System.DBNull.Value
            Else
                command.Parameters(76).Value = CType(G107C3,String)
            End If
            If (G107C4 Is Nothing) Then
                command.Parameters(77).Value = Global.System.DBNull.Value
            Else
                command.Parameters(77).Value = CType(G107C4,String)
            End If
            If (G107C5 Is Nothing) Then
                command.Parameters(78).Value = Global.System.DBNull.Value
            Else
                command.Parameters(78).Value = CType(G107C5,String)
            End If
            If (G107C6 Is Nothing) Then
                command.Parameters(79).Value = Global.System.DBNull.Value
            Else
                command.Parameters(79).Value = CType(G107C6,String)
            End If
            If (G108C1O1 Is Nothing) Then
                command.Parameters(80).Value = Global.System.DBNull.Value
            Else
                command.Parameters(80).Value = CType(G108C1O1,String)
            End If
            If (G108C2O1 Is Nothing) Then
                command.Parameters(81).Value = Global.System.DBNull.Value
            Else
                command.Parameters(81).Value = CType(G108C2O1,String)
            End If
            If (G108C1O2 Is Nothing) Then
                command.Parameters(82).Value = Global.System.DBNull.Value
            Else
                command.Parameters(82).Value = CType(G108C1O2,String)
            End If
            If (G108C2O2 Is Nothing) Then
                command.Parameters(83).Value = Global.System.DBNull.Value
            Else
                command.Parameters(83).Value = CType(G108C2O2,String)
            End If
            If (G108C1O3 Is Nothing) Then
                command.Parameters(84).Value = Global.System.DBNull.Value
            Else
                command.Parameters(84).Value = CType(G108C1O3,String)
            End If
            If (G108C2O3 Is Nothing) Then
                command.Parameters(85).Value = Global.System.DBNull.Value
            Else
                command.Parameters(85).Value = CType(G108C2O3,String)
            End If
            If (G109C1 Is Nothing) Then
                command.Parameters(86).Value = Global.System.DBNull.Value
            Else
                command.Parameters(86).Value = CType(G109C1,String)
            End If
            If (G109C2 Is Nothing) Then
                command.Parameters(87).Value = Global.System.DBNull.Value
            Else
                command.Parameters(87).Value = CType(G109C2,String)
            End If
            If (G109C3 Is Nothing) Then
                command.Parameters(88).Value = Global.System.DBNull.Value
            Else
                command.Parameters(88).Value = CType(G109C3,String)
            End If
            If (G109C4 Is Nothing) Then
                command.Parameters(89).Value = Global.System.DBNull.Value
            Else
                command.Parameters(89).Value = CType(G109C4,String)
            End If
            If (G109C5 Is Nothing) Then
                command.Parameters(90).Value = Global.System.DBNull.Value
            Else
                command.Parameters(90).Value = CType(G109C5,String)
            End If
            If (G109C6 Is Nothing) Then
                command.Parameters(91).Value = Global.System.DBNull.Value
            Else
                command.Parameters(91).Value = CType(G109C6,String)
            End If
            If (G109C7 Is Nothing) Then
                command.Parameters(92).Value = Global.System.DBNull.Value
            Else
                command.Parameters(92).Value = CType(G109C7,String)
            End If
            If (G109C8 Is Nothing) Then
                command.Parameters(93).Value = Global.System.DBNull.Value
            Else
                command.Parameters(93).Value = CType(G109C8,String)
            End If
            If (G109C9 Is Nothing) Then
                command.Parameters(94).Value = Global.System.DBNull.Value
            Else
                command.Parameters(94).Value = CType(G109C9,String)
            End If
            If (G109C10 Is Nothing) Then
                command.Parameters(95).Value = Global.System.DBNull.Value
            Else
                command.Parameters(95).Value = CType(G109C10,String)
            End If
            If (G109C11 Is Nothing) Then
                command.Parameters(96).Value = Global.System.DBNull.Value
            Else
                command.Parameters(96).Value = CType(G109C11,String)
            End If
            If (G109C12 Is Nothing) Then
                command.Parameters(97).Value = Global.System.DBNull.Value
            Else
                command.Parameters(97).Value = CType(G109C12,String)
            End If
            If (G111C1 Is Nothing) Then
                command.Parameters(98).Value = Global.System.DBNull.Value
            Else
                command.Parameters(98).Value = CType(G111C1,String)
            End If
            If (IDPrescripteur Is Nothing) Then
                command.Parameters(99).Value = Global.System.DBNull.Value
            Else
                command.Parameters(99).Value = CType(IDPrescripteur,String)
            End If
            If (AMC_DateDébut Is Nothing) Then
                command.Parameters(100).Value = Global.System.DBNull.Value
            Else
                command.Parameters(100).Value = CType(AMC_DateDébut,String)
            End If
            If (AMC_DateFin Is Nothing) Then
                command.Parameters(101).Value = Global.System.DBNull.Value
            Else
                command.Parameters(101).Value = CType(AMC_DateFin,String)
            End If
            If (AMC_NumAdherent Is Nothing) Then
                command.Parameters(102).Value = Global.System.DBNull.Value
            Else
                command.Parameters(102).Value = CType(AMC_NumAdherent,String)
            End If
            If (AMC_NumOrganisme Is Nothing) Then
                command.Parameters(103).Value = Global.System.DBNull.Value
            Else
                command.Parameters(103).Value = CType(AMC_NumOrganisme,String)
            End If
            If (AMC_Piecejustificative Is Nothing) Then
                command.Parameters(104).Value = Global.System.DBNull.Value
            Else
                command.Parameters(104).Value = CType(AMC_Piecejustificative,String)
            End If
            If (AMC_TypeContrat Is Nothing) Then
                command.Parameters(105).Value = Global.System.DBNull.Value
            Else
                command.Parameters(105).Value = CType(AMC_TypeContrat,String)
            End If
            If (AMC_Indicateurdetrairement Is Nothing) Then
                command.Parameters(106).Value = Global.System.DBNull.Value
            Else
                command.Parameters(106).Value = CType(AMC_Indicateurdetrairement,String)
            End If
            If (AMC_NumMutuelle Is Nothing) Then
                command.Parameters(107).Value = Global.System.DBNull.Value
            Else
                command.Parameters(107).Value = CType(AMC_NumMutuelle,String)
            End If
            If (AMC_IDassure Is Nothing) Then
                command.Parameters(108).Value = Global.System.DBNull.Value
            Else
                command.Parameters(108).Value = CType(AMC_IDassure,String)
            End If
            If (AMC_Code_Aiguillage_STS Is Nothing) Then
                command.Parameters(109).Value = Global.System.DBNull.Value
            Else
                command.Parameters(109).Value = CType(AMC_Code_Aiguillage_STS,String)
            End If
            If (AMC_CodeRoutage Is Nothing) Then
                command.Parameters(110).Value = Global.System.DBNull.Value
            Else
                command.Parameters(110).Value = CType(AMC_CodeRoutage,String)
            End If
            If (AMC_IdHote Is Nothing) Then
                command.Parameters(111).Value = Global.System.DBNull.Value
            Else
                command.Parameters(111).Value = CType(AMC_IdHote,String)
            End If
            If (AMC_NomDomaine Is Nothing) Then
                command.Parameters(112).Value = Global.System.DBNull.Value
            Else
                command.Parameters(112).Value = CType(AMC_NomDomaine,String)
            End If
            If (AMC_Type_Convention Is Nothing) Then
                command.Parameters(113).Value = Global.System.DBNull.Value
            Else
                command.Parameters(113).Value = CType(AMC_Type_Convention,String)
            End If
            If (AMC_Critère_secondaire Is Nothing) Then
                command.Parameters(114).Value = Global.System.DBNull.Value
            Else
                command.Parameters(114).Value = CType(AMC_Critère_secondaire,String)
            End If
            If (AMC_IdentifiantAMC Is Nothing) Then
                command.Parameters(115).Value = Global.System.DBNull.Value
            Else
                command.Parameters(115).Value = CType(AMC_IdentifiantAMC,String)
            End If
            If (Assuré Is Nothing) Then
                command.Parameters(116).Value = Global.System.DBNull.Value
            Else
                command.Parameters(116).Value = CType(Assuré,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function InsertDégradé( _
                    ByVal G101C1 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal Assuré As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal AMC_NumOrganisme As String,  _
                    ByVal AMC_NumMutuelle As String,  _
                    ByVal AMC_NumAdherent As String,  _
                    ByVal AMC_IDassure As String,  _
                    ByVal AMC_TypeContrat As String,  _
                    ByVal AMC_DateDébut As String,  _
                    ByVal AMC_DateFin As String,  _
                    ByVal AMC_Piecejustificative As String,  _
                    ByVal AMC_Code_Aiguillage_STS As String,  _
                    ByVal AMC_Indicateurdetrairement As String,  _
                    ByVal AMC_CodeRoutage As String,  _
                    ByVal AMC_IdHote As String,  _
                    ByVal AMC_NomDomaine As String,  _
                    ByVal AMC_Type_Convention As String,  _
                    ByVal AMC_Critère_secondaire As String,  _
                    ByVal AMC_IdentifiantAMC As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            If (G101C1 Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(G101C1,String)
            End If
            If (G101C7 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G101C7,String)
            End If
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(2).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(3).Value = CType(G101C9,String)
            End If
            If (G101C10 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G101C10,String)
            End If
            If (G101C11 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(G101C11,String)
            End If
            If (G101C12 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G101C12,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G104C3,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(10).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(11).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(12).Value = CType(G104C14,String)
            End If
            If (G106C1O1 Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(G106C1O1,String)
            End If
            If (G106C2O1 Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(G106C2O1,String)
            End If
            If (G106C3O1 Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(G106C3O1,String)
            End If
            If (G106C4O1 Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(G106C4O1,String)
            End If
            If (G106C1O2 Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(G106C1O2,String)
            End If
            If (G106C2O2 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G106C2O2,String)
            End If
            If (G106C3O2 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G106C3O2,String)
            End If
            If (G106C4O2 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G106C4O2,String)
            End If
            If (G106C1O3 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G106C1O3,String)
            End If
            If (G106C2O3 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G106C2O3,String)
            End If
            If (G106C3O3 Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(G106C3O3,String)
            End If
            If (G106C4O3 Is Nothing) Then
                command.Parameters(24).Value = Global.System.DBNull.Value
            Else
                command.Parameters(24).Value = CType(G106C4O3,String)
            End If
            If (G106C1O4 Is Nothing) Then
                command.Parameters(25).Value = Global.System.DBNull.Value
            Else
                command.Parameters(25).Value = CType(G106C1O4,String)
            End If
            If (G106C2O4 Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(G106C2O4,String)
            End If
            If (G106C3O4 Is Nothing) Then
                command.Parameters(27).Value = Global.System.DBNull.Value
            Else
                command.Parameters(27).Value = CType(G106C3O4,String)
            End If
            If (G106C4O4 Is Nothing) Then
                command.Parameters(28).Value = Global.System.DBNull.Value
            Else
                command.Parameters(28).Value = CType(G106C4O4,String)
            End If
            If (G106C1O5 Is Nothing) Then
                command.Parameters(29).Value = Global.System.DBNull.Value
            Else
                command.Parameters(29).Value = CType(G106C1O5,String)
            End If
            If (G106C2O5 Is Nothing) Then
                command.Parameters(30).Value = Global.System.DBNull.Value
            Else
                command.Parameters(30).Value = CType(G106C2O5,String)
            End If
            If (G106C3O5 Is Nothing) Then
                command.Parameters(31).Value = Global.System.DBNull.Value
            Else
                command.Parameters(31).Value = CType(G106C3O5,String)
            End If
            If (G106C4O5 Is Nothing) Then
                command.Parameters(32).Value = Global.System.DBNull.Value
            Else
                command.Parameters(32).Value = CType(G106C4O5,String)
            End If
            If (G106C1O6 Is Nothing) Then
                command.Parameters(33).Value = Global.System.DBNull.Value
            Else
                command.Parameters(33).Value = CType(G106C1O6,String)
            End If
            If (G106C2O6 Is Nothing) Then
                command.Parameters(34).Value = Global.System.DBNull.Value
            Else
                command.Parameters(34).Value = CType(G106C2O6,String)
            End If
            If (G106C3O6 Is Nothing) Then
                command.Parameters(35).Value = Global.System.DBNull.Value
            Else
                command.Parameters(35).Value = CType(G106C3O6,String)
            End If
            If (G106C4O6 Is Nothing) Then
                command.Parameters(36).Value = Global.System.DBNull.Value
            Else
                command.Parameters(36).Value = CType(G106C4O6,String)
            End If
            If (G106C1O7 Is Nothing) Then
                command.Parameters(37).Value = Global.System.DBNull.Value
            Else
                command.Parameters(37).Value = CType(G106C1O7,String)
            End If
            If (G106C2O7 Is Nothing) Then
                command.Parameters(38).Value = Global.System.DBNull.Value
            Else
                command.Parameters(38).Value = CType(G106C2O7,String)
            End If
            If (G106C3O7 Is Nothing) Then
                command.Parameters(39).Value = Global.System.DBNull.Value
            Else
                command.Parameters(39).Value = CType(G106C3O7,String)
            End If
            If (G106C4O7 Is Nothing) Then
                command.Parameters(40).Value = Global.System.DBNull.Value
            Else
                command.Parameters(40).Value = CType(G106C4O7,String)
            End If
            If (IDPrescripteur Is Nothing) Then
                command.Parameters(41).Value = Global.System.DBNull.Value
            Else
                command.Parameters(41).Value = CType(IDPrescripteur,String)
            End If
            If (Assuré Is Nothing) Then
                command.Parameters(42).Value = Global.System.DBNull.Value
            Else
                command.Parameters(42).Value = CType(Assuré,String)
            End If
            If (G1420C1 Is Nothing) Then
                command.Parameters(43).Value = Global.System.DBNull.Value
            Else
                command.Parameters(43).Value = CType(G1420C1,String)
            End If
            If (G1420C2 Is Nothing) Then
                command.Parameters(44).Value = Global.System.DBNull.Value
            Else
                command.Parameters(44).Value = CType(G1420C2,String)
            End If
            If (G1420C3 Is Nothing) Then
                command.Parameters(45).Value = Global.System.DBNull.Value
            Else
                command.Parameters(45).Value = CType(G1420C3,String)
            End If
            If (G1511C2 Is Nothing) Then
                command.Parameters(46).Value = Global.System.DBNull.Value
            Else
                command.Parameters(46).Value = CType(G1511C2,String)
            End If
            If (AMC_NumOrganisme Is Nothing) Then
                command.Parameters(47).Value = Global.System.DBNull.Value
            Else
                command.Parameters(47).Value = CType(AMC_NumOrganisme,String)
            End If
            If (AMC_NumMutuelle Is Nothing) Then
                command.Parameters(48).Value = Global.System.DBNull.Value
            Else
                command.Parameters(48).Value = CType(AMC_NumMutuelle,String)
            End If
            If (AMC_NumAdherent Is Nothing) Then
                command.Parameters(49).Value = Global.System.DBNull.Value
            Else
                command.Parameters(49).Value = CType(AMC_NumAdherent,String)
            End If
            If (AMC_IDassure Is Nothing) Then
                command.Parameters(50).Value = Global.System.DBNull.Value
            Else
                command.Parameters(50).Value = CType(AMC_IDassure,String)
            End If
            If (AMC_TypeContrat Is Nothing) Then
                command.Parameters(51).Value = Global.System.DBNull.Value
            Else
                command.Parameters(51).Value = CType(AMC_TypeContrat,String)
            End If
            If (AMC_DateDébut Is Nothing) Then
                command.Parameters(52).Value = Global.System.DBNull.Value
            Else
                command.Parameters(52).Value = CType(AMC_DateDébut,String)
            End If
            If (AMC_DateFin Is Nothing) Then
                command.Parameters(53).Value = Global.System.DBNull.Value
            Else
                command.Parameters(53).Value = CType(AMC_DateFin,String)
            End If
            If (AMC_Piecejustificative Is Nothing) Then
                command.Parameters(54).Value = Global.System.DBNull.Value
            Else
                command.Parameters(54).Value = CType(AMC_Piecejustificative,String)
            End If
            If (AMC_Code_Aiguillage_STS Is Nothing) Then
                command.Parameters(55).Value = Global.System.DBNull.Value
            Else
                command.Parameters(55).Value = CType(AMC_Code_Aiguillage_STS,String)
            End If
            If (AMC_Indicateurdetrairement Is Nothing) Then
                command.Parameters(56).Value = Global.System.DBNull.Value
            Else
                command.Parameters(56).Value = CType(AMC_Indicateurdetrairement,String)
            End If
            If (AMC_CodeRoutage Is Nothing) Then
                command.Parameters(57).Value = Global.System.DBNull.Value
            Else
                command.Parameters(57).Value = CType(AMC_CodeRoutage,String)
            End If
            If (AMC_IdHote Is Nothing) Then
                command.Parameters(58).Value = Global.System.DBNull.Value
            Else
                command.Parameters(58).Value = CType(AMC_IdHote,String)
            End If
            If (AMC_NomDomaine Is Nothing) Then
                command.Parameters(59).Value = Global.System.DBNull.Value
            Else
                command.Parameters(59).Value = CType(AMC_NomDomaine,String)
            End If
            If (AMC_Type_Convention Is Nothing) Then
                command.Parameters(60).Value = Global.System.DBNull.Value
            Else
                command.Parameters(60).Value = CType(AMC_Type_Convention,String)
            End If
            If (AMC_Critère_secondaire Is Nothing) Then
                command.Parameters(61).Value = Global.System.DBNull.Value
            Else
                command.Parameters(61).Value = CType(AMC_Critère_secondaire,String)
            End If
            If (AMC_IdentifiantAMC Is Nothing) Then
                command.Parameters(62).Value = Global.System.DBNull.Value
            Else
                command.Parameters(62).Value = CType(AMC_IdentifiantAMC,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function selecetcountfromvitale(ByVal G101C8 As String, ByVal G101C9 As String, ByVal G104C1 As String, ByVal G104C2 As String, ByVal G104C3 As String, ByVal G104C12 As String, ByVal G104C13 As String, ByVal G104C14 As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(0).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(1).Value = CType(G101C9,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G104C3,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(5).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(6).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(7).Value = CType(G104C14,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_AMCdata(ByVal G101C8 As String, ByVal G101C9 As String, ByVal G104C1 As String, ByVal G104C2 As String, ByVal G104C3 As String, ByVal G104C12 As String, ByVal G104C13 As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(6)
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(0).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(1).Value = CType(G101C9,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G104C3,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(5).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(6).Value = CType(G104C13,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SELECT_IDPrescripteur(ByVal G101C8 As String, ByVal G101C9 As String, ByVal G104C1 As String, ByVal G104C2 As String, ByVal G104C3 As String, ByVal G104C12 As String, ByVal G104C14 As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(7)
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(0).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(1).Value = CType(G101C9,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G104C3,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(5).Value = CType(G104C12,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(6).Value = CType(G104C14,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectNomPrénom(ByVal G101C8 As String, ByVal G101C9 As String, ByVal G104C12 As String, ByVal G104C13 As String, ByVal G104C14 As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(8)
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(0).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(1).Value = CType(G101C9,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(2).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(3).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(4).Value = CType(G104C14,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateDegrade( _
                    ByVal G101C1 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal Assuré As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal G1511C2 As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(9)
            If (G101C1 Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(G101C1,String)
            End If
            If (G101C7 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G101C7,String)
            End If
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(2).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(3).Value = CType(G101C9,String)
            End If
            If (G101C10 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G101C10,String)
            End If
            If (G101C11 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(G101C11,String)
            End If
            If (G101C12 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G101C12,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G104C3,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(10).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(11).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(12).Value = CType(G104C14,String)
            End If
            If (G106C1O1 Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(G106C1O1,String)
            End If
            If (G106C2O1 Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(G106C2O1,String)
            End If
            If (G106C3O1 Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(G106C3O1,String)
            End If
            If (G106C4O1 Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(G106C4O1,String)
            End If
            If (G106C1O2 Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(G106C1O2,String)
            End If
            If (G106C2O2 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G106C2O2,String)
            End If
            If (G106C3O2 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G106C3O2,String)
            End If
            If (G106C4O2 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G106C4O2,String)
            End If
            If (G106C1O3 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G106C1O3,String)
            End If
            If (G106C2O3 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G106C2O3,String)
            End If
            If (G106C3O3 Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(G106C3O3,String)
            End If
            If (G106C4O3 Is Nothing) Then
                command.Parameters(24).Value = Global.System.DBNull.Value
            Else
                command.Parameters(24).Value = CType(G106C4O3,String)
            End If
            If (G106C1O4 Is Nothing) Then
                command.Parameters(25).Value = Global.System.DBNull.Value
            Else
                command.Parameters(25).Value = CType(G106C1O4,String)
            End If
            If (G106C2O4 Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(G106C2O4,String)
            End If
            If (G106C3O4 Is Nothing) Then
                command.Parameters(27).Value = Global.System.DBNull.Value
            Else
                command.Parameters(27).Value = CType(G106C3O4,String)
            End If
            If (G106C4O4 Is Nothing) Then
                command.Parameters(28).Value = Global.System.DBNull.Value
            Else
                command.Parameters(28).Value = CType(G106C4O4,String)
            End If
            If (G106C1O5 Is Nothing) Then
                command.Parameters(29).Value = Global.System.DBNull.Value
            Else
                command.Parameters(29).Value = CType(G106C1O5,String)
            End If
            If (G106C2O5 Is Nothing) Then
                command.Parameters(30).Value = Global.System.DBNull.Value
            Else
                command.Parameters(30).Value = CType(G106C2O5,String)
            End If
            If (G106C3O5 Is Nothing) Then
                command.Parameters(31).Value = Global.System.DBNull.Value
            Else
                command.Parameters(31).Value = CType(G106C3O5,String)
            End If
            If (G106C4O5 Is Nothing) Then
                command.Parameters(32).Value = Global.System.DBNull.Value
            Else
                command.Parameters(32).Value = CType(G106C4O5,String)
            End If
            If (G106C1O6 Is Nothing) Then
                command.Parameters(33).Value = Global.System.DBNull.Value
            Else
                command.Parameters(33).Value = CType(G106C1O6,String)
            End If
            If (G106C2O6 Is Nothing) Then
                command.Parameters(34).Value = Global.System.DBNull.Value
            Else
                command.Parameters(34).Value = CType(G106C2O6,String)
            End If
            If (G106C3O6 Is Nothing) Then
                command.Parameters(35).Value = Global.System.DBNull.Value
            Else
                command.Parameters(35).Value = CType(G106C3O6,String)
            End If
            If (G106C4O6 Is Nothing) Then
                command.Parameters(36).Value = Global.System.DBNull.Value
            Else
                command.Parameters(36).Value = CType(G106C4O6,String)
            End If
            If (G106C1O7 Is Nothing) Then
                command.Parameters(37).Value = Global.System.DBNull.Value
            Else
                command.Parameters(37).Value = CType(G106C1O7,String)
            End If
            If (G106C2O7 Is Nothing) Then
                command.Parameters(38).Value = Global.System.DBNull.Value
            Else
                command.Parameters(38).Value = CType(G106C2O7,String)
            End If
            If (G106C3O7 Is Nothing) Then
                command.Parameters(39).Value = Global.System.DBNull.Value
            Else
                command.Parameters(39).Value = CType(G106C3O7,String)
            End If
            If (G106C4O7 Is Nothing) Then
                command.Parameters(40).Value = Global.System.DBNull.Value
            Else
                command.Parameters(40).Value = CType(G106C4O7,String)
            End If
            If (Assuré Is Nothing) Then
                command.Parameters(41).Value = Global.System.DBNull.Value
            Else
                command.Parameters(41).Value = CType(Assuré,String)
            End If
            If (G1420C1 Is Nothing) Then
                command.Parameters(42).Value = Global.System.DBNull.Value
            Else
                command.Parameters(42).Value = CType(G1420C1,String)
            End If
            If (G1420C2 Is Nothing) Then
                command.Parameters(43).Value = Global.System.DBNull.Value
            Else
                command.Parameters(43).Value = CType(G1420C2,String)
            End If
            If (G1420C3 Is Nothing) Then
                command.Parameters(44).Value = Global.System.DBNull.Value
            Else
                command.Parameters(44).Value = CType(G1420C3,String)
            End If
            If (G1511C2 Is Nothing) Then
                command.Parameters(45).Value = Global.System.DBNull.Value
            Else
                command.Parameters(45).Value = CType(G1511C2,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateQuery( _
                    ByVal G101C1 As String,  _
                    ByVal G101C2 As String,  _
                    ByVal G101C3 As String,  _
                    ByVal G101C7 As String,  _
                    ByVal G101C8 As String,  _
                    ByVal G101C9 As String,  _
                    ByVal G101C10 As String,  _
                    ByVal G101C11 As String,  _
                    ByVal G101C12 As String,  _
                    ByVal G101C13 As String,  _
                    ByVal G102C1 As String,  _
                    ByVal G102C2 As String,  _
                    ByVal G102C3 As String,  _
                    ByVal G103C1 As String,  _
                    ByVal G103C2 As String,  _
                    ByVal G103C3 As String,  _
                    ByVal G103C4 As String,  _
                    ByVal G103C5 As String,  _
                    ByVal G103C6 As String,  _
                    ByVal G103C7 As String,  _
                    ByVal G103C8 As String,  _
                    ByVal G103C9 As String,  _
                    ByVal G104C1 As String,  _
                    ByVal G104C2 As String,  _
                    ByVal G104C3 As String,  _
                    ByVal G104C4 As String,  _
                    ByVal G104C5 As String,  _
                    ByVal G104C6 As String,  _
                    ByVal G104C7 As String,  _
                    ByVal G104C8 As String,  _
                    ByVal G104C9 As String,  _
                    ByVal G104C10 As String,  _
                    ByVal G104C11 As String,  _
                    ByVal G104C12 As String,  _
                    ByVal G104C13 As String,  _
                    ByVal G104C14 As String,  _
                    ByVal G104C15 As String,  _
                    ByVal G104C16 As String,  _
                    ByVal G104C17 As String,  _
                    ByVal G104C18 As String,  _
                    ByVal G105C1O1 As String,  _
                    ByVal G105C2O1 As String,  _
                    ByVal G105C1O2 As String,  _
                    ByVal G105C2O2 As String,  _
                    ByVal G105C1O3 As String,  _
                    ByVal G105C2O3 As String,  _
                    ByVal G106C1O1 As String,  _
                    ByVal G106C2O1 As String,  _
                    ByVal G106C3O1 As String,  _
                    ByVal G106C4O1 As String,  _
                    ByVal G106C1O2 As String,  _
                    ByVal G106C2O2 As String,  _
                    ByVal G106C3O2 As String,  _
                    ByVal G106C4O2 As String,  _
                    ByVal G106C1O3 As String,  _
                    ByVal G106C2O3 As String,  _
                    ByVal G106C3O3 As String,  _
                    ByVal G106C4O3 As String,  _
                    ByVal G106C1O4 As String,  _
                    ByVal G106C2O4 As String,  _
                    ByVal G106C3O4 As String,  _
                    ByVal G106C4O4 As String,  _
                    ByVal G106C1O5 As String,  _
                    ByVal G106C2O5 As String,  _
                    ByVal G106C3O5 As String,  _
                    ByVal G106C4O5 As String,  _
                    ByVal G106C1O6 As String,  _
                    ByVal G106C2O6 As String,  _
                    ByVal G106C3O6 As String,  _
                    ByVal G106C4O6 As String,  _
                    ByVal G106C1O7 As String,  _
                    ByVal G106C2O7 As String,  _
                    ByVal G106C3O7 As String,  _
                    ByVal G106C4O7 As String,  _
                    ByVal G107C1 As String,  _
                    ByVal G107C2 As String,  _
                    ByVal G107C3 As String,  _
                    ByVal G107C4 As String,  _
                    ByVal G107C5 As String,  _
                    ByVal G107C6 As String,  _
                    ByVal G108C1O1 As String,  _
                    ByVal G108C2O1 As String,  _
                    ByVal G108C1O2 As String,  _
                    ByVal G108C2O2 As String,  _
                    ByVal G108C1O3 As String,  _
                    ByVal G108C2O3 As String,  _
                    ByVal G109C1 As String,  _
                    ByVal G109C2 As String,  _
                    ByVal G109C3 As String,  _
                    ByVal G109C4 As String,  _
                    ByVal G109C5 As String,  _
                    ByVal G109C6 As String,  _
                    ByVal G109C7 As String,  _
                    ByVal G109C8 As String,  _
                    ByVal G109C9 As String,  _
                    ByVal G109C10 As String,  _
                    ByVal G109C11 As String,  _
                    ByVal G109C12 As String,  _
                    ByVal G111C1 As String,  _
                    ByVal AMC_NumOrganisme As String,  _
                    ByVal AMC_NumAdherent As String,  _
                    ByVal AMC_TypeContrat As String,  _
                    ByVal AMC_DateDébut As String,  _
                    ByVal AMC_DateFin As String,  _
                    ByVal AMC_Piecejustificative As String,  _
                    ByVal AMC_Indicateurdetrairement As String,  _
                    ByVal AMC_NumMutuelle As String,  _
                    ByVal AMC_IDassure As String,  _
                    ByVal AMC_Code_Aiguillage_STS As String,  _
                    ByVal AMC_CodeRoutage As String,  _
                    ByVal AMC_IdHote As String,  _
                    ByVal AMC_NomDomaine As String,  _
                    ByVal AMC_Type_Convention As String,  _
                    ByVal AMC_Critère_secondaire As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal AMC_IdentifiantAMC As String,  _
                    ByVal Assuré As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(10)
            If (G101C1 Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(G101C1,String)
            End If
            If (G101C2 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G101C2,String)
            End If
            If (G101C3 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G101C3,String)
            End If
            If (G101C7 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G101C7,String)
            End If
            If (G101C8 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C8")
            Else
                command.Parameters(4).Value = CType(G101C8,String)
            End If
            If (G101C9 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G101C9")
            Else
                command.Parameters(5).Value = CType(G101C9,String)
            End If
            If (G101C10 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G101C10,String)
            End If
            If (G101C11 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G101C11,String)
            End If
            If (G101C12 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G101C12,String)
            End If
            If (G101C13 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G101C13,String)
            End If
            If (G102C1 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G102C1,String)
            End If
            If (G102C2 Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(G102C2,String)
            End If
            If (G102C3 Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(G102C3,String)
            End If
            If (G103C1 Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(G103C1,String)
            End If
            If (G103C2 Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(G103C2,String)
            End If
            If (G103C3 Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(G103C3,String)
            End If
            If (G103C4 Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(G103C4,String)
            End If
            If (G103C5 Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(G103C5,String)
            End If
            If (G103C6 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G103C6,String)
            End If
            If (G103C7 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G103C7,String)
            End If
            If (G103C8 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G103C8,String)
            End If
            If (G103C9 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G103C9,String)
            End If
            If (G104C1 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G104C1,String)
            End If
            If (G104C2 Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(G104C2,String)
            End If
            If (G104C3 Is Nothing) Then
                command.Parameters(24).Value = Global.System.DBNull.Value
            Else
                command.Parameters(24).Value = CType(G104C3,String)
            End If
            If (G104C4 Is Nothing) Then
                command.Parameters(25).Value = Global.System.DBNull.Value
            Else
                command.Parameters(25).Value = CType(G104C4,String)
            End If
            If (G104C5 Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(G104C5,String)
            End If
            If (G104C6 Is Nothing) Then
                command.Parameters(27).Value = Global.System.DBNull.Value
            Else
                command.Parameters(27).Value = CType(G104C6,String)
            End If
            If (G104C7 Is Nothing) Then
                command.Parameters(28).Value = Global.System.DBNull.Value
            Else
                command.Parameters(28).Value = CType(G104C7,String)
            End If
            If (G104C8 Is Nothing) Then
                command.Parameters(29).Value = Global.System.DBNull.Value
            Else
                command.Parameters(29).Value = CType(G104C8,String)
            End If
            If (G104C9 Is Nothing) Then
                command.Parameters(30).Value = Global.System.DBNull.Value
            Else
                command.Parameters(30).Value = CType(G104C9,String)
            End If
            If (G104C10 Is Nothing) Then
                command.Parameters(31).Value = Global.System.DBNull.Value
            Else
                command.Parameters(31).Value = CType(G104C10,String)
            End If
            If (G104C11 Is Nothing) Then
                command.Parameters(32).Value = Global.System.DBNull.Value
            Else
                command.Parameters(32).Value = CType(G104C11,String)
            End If
            If (G104C12 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C12")
            Else
                command.Parameters(33).Value = CType(G104C12,String)
            End If
            If (G104C13 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C13")
            Else
                command.Parameters(34).Value = CType(G104C13,String)
            End If
            If (G104C14 Is Nothing) Then
                Throw New Global.System.ArgumentNullException("G104C14")
            Else
                command.Parameters(35).Value = CType(G104C14,String)
            End If
            If (G104C15 Is Nothing) Then
                command.Parameters(36).Value = Global.System.DBNull.Value
            Else
                command.Parameters(36).Value = CType(G104C15,String)
            End If
            If (G104C16 Is Nothing) Then
                command.Parameters(37).Value = Global.System.DBNull.Value
            Else
                command.Parameters(37).Value = CType(G104C16,String)
            End If
            If (G104C17 Is Nothing) Then
                command.Parameters(38).Value = Global.System.DBNull.Value
            Else
                command.Parameters(38).Value = CType(G104C17,String)
            End If
            If (G104C18 Is Nothing) Then
                command.Parameters(39).Value = Global.System.DBNull.Value
            Else
                command.Parameters(39).Value = CType(G104C18,String)
            End If
            If (G105C1O1 Is Nothing) Then
                command.Parameters(40).Value = Global.System.DBNull.Value
            Else
                command.Parameters(40).Value = CType(G105C1O1,String)
            End If
            If (G105C2O1 Is Nothing) Then
                command.Parameters(41).Value = Global.System.DBNull.Value
            Else
                command.Parameters(41).Value = CType(G105C2O1,String)
            End If
            If (G105C1O2 Is Nothing) Then
                command.Parameters(42).Value = Global.System.DBNull.Value
            Else
                command.Parameters(42).Value = CType(G105C1O2,String)
            End If
            If (G105C2O2 Is Nothing) Then
                command.Parameters(43).Value = Global.System.DBNull.Value
            Else
                command.Parameters(43).Value = CType(G105C2O2,String)
            End If
            If (G105C1O3 Is Nothing) Then
                command.Parameters(44).Value = Global.System.DBNull.Value
            Else
                command.Parameters(44).Value = CType(G105C1O3,String)
            End If
            If (G105C2O3 Is Nothing) Then
                command.Parameters(45).Value = Global.System.DBNull.Value
            Else
                command.Parameters(45).Value = CType(G105C2O3,String)
            End If
            If (G106C1O1 Is Nothing) Then
                command.Parameters(46).Value = Global.System.DBNull.Value
            Else
                command.Parameters(46).Value = CType(G106C1O1,String)
            End If
            If (G106C2O1 Is Nothing) Then
                command.Parameters(47).Value = Global.System.DBNull.Value
            Else
                command.Parameters(47).Value = CType(G106C2O1,String)
            End If
            If (G106C3O1 Is Nothing) Then
                command.Parameters(48).Value = Global.System.DBNull.Value
            Else
                command.Parameters(48).Value = CType(G106C3O1,String)
            End If
            If (G106C4O1 Is Nothing) Then
                command.Parameters(49).Value = Global.System.DBNull.Value
            Else
                command.Parameters(49).Value = CType(G106C4O1,String)
            End If
            If (G106C1O2 Is Nothing) Then
                command.Parameters(50).Value = Global.System.DBNull.Value
            Else
                command.Parameters(50).Value = CType(G106C1O2,String)
            End If
            If (G106C2O2 Is Nothing) Then
                command.Parameters(51).Value = Global.System.DBNull.Value
            Else
                command.Parameters(51).Value = CType(G106C2O2,String)
            End If
            If (G106C3O2 Is Nothing) Then
                command.Parameters(52).Value = Global.System.DBNull.Value
            Else
                command.Parameters(52).Value = CType(G106C3O2,String)
            End If
            If (G106C4O2 Is Nothing) Then
                command.Parameters(53).Value = Global.System.DBNull.Value
            Else
                command.Parameters(53).Value = CType(G106C4O2,String)
            End If
            If (G106C1O3 Is Nothing) Then
                command.Parameters(54).Value = Global.System.DBNull.Value
            Else
                command.Parameters(54).Value = CType(G106C1O3,String)
            End If
            If (G106C2O3 Is Nothing) Then
                command.Parameters(55).Value = Global.System.DBNull.Value
            Else
                command.Parameters(55).Value = CType(G106C2O3,String)
            End If
            If (G106C3O3 Is Nothing) Then
                command.Parameters(56).Value = Global.System.DBNull.Value
            Else
                command.Parameters(56).Value = CType(G106C3O3,String)
            End If
            If (G106C4O3 Is Nothing) Then
                command.Parameters(57).Value = Global.System.DBNull.Value
            Else
                command.Parameters(57).Value = CType(G106C4O3,String)
            End If
            If (G106C1O4 Is Nothing) Then
                command.Parameters(58).Value = Global.System.DBNull.Value
            Else
                command.Parameters(58).Value = CType(G106C1O4,String)
            End If
            If (G106C2O4 Is Nothing) Then
                command.Parameters(59).Value = Global.System.DBNull.Value
            Else
                command.Parameters(59).Value = CType(G106C2O4,String)
            End If
            If (G106C3O4 Is Nothing) Then
                command.Parameters(60).Value = Global.System.DBNull.Value
            Else
                command.Parameters(60).Value = CType(G106C3O4,String)
            End If
            If (G106C4O4 Is Nothing) Then
                command.Parameters(61).Value = Global.System.DBNull.Value
            Else
                command.Parameters(61).Value = CType(G106C4O4,String)
            End If
            If (G106C1O5 Is Nothing) Then
                command.Parameters(62).Value = Global.System.DBNull.Value
            Else
                command.Parameters(62).Value = CType(G106C1O5,String)
            End If
            If (G106C2O5 Is Nothing) Then
                command.Parameters(63).Value = Global.System.DBNull.Value
            Else
                command.Parameters(63).Value = CType(G106C2O5,String)
            End If
            If (G106C3O5 Is Nothing) Then
                command.Parameters(64).Value = Global.System.DBNull.Value
            Else
                command.Parameters(64).Value = CType(G106C3O5,String)
            End If
            If (G106C4O5 Is Nothing) Then
                command.Parameters(65).Value = Global.System.DBNull.Value
            Else
                command.Parameters(65).Value = CType(G106C4O5,String)
            End If
            If (G106C1O6 Is Nothing) Then
                command.Parameters(66).Value = Global.System.DBNull.Value
            Else
                command.Parameters(66).Value = CType(G106C1O6,String)
            End If
            If (G106C2O6 Is Nothing) Then
                command.Parameters(67).Value = Global.System.DBNull.Value
            Else
                command.Parameters(67).Value = CType(G106C2O6,String)
            End If
            If (G106C3O6 Is Nothing) Then
                command.Parameters(68).Value = Global.System.DBNull.Value
            Else
                command.Parameters(68).Value = CType(G106C3O6,String)
            End If
            If (G106C4O6 Is Nothing) Then
                command.Parameters(69).Value = Global.System.DBNull.Value
            Else
                command.Parameters(69).Value = CType(G106C4O6,String)
            End If
            If (G106C1O7 Is Nothing) Then
                command.Parameters(70).Value = Global.System.DBNull.Value
            Else
                command.Parameters(70).Value = CType(G106C1O7,String)
            End If
            If (G106C2O7 Is Nothing) Then
                command.Parameters(71).Value = Global.System.DBNull.Value
            Else
                command.Parameters(71).Value = CType(G106C2O7,String)
            End If
            If (G106C3O7 Is Nothing) Then
                command.Parameters(72).Value = Global.System.DBNull.Value
            Else
                command.Parameters(72).Value = CType(G106C3O7,String)
            End If
            If (G106C4O7 Is Nothing) Then
                command.Parameters(73).Value = Global.System.DBNull.Value
            Else
                command.Parameters(73).Value = CType(G106C4O7,String)
            End If
            If (G107C1 Is Nothing) Then
                command.Parameters(74).Value = Global.System.DBNull.Value
            Else
                command.Parameters(74).Value = CType(G107C1,String)
            End If
            If (G107C2 Is Nothing) Then
                command.Parameters(75).Value = Global.System.DBNull.Value
            Else
                command.Parameters(75).Value = CType(G107C2,String)
            End If
            If (G107C3 Is Nothing) Then
                command.Parameters(76).Value = Global.System.DBNull.Value
            Else
                command.Parameters(76).Value = CType(G107C3,String)
            End If
            If (G107C4 Is Nothing) Then
                command.Parameters(77).Value = Global.System.DBNull.Value
            Else
                command.Parameters(77).Value = CType(G107C4,String)
            End If
            If (G107C5 Is Nothing) Then
                command.Parameters(78).Value = Global.System.DBNull.Value
            Else
                command.Parameters(78).Value = CType(G107C5,String)
            End If
            If (G107C6 Is Nothing) Then
                command.Parameters(79).Value = Global.System.DBNull.Value
            Else
                command.Parameters(79).Value = CType(G107C6,String)
            End If
            If (G108C1O1 Is Nothing) Then
                command.Parameters(80).Value = Global.System.DBNull.Value
            Else
                command.Parameters(80).Value = CType(G108C1O1,String)
            End If
            If (G108C2O1 Is Nothing) Then
                command.Parameters(81).Value = Global.System.DBNull.Value
            Else
                command.Parameters(81).Value = CType(G108C2O1,String)
            End If
            If (G108C1O2 Is Nothing) Then
                command.Parameters(82).Value = Global.System.DBNull.Value
            Else
                command.Parameters(82).Value = CType(G108C1O2,String)
            End If
            If (G108C2O2 Is Nothing) Then
                command.Parameters(83).Value = Global.System.DBNull.Value
            Else
                command.Parameters(83).Value = CType(G108C2O2,String)
            End If
            If (G108C1O3 Is Nothing) Then
                command.Parameters(84).Value = Global.System.DBNull.Value
            Else
                command.Parameters(84).Value = CType(G108C1O3,String)
            End If
            If (G108C2O3 Is Nothing) Then
                command.Parameters(85).Value = Global.System.DBNull.Value
            Else
                command.Parameters(85).Value = CType(G108C2O3,String)
            End If
            If (G109C1 Is Nothing) Then
                command.Parameters(86).Value = Global.System.DBNull.Value
            Else
                command.Parameters(86).Value = CType(G109C1,String)
            End If
            If (G109C2 Is Nothing) Then
                command.Parameters(87).Value = Global.System.DBNull.Value
            Else
                command.Parameters(87).Value = CType(G109C2,String)
            End If
            If (G109C3 Is Nothing) Then
                command.Parameters(88).Value = Global.System.DBNull.Value
            Else
                command.Parameters(88).Value = CType(G109C3,String)
            End If
            If (G109C4 Is Nothing) Then
                command.Parameters(89).Value = Global.System.DBNull.Value
            Else
                command.Parameters(89).Value = CType(G109C4,String)
            End If
            If (G109C5 Is Nothing) Then
                command.Parameters(90).Value = Global.System.DBNull.Value
            Else
                command.Parameters(90).Value = CType(G109C5,String)
            End If
            If (G109C6 Is Nothing) Then
                command.Parameters(91).Value = Global.System.DBNull.Value
            Else
                command.Parameters(91).Value = CType(G109C6,String)
            End If
            If (G109C7 Is Nothing) Then
                command.Parameters(92).Value = Global.System.DBNull.Value
            Else
                command.Parameters(92).Value = CType(G109C7,String)
            End If
            If (G109C8 Is Nothing) Then
                command.Parameters(93).Value = Global.System.DBNull.Value
            Else
                command.Parameters(93).Value = CType(G109C8,String)
            End If
            If (G109C9 Is Nothing) Then
                command.Parameters(94).Value = Global.System.DBNull.Value
            Else
                command.Parameters(94).Value = CType(G109C9,String)
            End If
            If (G109C10 Is Nothing) Then
                command.Parameters(95).Value = Global.System.DBNull.Value
            Else
                command.Parameters(95).Value = CType(G109C10,String)
            End If
            If (G109C11 Is Nothing) Then
                command.Parameters(96).Value = Global.System.DBNull.Value
            Else
                command.Parameters(96).Value = CType(G109C11,String)
            End If
            If (G109C12 Is Nothing) Then
                command.Parameters(97).Value = Global.System.DBNull.Value
            Else
                command.Parameters(97).Value = CType(G109C12,String)
            End If
            If (G111C1 Is Nothing) Then
                command.Parameters(98).Value = Global.System.DBNull.Value
            Else
                command.Parameters(98).Value = CType(G111C1,String)
            End If
            If (AMC_NumOrganisme Is Nothing) Then
                command.Parameters(99).Value = Global.System.DBNull.Value
            Else
                command.Parameters(99).Value = CType(AMC_NumOrganisme,String)
            End If
            If (AMC_NumAdherent Is Nothing) Then
                command.Parameters(100).Value = Global.System.DBNull.Value
            Else
                command.Parameters(100).Value = CType(AMC_NumAdherent,String)
            End If
            If (AMC_TypeContrat Is Nothing) Then
                command.Parameters(101).Value = Global.System.DBNull.Value
            Else
                command.Parameters(101).Value = CType(AMC_TypeContrat,String)
            End If
            If (AMC_DateDébut Is Nothing) Then
                command.Parameters(102).Value = Global.System.DBNull.Value
            Else
                command.Parameters(102).Value = CType(AMC_DateDébut,String)
            End If
            If (AMC_DateFin Is Nothing) Then
                command.Parameters(103).Value = Global.System.DBNull.Value
            Else
                command.Parameters(103).Value = CType(AMC_DateFin,String)
            End If
            If (AMC_Piecejustificative Is Nothing) Then
                command.Parameters(104).Value = Global.System.DBNull.Value
            Else
                command.Parameters(104).Value = CType(AMC_Piecejustificative,String)
            End If
            If (AMC_Indicateurdetrairement Is Nothing) Then
                command.Parameters(105).Value = Global.System.DBNull.Value
            Else
                command.Parameters(105).Value = CType(AMC_Indicateurdetrairement,String)
            End If
            If (AMC_NumMutuelle Is Nothing) Then
                command.Parameters(106).Value = Global.System.DBNull.Value
            Else
                command.Parameters(106).Value = CType(AMC_NumMutuelle,String)
            End If
            If (AMC_IDassure Is Nothing) Then
                command.Parameters(107).Value = Global.System.DBNull.Value
            Else
                command.Parameters(107).Value = CType(AMC_IDassure,String)
            End If
            If (AMC_Code_Aiguillage_STS Is Nothing) Then
                command.Parameters(108).Value = Global.System.DBNull.Value
            Else
                command.Parameters(108).Value = CType(AMC_Code_Aiguillage_STS,String)
            End If
            If (AMC_CodeRoutage Is Nothing) Then
                command.Parameters(109).Value = Global.System.DBNull.Value
            Else
                command.Parameters(109).Value = CType(AMC_CodeRoutage,String)
            End If
            If (AMC_IdHote Is Nothing) Then
                command.Parameters(110).Value = Global.System.DBNull.Value
            Else
                command.Parameters(110).Value = CType(AMC_IdHote,String)
            End If
            If (AMC_NomDomaine Is Nothing) Then
                command.Parameters(111).Value = Global.System.DBNull.Value
            Else
                command.Parameters(111).Value = CType(AMC_NomDomaine,String)
            End If
            If (AMC_Type_Convention Is Nothing) Then
                command.Parameters(112).Value = Global.System.DBNull.Value
            Else
                command.Parameters(112).Value = CType(AMC_Type_Convention,String)
            End If
            If (AMC_Critère_secondaire Is Nothing) Then
                command.Parameters(113).Value = Global.System.DBNull.Value
            Else
                command.Parameters(113).Value = CType(AMC_Critère_secondaire,String)
            End If
            If (IDPrescripteur Is Nothing) Then
                command.Parameters(114).Value = Global.System.DBNull.Value
            Else
                command.Parameters(114).Value = CType(IDPrescripteur,String)
            End If
            If (AMC_IdentifiantAMC Is Nothing) Then
                command.Parameters(115).Value = Global.System.DBNull.Value
            Else
                command.Parameters(115).Value = CType(AMC_IdentifiantAMC,String)
            End If
            If (Assuré Is Nothing) Then
                command.Parameters(116).Value = Global.System.DBNull.Value
            Else
                command.Parameters(116).Value = CType(Assuré,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class LPPTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "LPP"
            tableMapping.ColumnMappings.Add("CodeLPP", "CodeLPP")
            tableMapping.ColumnMappings.Add("PrixLPP", "PrixLPP")
            tableMapping.ColumnMappings.Add("DateMax", "DateMax")
            tableMapping.ColumnMappings.Add("DateMin", "DateMin")
            tableMapping.ColumnMappings.Add("Prestation", "Prestation")
            tableMapping.ColumnMappings.Add("Entente_Préalable", "Entente_Préalable")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.DeleteCommand.Connection = Me.Connection
            Me._adapter.DeleteCommand.CommandText = "DELETE FROM [LPP] WHERE (([CodeLPP] = @Original_CodeLPP) AND ([PrixLPP] = @Origin"& _ 
                "al_PrixLPP) AND ([DateMax] = @Original_DateMax) AND ((@IsNull_DateMin = 1 AND [D"& _ 
                "ateMin] IS NULL) OR ([DateMin] = @Original_DateMin)))"
            Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CodeLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeLPP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PrixLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixLPP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DateMax", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMax", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DateMin", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DateMin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [LPP] ([CodeLPP], [PrixLPP], [DateMax], [DateMin], [Entente_Préalable"& _ 
                "], [Prestation]) VALUES (@CodeLPP, @PrixLPP, @DateMax, @DateMin, @Entente_Préala"& _ 
                "ble, @Prestation)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeLPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PrixLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixLPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMax", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMax", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Entente_Préalable", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Entente_Préalable", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prestation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [LPP] SET [CodeLPP] = @CodeLPP, [PrixLPP] = @PrixLPP, [DateMax] = @DateMax"& _ 
                ", [DateMin] = @DateMin WHERE (([CodeLPP] = @Original_CodeLPP) AND ([PrixLPP] = @"& _ 
                "Original_PrixLPP) AND ([DateMax] = @Original_DateMax) AND ((@IsNull_DateMin = 1 "& _ 
                "AND [DateMin] IS NULL) OR ([DateMin] = @Original_DateMin)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT CodeLPP, Pr"& _ 
                "ixLPP, DateMax, DateMin FROM LPP WHERE (CodeLPP = @CodeLPP)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeLPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PrixLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixLPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMax", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMax", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CodeLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeLPP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PrixLPP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PrixLPP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DateMax", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMax", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DateMin", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DateMin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CodeLPP, PrixLPP, DateMax, DateMin, Entente_Préalable, Prestation FROM LPP"& _ 
                ""
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE FROM [LPP]"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Entente_Préalable FROM LPP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Where  CodeLPP=@CodeLPP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and CAST(DateMin AS i"& _ 
                "nt)<=@datedroit "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and CAST(DateMax AS int)>=@datedroit"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeLPP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeLPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@datedroit", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT PrixLPP, DateMin, Entente_Préalable, Prestation FROM LPP WHERE (CodeLPP = "& _ 
                "@CodeLPP) AND (CAST(DateMax AS int) >= @Date) AND (CAST(DateMin AS int) <= @Date"& _ 
                ")"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeLPP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeLPP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.LPPDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.LPPDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.LPPDataTable = New PharmaDataSet.LPPDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.LPPDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "LPP")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)>  _
        Public Overloads Overridable Function Delete(ByVal Original_CodeLPP As String, ByVal Original_PrixLPP As String, ByVal Original_DateMax As String, ByVal Original_DateMin As String) As Integer
            If (Original_CodeLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_CodeLPP")
            Else
                Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_CodeLPP,String)
            End If
            If (Original_PrixLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_PrixLPP")
            Else
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(Original_PrixLPP,String)
            End If
            If (Original_DateMax Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_DateMax")
            Else
                Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_DateMax,String)
            End If
            If (Original_DateMin Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_DateMin,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
            If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.DeleteCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.DeleteCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CodeLPP As String, ByVal PrixLPP As String, ByVal DateMax As String, ByVal DateMin As String, ByVal Entente_Préalable As Global.System.Nullable(Of Boolean), ByVal Prestation As String) As Integer
            If (CodeLPP Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CodeLPP,String)
            End If
            If (PrixLPP Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(PrixLPP,String)
            End If
            If (DateMax Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(DateMax,String)
            End If
            If (DateMin Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(DateMin,String)
            End If
            If (Entente_Préalable.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(Entente_Préalable.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Prestation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Prestation,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update(ByVal CodeLPP As String, ByVal PrixLPP As String, ByVal DateMax As String, ByVal DateMin As String, ByVal Original_CodeLPP As String, ByVal Original_PrixLPP As String, ByVal Original_DateMax As String, ByVal Original_DateMin As String) As Integer
            If (CodeLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeLPP")
            Else
                Me.Adapter.UpdateCommand.Parameters(0).Value = CType(CodeLPP,String)
            End If
            If (PrixLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("PrixLPP")
            Else
                Me.Adapter.UpdateCommand.Parameters(1).Value = CType(PrixLPP,String)
            End If
            If (DateMax Is Nothing) Then
                Throw New Global.System.ArgumentNullException("DateMax")
            Else
                Me.Adapter.UpdateCommand.Parameters(2).Value = CType(DateMax,String)
            End If
            If (DateMin Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(3).Value = CType(DateMin,String)
            End If
            If (Original_CodeLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_CodeLPP")
            Else
                Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Original_CodeLPP,String)
            End If
            If (Original_PrixLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_PrixLPP")
            Else
                Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Original_PrixLPP,String)
            End If
            If (Original_DateMax Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_DateMax")
            Else
                Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Original_DateMax,String)
            End If
            If (Original_DateMin Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_DateMin,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
            If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.UpdateCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.UpdateCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update(ByVal PrixLPP As String, ByVal DateMax As String, ByVal DateMin As String, ByVal Original_CodeLPP As String, ByVal Original_PrixLPP As String, ByVal Original_DateMax As String, ByVal Original_DateMin As String) As Integer
            Return Me.Update(Original_CodeLPP, PrixLPP, DateMax, DateMin, Original_CodeLPP, Original_PrixLPP, Original_DateMax, Original_DateMin)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_All() As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Entente_Préalable(ByVal CodeLPP As String, ByVal datedroit As Integer) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (CodeLPP Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CodeLPP,String)
            End If
            command.Parameters(1).Value = CType(datedroit,Integer)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function selectPrixLPPByCode(ByVal CodeLPP As String, ByVal _Date As Integer) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (CodeLPP Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeLPP")
            Else
                command.Parameters(0).Value = CType(CodeLPP,String)
            End If
            command.Parameters(1).Value = CType(_Date,Integer)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class FacturesTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Factures"
            tableMapping.ColumnMappings.Add("Num", "Num")
            tableMapping.ColumnMappings.Add("G1110C2", "G1110C2")
            tableMapping.ColumnMappings.Add("G1110C3", "G1110C3")
            tableMapping.ColumnMappings.Add("G1110C4", "G1110C4")
            tableMapping.ColumnMappings.Add("G1230C1", "G1230C1")
            tableMapping.ColumnMappings.Add("G1410C1", "G1410C1")
            tableMapping.ColumnMappings.Add("G1420C1", "G1420C1")
            tableMapping.ColumnMappings.Add("G1420C2", "G1420C2")
            tableMapping.ColumnMappings.Add("G1420C3", "G1420C3")
            tableMapping.ColumnMappings.Add("G1440C1", "G1440C1")
            tableMapping.ColumnMappings.Add("G1440C2", "G1440C2")
            tableMapping.ColumnMappings.Add("G1440C3", "G1440C3")
            tableMapping.ColumnMappings.Add("G1450C1", "G1450C1")
            tableMapping.ColumnMappings.Add("G1450C2", "G1450C2")
            tableMapping.ColumnMappings.Add("G1511C1", "G1511C1")
            tableMapping.ColumnMappings.Add("G1511C2", "G1511C2")
            tableMapping.ColumnMappings.Add("G1512C1", "G1512C1")
            tableMapping.ColumnMappings.Add("G1513C1", "G1513C1")
            tableMapping.ColumnMappings.Add("G1513C2", "G1513C2")
            tableMapping.ColumnMappings.Add("G1513C3", "G1513C3")
            tableMapping.ColumnMappings.Add("G1514C1", "G1514C1")
            tableMapping.ColumnMappings.Add("G1514C2", "G1514C2")
            tableMapping.ColumnMappings.Add("G1514C3", "G1514C3")
            tableMapping.ColumnMappings.Add("G1514C4", "G1514C4")
            tableMapping.ColumnMappings.Add("CRLdeFSE", "CRLdeFSE")
            tableMapping.ColumnMappings.Add("CRLdeDRE", "CRLdeDRE")
            tableMapping.ColumnMappings.Add("G1120C1", "G1120C1")
            tableMapping.ColumnMappings.Add("G1130C1", "G1130C1")
            tableMapping.ColumnMappings.Add("G1130C2", "G1130C2")
            tableMapping.ColumnMappings.Add("G1130C3", "G1130C3")
            tableMapping.ColumnMappings.Add("G1130C4", "G1130C4")
            tableMapping.ColumnMappings.Add("G1130C5", "G1130C5")
            tableMapping.ColumnMappings.Add("G1130C6", "G1130C6")
            tableMapping.ColumnMappings.Add("G1130C7", "G1130C7")
            tableMapping.ColumnMappings.Add("G1130C8", "G1130C8")
            tableMapping.ColumnMappings.Add("G1211C1", "G1211C1")
            tableMapping.ColumnMappings.Add("G1211C2", "G1211C2")
            tableMapping.ColumnMappings.Add("G1211C3", "G1211C3")
            tableMapping.ColumnMappings.Add("G1211C4", "G1211C4")
            tableMapping.ColumnMappings.Add("G1211C5", "G1211C5")
            tableMapping.ColumnMappings.Add("G1211C6", "G1211C6")
            tableMapping.ColumnMappings.Add("G1211C7", "G1211C7")
            tableMapping.ColumnMappings.Add("G1213C1", "G1213C1")
            tableMapping.ColumnMappings.Add("G1213C2", "G1213C2")
            tableMapping.ColumnMappings.Add("G1213C3", "G1213C3")
            tableMapping.ColumnMappings.Add("G1213C4", "G1213C4")
            tableMapping.ColumnMappings.Add("G1213C5", "G1213C5")
            tableMapping.ColumnMappings.Add("G1213C6", "G1213C6")
            tableMapping.ColumnMappings.Add("G1213C7", "G1213C7")
            tableMapping.ColumnMappings.Add("G1213C8", "G1213C8")
            tableMapping.ColumnMappings.Add("G1214C1", "G1214C1")
            tableMapping.ColumnMappings.Add("G1214C2", "G1214C2")
            tableMapping.ColumnMappings.Add("G1214C3", "G1214C3")
            tableMapping.ColumnMappings.Add("G1214C4", "G1214C4")
            tableMapping.ColumnMappings.Add("G1214C5", "G1214C5")
            tableMapping.ColumnMappings.Add("G1214C6", "G1214C6")
            tableMapping.ColumnMappings.Add("G1214C7", "G1214C7")
            tableMapping.ColumnMappings.Add("G1214C8", "G1214C8")
            tableMapping.ColumnMappings.Add("G1110C1", "G1110C1")
            tableMapping.ColumnMappings.Add("G1310C1", "G1310C1")
            tableMapping.ColumnMappings.Add("G1310C2", "G1310C2")
            tableMapping.ColumnMappings.Add("G1310C3", "G1310C3")
            tableMapping.ColumnMappings.Add("G1310C4", "G1310C4")
            tableMapping.ColumnMappings.Add("G1310C5", "G1310C5")
            tableMapping.ColumnMappings.Add("G1910C1", "G1910C1")
            tableMapping.ColumnMappings.Add("G1910C2", "G1910C2")
            tableMapping.ColumnMappings.Add("G1910C3", "G1910C3")
            tableMapping.ColumnMappings.Add("G1910C4", "G1910C4")
            tableMapping.ColumnMappings.Add("G1910C5", "G1910C5")
            tableMapping.ColumnMappings.Add("G1910C6", "G1910C6")
            tableMapping.ColumnMappings.Add("IDPrescripteur", "IDPrescripteur")
            tableMapping.ColumnMappings.Add("G1160C1", "G1160C1")
            tableMapping.ColumnMappings.Add("G1160C2", "G1160C2")
            tableMapping.ColumnMappings.Add("G1321C1", "G1321C1")
            tableMapping.ColumnMappings.Add("G1321C2", "G1321C2")
            tableMapping.ColumnMappings.Add("G1321C3", "G1321C3")
            tableMapping.ColumnMappings.Add("G1321C4", "G1321C4")
            tableMapping.ColumnMappings.Add("G1321C5", "G1321C5")
            tableMapping.ColumnMappings.Add("G1321C6", "G1321C6")
            tableMapping.ColumnMappings.Add("G1321C7", "G1321C7")
            tableMapping.ColumnMappings.Add("G1321C8", "G1321C8")
            tableMapping.ColumnMappings.Add("G1321C9", "G1321C9")
            tableMapping.ColumnMappings.Add("G1321C10", "G1321C10")
            tableMapping.ColumnMappings.Add("G1321C11", "G1321C11")
            tableMapping.ColumnMappings.Add("G1321C12", "G1321C12")
            tableMapping.ColumnMappings.Add("Bénéficiaire", "Bénéficiaire")
            tableMapping.ColumnMappings.Add("Assuré", "Assuré")
            tableMapping.ColumnMappings.Add("G1120C2", "G1120C2")
            tableMapping.ColumnMappings.Add("FactureAcree", "FactureAcree")
            tableMapping.ColumnMappings.Add("Num_Lot_FSE", "Num_Lot_FSE")
            tableMapping.ColumnMappings.Add("Num_Lot_DRE", "Num_Lot_DRE")
            tableMapping.ColumnMappings.Add("G1330C1", "G1330C1")
            tableMapping.ColumnMappings.Add("G1330C2", "G1330C2")
            tableMapping.ColumnMappings.Add("G3700C1", "G3700C1")
            tableMapping.ColumnMappings.Add("G3700C2", "G3700C2")
            tableMapping.ColumnMappings.Add("G3730C1", "G3730C1")
            tableMapping.ColumnMappings.Add("ModeSecur", "ModeSecur")
            tableMapping.ColumnMappings.Add("Date_Lot_FSE", "Date_Lot_FSE")
            tableMapping.ColumnMappings.Add("Date_Lot_DRE", "Date_Lot_DRE")
            tableMapping.ColumnMappings.Add("Composite_Convention", "Composite_Convention")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Factures] ([Num], [G1110C2], [G1110C3], [G1110C4], [G1230C1], [G1410"& _ 
                "C1], [G1420C1], [G1420C2], [G1420C3], [G1440C1], [G1440C2], [G1440C3], [G1450C1]"& _ 
                ", [G1450C2], [G1511C1], [G1511C2], [G1512C1], [G1513C1], [G1513C2], [G1513C3], ["& _ 
                "G1514C1], [G1514C2], [G1514C3], [G1514C4], [CRLdeDRE], [CRLdeFSE], [G1120C1], [G"& _ 
                "1130C1], [G1130C2], [G1130C3], [G1130C4], [G1130C5], [G1130C6], [G1130C7], [G113"& _ 
                "0C8], [G1211C1], [G1211C2], [G1211C3], [G1211C4], [G1211C5], [G1211C6], [G1211C7"& _ 
                "], [G1213C1], [G1213C2], [G1213C3], [G1213C4], [G1213C5], [G1213C6], [G1213C7], "& _ 
                "[G1213C8], [G1214C1], [G1214C2], [G1214C3], [G1214C4], [G1214C5], [G1214C6], [G1"& _ 
                "214C7], [G1214C8], [G1110C1], [G1310C1], [G1310C2], [G1310C3], [G1310C4], [G1310"& _ 
                "C5], [G1910C1], [G1910C2], [G1910C3], [G1910C4], [G1910C5], [G1910C6], [IDPrescr"& _ 
                "ipteur], [G1160C1], [G1160C2], [G1321C1], [G1321C10], [G1321C11], [G1321C12], [G"& _ 
                "1321C2], [G1321C3], [G1321C4], [G1321C5], [G1321C6], [G1321C7], [G1321C8], [G132"& _ 
                "1C9], [Assuré], [Bénéficiaire], [G1120C2], [FactureAcree], [Num_Lot_DRE], [Num_L"& _ 
                "ot_FSE], [G1330C1], [G1330C2], [G3700C1], [G3700C2], [G3730C1], [ModeSecur], [Da"& _ 
                "te_Lot_DRE], [Date_Lot_FSE], [Composite_Convention]) VALUES (@Num, @G1110C2, @G1"& _ 
                "110C3, @G1110C4, @G1230C1, @G1410C1, @G1420C1, @G1420C2, @G1420C3, @G1440C1, @G1"& _ 
                "440C2, @G1440C3, @G1450C1, @G1450C2, @G1511C1, @G1511C2, @G1512C1, @G1513C1, @G1"& _ 
                "513C2, @G1513C3, @G1514C1, @G1514C2, @G1514C3, @G1514C4, @CRLdeDRE, @CRLdeFSE, @"& _ 
                "G1120C1, @G1130C1, @G1130C2, @G1130C3, @G1130C4, @G1130C5, @G1130C6, @G1130C7, @"& _ 
                "G1130C8, @G1211C1, @G1211C2, @G1211C3, @G1211C4, @G1211C5, @G1211C6, @G1211C7, @"& _ 
                "G1213C1, @G1213C2, @G1213C3, @G1213C4, @G1213C5, @G1213C6, @G1213C7, @G1213C8, @"& _ 
                "G1214C1, @G1214C2, @G1214C3, @G1214C4, @G1214C5, @G1214C6, @G1214C7, @G1214C8, @"& _ 
                "G1110C1, @G1310C1, @G1310C2, @G1310C3, @G1310C4, @G1310C5, @G1910C1, @G1910C2, @"& _ 
                "G1910C3, @G1910C4, @G1910C5, @G1910C6, @IDPrescripteur, @G1160C1, @G1160C2, @G13"& _ 
                "21C1, @G1321C10, @G1321C11, @G1321C12, @G1321C2, @G1321C3, @G1321C4, @G1321C5, @"& _ 
                "G1321C6, @G1321C7, @G1321C8, @G1321C9, @Assuré, @Bénéficiaire, @G1120C2, @Factur"& _ 
                "eAcree, @Num_Lot_DRE, @Num_Lot_FSE, @G1330C1, @G1330C2, @G3700C1, @G3700C2, @G37"& _ 
                "30C1, @ModeSecur, @Date_Lot_DRE, @Date_Lot_FSE, @Composite_Convention)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1230C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1230C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1410C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1410C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1440C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1440C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1440C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1440C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1440C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1440C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1450C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1450C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1450C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1450C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1512C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1512C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1513C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1513C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1513C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1513C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1513C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1513C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRLdeDRE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CRLdeDRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRLdeFSE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CRLdeFSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1120C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1120C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C1", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C3", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C5", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C6", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1160C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1160C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1160C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1160C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Bénéficiaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Bénéficiaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1120C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1120C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FactureAcree", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FactureAcree", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Lot_DRE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Lot_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Lot_FSE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Lot_FSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1330C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1330C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1330C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1330C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3700C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G3700C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3700C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G3700C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3730C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G3730C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ModeSecur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ModeSecur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date_Lot_DRE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_Lot_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date_Lot_FSE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_Lot_FSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Composite_Convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Composite_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(11) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Num, G1110C2, G1110C3, G1110C4, G1230C1, G1410C1, G1420C1, G1420C2, G1420C"& _ 
                "3, G1440C1, G1440C2, G1440C3, G1450C1, G1450C2, G1511C1, G1511C2, G1512C1, G1513"& _ 
                "C1, G1513C2, G1513C3, G1514C1, G1514C2, G1514C3, G1514C4, CRLdeDRE, CRLdeFSE, G1"& _ 
                "120C1, G1130C1, G1130C2, G1130C3, G1130C4, G1130C5, G1130C6, G1130C7, G1130C8, G"& _ 
                "1211C1, G1211C2, G1211C3, G1211C4, G1211C5, G1211C6, G1211C7, G1213C1, G1213C2, "& _ 
                "G1213C3, G1213C4, G1213C5, G1213C6, G1213C7, G1213C8, G1214C1, G1214C2, G1214C3,"& _ 
                " G1214C4, G1214C5, G1214C6, G1214C7, G1214C8, G1110C1, G1310C1, G1310C2, G1310C3"& _ 
                ", G1310C4, G1310C5, G1910C1, G1910C2, G1910C3, G1910C4, G1910C5, G1910C6, IDPres"& _ 
                "cripteur, G1160C1, G1160C2, G1321C1, G1321C10, G1321C11, G1321C12, G1321C2, G132"& _ 
                "1C3, G1321C4, G1321C5, G1321C6, G1321C7, G1321C8, G1321C9, Assuré, Bénéficiaire,"& _ 
                " G1120C2, FactureAcree, Num_Lot_DRE, Num_Lot_FSE, G1330C1, G1330C2, G3700C1, G37"& _ 
                "00C2, G3730C1, ModeSecur, Date_Lot_DRE, Date_Lot_FSE, Composite_Convention FROM "& _ 
                "Factures"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE from factures"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where num=@num"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@num", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Num, G1110C2, G1110C3, G1110C4, G1230C1, G1410C1, G1420C1, G1420C2, G1420C"& _ 
                "3, G1440C1, G1440C2, G1440C3, G1450C1, G1450C2, G1511C1, G1511C2, G1512C1, G1513"& _ 
                "C1, G1513C2, G1513C3, G1514C1, G1514C2, G1514C3, G1514C4, CRLdeDRE, CRLdeFSE, G1"& _ 
                "120C1, G1130C1, G1130C2, G1130C3, G1130C4, G1130C5, G1130C6, G1130C7, G1130C8, G"& _ 
                "1211C1, G1211C2, G1211C3, G1211C4, G1211C5, G1211C6, G1211C7, G1213C1, G1213C2, "& _ 
                "G1213C3, G1213C4, G1213C5, G1213C6, G1213C7, G1213C8, G1214C1, G1214C2, G1214C3,"& _ 
                " G1214C4, G1214C5, G1214C6, G1214C7, G1214C8, G1110C1, G1310C1, G1310C2, G1310C3"& _ 
                ", G1310C4, G1310C5, G1910C1, G1910C2, G1910C3, G1910C4, G1910C5, G1910C6, IDPres"& _ 
                "cripteur, G1160C1, G1160C2, G1321C1, G1321C10, G1321C11, G1321C12, G1321C2, G132"& _ 
                "1C3, G1321C4, G1321C5, G1321C6, G1321C7, G1321C8, G1321C9, Assuré, Bénéficiaire,"& _ 
                " G1120C2, FactureAcree, Num_Lot_DRE, Num_Lot_FSE, G1330C1, G1330C2, G3700C1, G37"& _ 
                "00C2, G3730C1, ModeSecur, Date_Lot_DRE, Date_Lot_FSE, Composite_Convention FROM "& _ 
                "Factures WHERE (CAST(G1110C3 AS float) >= @date_mini)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date_mini", Global.System.Data.SqlDbType.Real, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT Num, G1110C2, G1110C3, G1110C4, G1230C1, G1410C1, G1420C1, G1420C2, G1420C"& _ 
                "3, G1440C1, G1440C2, G1440C3, G1450C1, G1450C2, G1511C1, G1511C2, G1512C1, G1513"& _ 
                "C1, G1513C2, G1513C3, G1514C1, G1514C2, G1514C3, G1514C4, CRLdeDRE, CRLdeFSE, G1"& _ 
                "120C1, G1130C1, G1130C2, G1130C3, G1130C4, G1130C5, G1130C6, G1130C7, G1130C8, G"& _ 
                "1211C1, G1211C2, G1211C3, G1211C4, G1211C5, G1211C6, G1211C7, G1213C1, G1213C2, "& _ 
                "G1213C3, G1213C4, G1213C5, G1213C6, G1213C7, G1213C8, G1214C1, G1214C2, G1214C3,"& _ 
                " G1214C4, G1214C5, G1214C6, G1214C7, G1214C8, G1110C1, G1310C1, G1310C2, G1310C3"& _ 
                ", G1310C4, G1310C5, G1910C1, G1910C2, G1910C3, G1910C4, G1910C5, G1910C6, IDPres"& _ 
                "cripteur, G1160C1, G1160C2, G1321C1, G1321C10, G1321C11, G1321C12, G1321C2, G132"& _ 
                "1C3, G1321C4, G1321C5, G1321C6, G1321C7, G1321C8, G1321C9, Assuré, Bénéficiaire,"& _ 
                " G1120C2, FactureAcree, Num_Lot_DRE, Num_Lot_FSE, G1330C1, G1330C2, G3700C1, G37"& _ 
                "00C2, G3730C1, ModeSecur, Date_Lot_DRE, Date_Lot_FSE, Composite_Convention FROM "& _ 
                "Factures WHERE (Num_Lot_FSE = @Num_Lot_FSE) OR (Num_Lot_DRE = @Num_Lot_DRE)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Lot_FSE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Lot_FSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Lot_DRE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Lot_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT Num, G1110C2, G1110C3, G1110C4, G1230C1, G1410C1, G1420C1, G1420C2, G1420C"& _ 
                "3, G1440C1, G1440C2, G1440C3, G1450C1, G1450C2, G1511C1, G1511C2, G1512C1, G1513"& _ 
                "C1, G1513C2, G1513C3, G1514C1, G1514C2, G1514C3, G1514C4, CRLdeDRE, CRLdeFSE, G1"& _ 
                "120C1, G1130C1, G1130C2, G1130C3, G1130C4, G1130C5, G1130C6, G1130C7, G1130C8, G"& _ 
                "1211C1, G1211C2, G1211C3, G1211C4, G1211C5, G1211C6, G1211C7, G1213C1, G1213C2, "& _ 
                "G1213C3, G1213C4, G1213C5, G1213C6, G1213C7, G1213C8, G1214C1, G1214C2, G1214C3,"& _ 
                " G1214C4, G1214C5, G1214C6, G1214C7, G1214C8, G1110C1, G1310C1, G1310C2, G1310C3"& _ 
                ", G1310C4, G1310C5, G1910C1, G1910C2, G1910C3, G1910C4, G1910C5, G1910C6, IDPres"& _ 
                "cripteur, G1160C1, G1160C2, G1321C1, G1321C10, G1321C11, G1321C12, G1321C2, G132"& _ 
                "1C3, G1321C4, G1321C5, G1321C6, G1321C7, G1321C8, G1321C9, Assuré, Bénéficiaire,"& _ 
                " G1120C2, FactureAcree, Num_Lot_DRE, Num_Lot_FSE, G1330C1, G1330C2, G3700C1, G37"& _ 
                "00C2, G3730C1, ModeSecur, Date_Lot_DRE, Date_Lot_FSE, Composite_Convention FROM "& _ 
                "Factures"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" WHERE (Num = @Num)"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "INSERT INTO [dbo].[Factures] ([Num]) VALUES (@Num)"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "UPDATE [Factures] "&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET"&Global.Microsoft.VisualBasic.ChrW(9)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1110C1]=@G110C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1110C2]=@G1110C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1110C3]=@G1"& _ 
                "110C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1110C4]=@G1110C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1120C1]=@G1120C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1120C2]=@G1120C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C1]"& _ 
                "=@G1130C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C2]=@G1130C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C3]=@G1130C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C4]=@G1130C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G113"& _ 
                "0C5]=@G1130C5,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C6]=@G1130C6, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C7]= @G1130C7,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1130C8]=@G1130C8, "& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1160C1]= @G1160C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1160C2]=@G1160C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C1]=@G1211C1, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C2]=@G1"& _ 
                "211C2, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C3]=@G1211C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C4]=@G1211C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C5]=@G1211C5,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C6"& _ 
                "]=@G1211C6,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1211C7]=@G1211C7,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1213C1]=@G1213C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1213C2]=@G1213C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G12"& _ 
                "13C3]=@G1213C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1213C4]=@G1213C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1213C5]=@G1213C5,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1213C6]=@G1213C6,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                "[G1213C7]=@G1213C7,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1213C8]=@G1213C8,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C1]=@G1214C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C2]=@G1214C"& _ 
                "2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C3]=@G1214C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C4]=@G1214C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C5]=@G1214C5,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C6]=@G1"& _ 
                "214C6,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C7]=@G1214C7,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1214C8]=@G1214C8,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1230C1]=@G1230C1, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1310C1"& _ 
                "]=@G1310C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1310C2]=@G1310C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1310C3]=@G1310C3, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1310C4]=@G1310C4, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G"& _ 
                "1310C5]=@G1310C5,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C1]=@G1321C1, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C2]=@G1321C2, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C3]=@G1321C"& _ 
                "3, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C4]=@G1321C4, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C5]=@G1321C5, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C6]=@G1321C6, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C7]"& _ 
                "=@G1321C7, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C8]=@G1321C8, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C9]=@G1321C9, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C10]=@G1321C10, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C11]=@G1321C11, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1321C12]=@G1321C12,  "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1330C1]=@G1330C1,  "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1330C"& _ 
                "2]=@G1330C2, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1410C1]=@G1410C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1420C1]=@G1420C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1420C2]=@G1420C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G"& _ 
                "1420C3]=@G1420C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1440C1]=@G1440C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1440C2]=@G1440C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1440C3]=@G1440C3,"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1511C1]=@G1511C1, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1511C2]=@G1511C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1512C1]=@G1512C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1513C1]=@G15"& _ 
                "13C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1513C2]=@G1513C2, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1513C3]=@G1513C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1514C1]=@G1514C1, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1514C2"& _ 
                "]=@G1514C2, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1514C3]=@G1514C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1514C4]=@G1514C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1910C1]=@G1910C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1"& _ 
                "910C2]=@G1910C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1910C3]=@G1910C3,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1910C4]=@G1910C4,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1910C5]=@G1910C5,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1910C6]=@G1910C6,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G3700C1]=@G3700C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G3700C2]=@G3700C2,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G3730C1]=@G3730"& _ 
                "C1,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[CRLdeDRE]=@CRLdeDRE, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[CRLdeFSE]=@CRLdeFSE,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[IDPrescripteur]=@IDPrescrip"& _ 
                "teur,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[Bénéficiaire]=@Bénéficiaire,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[Assuré]=@Assuré,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[FactureAcree]=@Facture"& _ 
                "Acree,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[ModeSecur]=@ModeSecur,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[Num_Lot_FSE]='',"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[Num_Lot_DRE]='',"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[Composit"& _ 
                "e_Convention]=@Composite_Convention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE [Num]=@Num"
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G110C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1120C1", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "G1120C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1120C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1120C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1130C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1130C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1160C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1160C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1160C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1160C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1211C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1211C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1213C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1213C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1214C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1214C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1230C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1230C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C1", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C2", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C3", Global.System.Data.SqlDbType.NVarChar, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C4", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1310C5", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G1310C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1321C12", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1321C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1330C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1330C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1330C2", Global.System.Data.SqlDbType.NVarChar, 34, Global.System.Data.ParameterDirection.Input, 0, 0, "G1330C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1410C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1410C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1420C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1420C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1440C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1440C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1440C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1440C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1440C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1440C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1511C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1511C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1512C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1512C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1513C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1513C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1513C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1513C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1513C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1513C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1514C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1514C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C1", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C2", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C3", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C4", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C5", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1910C6", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1910C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3700C1", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G3700C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3700C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G3700C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3730C1", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "G3730C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRLdeDRE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRLdeDRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRLdeFSE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRLdeFSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IDPrescripteur", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "IDPrescripteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Bénéficiaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Bénéficiaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FactureAcree", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "FactureAcree", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ModeSecur", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ModeSecur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Composite_Convention", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Composite_Convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(7) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(7).Connection = Me.Connection
            Me._commandCollection(7).CommandText = "SELECT max(num) FROM Factures"
            Me._commandCollection(7).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(8).Connection = Me.Connection
            Me._commandCollection(8).CommandText = "UPDATE factures"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"set Num_Lot_DRE=@Num_Lot_DRE,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Date_Lot_DRE=@Date_Lot_DRE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"& _ 
                " Num=@NumFacture"
            Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Lot_DRE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Lot_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date_Lot_DRE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_Lot_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(9) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(9).Connection = Me.Connection
            Me._commandCollection(9).CommandText = "UPDATE factures"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"set Num_Lot_FSE=@Num_Lot_FSE,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Date_Lot_FSE=@Date_Lot_FSE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"& _ 
                " Num=@NumFacture"
            Me._commandCollection(9).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Lot_FSE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Lot_FSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date_Lot_FSE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_Lot_FSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(10) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(10).Connection = Me.Connection
            Me._commandCollection(10).CommandText = "UPDATE    Factures"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              CRLdeDRE = @CRLdeDRE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (Num = @Num_"& _ 
                "Facture)"
            Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRLdeDRE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRLdeDRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(11) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(11).Connection = Me.Connection
            Me._commandCollection(11).CommandText = "UPDATE    Factures"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              CRLdeFSE = @CRLdeFSE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (Num = @Num_"& _ 
                "Facture)"
            Me._commandCollection(11).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRLdeFSE", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRLdeFSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.FacturesDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.FacturesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.FacturesDataTable = New PharmaDataSet.FacturesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_DateMini(ByVal date_mini As Single) As PharmaDataSet.FacturesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            Me.Adapter.SelectCommand.Parameters(0).Value = CType(date_mini,Single)
            Dim dataTable As PharmaDataSet.FacturesDataTable = New PharmaDataSet.FacturesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Ref_Lot(ByVal Num_Lot_FSE As String, ByVal Num_Lot_DRE As String) As PharmaDataSet.FacturesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(3)
            If (Num_Lot_FSE Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Num_Lot_FSE,String)
            End If
            If (Num_Lot_DRE Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(Num_Lot_DRE,String)
            End If
            Dim dataTable As PharmaDataSet.FacturesDataTable = New PharmaDataSet.FacturesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetFactureDataByNum1(ByVal Num As Decimal) As PharmaDataSet.FacturesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(4)
            Me.Adapter.SelectCommand.Parameters(0).Value = CType(Num,Decimal)
            Dim dataTable As PharmaDataSet.FacturesDataTable = New PharmaDataSet.FacturesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.FacturesDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Factures")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal Num As Decimal,  _
                    ByVal G1110C2 As String,  _
                    ByVal G1110C3 As String,  _
                    ByVal G1110C4 As String,  _
                    ByVal G1230C1 As String,  _
                    ByVal G1410C1 As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal G1440C1 As String,  _
                    ByVal G1440C2 As String,  _
                    ByVal G1440C3 As String,  _
                    ByVal G1450C1 As String,  _
                    ByVal G1450C2 As String,  _
                    ByVal G1511C1 As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal G1512C1 As String,  _
                    ByVal G1513C1 As String,  _
                    ByVal G1513C2 As String,  _
                    ByVal G1513C3 As String,  _
                    ByVal G1514C1 As String,  _
                    ByVal G1514C2 As String,  _
                    ByVal G1514C3 As String,  _
                    ByVal G1514C4 As String,  _
                    ByVal CRLdeDRE As String,  _
                    ByVal CRLdeFSE As String,  _
                    ByVal G1120C1 As String,  _
                    ByVal G1130C1 As String,  _
                    ByVal G1130C2 As String,  _
                    ByVal G1130C3 As String,  _
                    ByVal G1130C4 As String,  _
                    ByVal G1130C5 As String,  _
                    ByVal G1130C6 As String,  _
                    ByVal G1130C7 As String,  _
                    ByVal G1130C8 As String,  _
                    ByVal G1211C1 As String,  _
                    ByVal G1211C2 As String,  _
                    ByVal G1211C3 As String,  _
                    ByVal G1211C4 As String,  _
                    ByVal G1211C5 As String,  _
                    ByVal G1211C6 As String,  _
                    ByVal G1211C7 As String,  _
                    ByVal G1213C1 As String,  _
                    ByVal G1213C2 As String,  _
                    ByVal G1213C3 As String,  _
                    ByVal G1213C4 As String,  _
                    ByVal G1213C5 As String,  _
                    ByVal G1213C6 As String,  _
                    ByVal G1213C7 As String,  _
                    ByVal G1213C8 As String,  _
                    ByVal G1214C1 As String,  _
                    ByVal G1214C2 As String,  _
                    ByVal G1214C3 As String,  _
                    ByVal G1214C4 As String,  _
                    ByVal G1214C5 As String,  _
                    ByVal G1214C6 As String,  _
                    ByVal G1214C7 As String,  _
                    ByVal G1214C8 As String,  _
                    ByVal G1110C1 As String,  _
                    ByVal G1310C1 As String,  _
                    ByVal G1310C2 As String,  _
                    ByVal G1310C3 As String,  _
                    ByVal G1310C4 As String,  _
                    ByVal G1310C5 As String,  _
                    ByVal G1910C1 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C2 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C3 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C4 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C5 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C6 As Global.System.Nullable(Of Decimal),  _
                    ByVal IDPrescripteur As String,  _
                    ByVal G1160C1 As String,  _
                    ByVal G1160C2 As String,  _
                    ByVal G1321C1 As String,  _
                    ByVal G1321C10 As String,  _
                    ByVal G1321C11 As String,  _
                    ByVal G1321C12 As String,  _
                    ByVal G1321C2 As String,  _
                    ByVal G1321C3 As String,  _
                    ByVal G1321C4 As String,  _
                    ByVal G1321C5 As String,  _
                    ByVal G1321C6 As String,  _
                    ByVal G1321C7 As String,  _
                    ByVal G1321C8 As String,  _
                    ByVal G1321C9 As String,  _
                    ByVal Assuré As String,  _
                    ByVal Bénéficiaire As String,  _
                    ByVal G1120C2 As String,  _
                    ByVal FactureAcree As String,  _
                    ByVal Num_Lot_DRE As String,  _
                    ByVal Num_Lot_FSE As String,  _
                    ByVal G1330C1 As String,  _
                    ByVal G1330C2 As String,  _
                    ByVal G3700C1 As String,  _
                    ByVal G3700C2 As String,  _
                    ByVal G3730C1 As String,  _
                    ByVal ModeSecur As String,  _
                    ByVal Date_Lot_DRE As String,  _
                    ByVal Date_Lot_FSE As String,  _
                    ByVal Composite_Convention As String) As Integer
            Me.Adapter.InsertCommand.Parameters(0).Value = CType(Num,Decimal)
            If (G1110C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(G1110C2,String)
            End If
            If (G1110C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(G1110C3,String)
            End If
            If (G1110C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(G1110C4,String)
            End If
            If (G1230C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(G1230C1,String)
            End If
            If (G1410C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(G1410C1,String)
            End If
            If (G1420C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(G1420C1,String)
            End If
            If (G1420C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(G1420C2,String)
            End If
            If (G1420C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(G1420C3,String)
            End If
            If (G1440C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(G1440C1,String)
            End If
            If (G1440C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(G1440C2,String)
            End If
            If (G1440C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(G1440C3,String)
            End If
            If (G1450C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(G1450C1,String)
            End If
            If (G1450C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(G1450C2,String)
            End If
            If (G1511C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(G1511C1,String)
            End If
            If (G1511C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(G1511C2,String)
            End If
            If (G1512C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(G1512C1,String)
            End If
            If (G1513C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(G1513C1,String)
            End If
            If (G1513C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(G1513C2,String)
            End If
            If (G1513C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(G1513C3,String)
            End If
            If (G1514C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(G1514C1,String)
            End If
            If (G1514C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(G1514C2,String)
            End If
            If (G1514C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(22).Value = CType(G1514C3,String)
            End If
            If (G1514C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(23).Value = CType(G1514C4,String)
            End If
            If (CRLdeDRE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(24).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(24).Value = CType(CRLdeDRE,String)
            End If
            If (CRLdeFSE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(25).Value = CType(CRLdeFSE,String)
            End If
            If (G1120C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(26).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(26).Value = CType(G1120C1,String)
            End If
            If (G1130C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(27).Value = CType(G1130C1,String)
            End If
            If (G1130C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(28).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(28).Value = CType(G1130C2,String)
            End If
            If (G1130C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(29).Value = CType(G1130C3,String)
            End If
            If (G1130C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(30).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(30).Value = CType(G1130C4,String)
            End If
            If (G1130C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(31).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(31).Value = CType(G1130C5,String)
            End If
            If (G1130C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(32).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(32).Value = CType(G1130C6,String)
            End If
            If (G1130C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(33).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(33).Value = CType(G1130C7,String)
            End If
            If (G1130C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(34).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(34).Value = CType(G1130C8,String)
            End If
            If (G1211C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(35).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(35).Value = CType(G1211C1,String)
            End If
            If (G1211C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(36).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(36).Value = CType(G1211C2,String)
            End If
            If (G1211C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(37).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(37).Value = CType(G1211C3,String)
            End If
            If (G1211C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(38).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(38).Value = CType(G1211C4,String)
            End If
            If (G1211C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(39).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(39).Value = CType(G1211C5,String)
            End If
            If (G1211C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(40).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(40).Value = CType(G1211C6,String)
            End If
            If (G1211C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(41).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(41).Value = CType(G1211C7,String)
            End If
            If (G1213C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(42).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(42).Value = CType(G1213C1,String)
            End If
            If (G1213C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(43).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(43).Value = CType(G1213C2,String)
            End If
            If (G1213C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(44).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(44).Value = CType(G1213C3,String)
            End If
            If (G1213C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(45).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(45).Value = CType(G1213C4,String)
            End If
            If (G1213C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(46).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(46).Value = CType(G1213C5,String)
            End If
            If (G1213C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(47).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(47).Value = CType(G1213C6,String)
            End If
            If (G1213C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(48).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(48).Value = CType(G1213C7,String)
            End If
            If (G1213C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(49).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(49).Value = CType(G1213C8,String)
            End If
            If (G1214C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(50).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(50).Value = CType(G1214C1,String)
            End If
            If (G1214C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(51).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(51).Value = CType(G1214C2,String)
            End If
            If (G1214C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(52).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(52).Value = CType(G1214C3,String)
            End If
            If (G1214C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(53).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(53).Value = CType(G1214C4,String)
            End If
            If (G1214C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(54).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(54).Value = CType(G1214C5,String)
            End If
            If (G1214C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(55).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(55).Value = CType(G1214C6,String)
            End If
            If (G1214C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(56).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(56).Value = CType(G1214C7,String)
            End If
            If (G1214C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(57).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(57).Value = CType(G1214C8,String)
            End If
            If (G1110C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(58).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(58).Value = CType(G1110C1,String)
            End If
            If (G1310C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(59).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(59).Value = CType(G1310C1,String)
            End If
            If (G1310C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(60).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(60).Value = CType(G1310C2,String)
            End If
            If (G1310C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(61).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(61).Value = CType(G1310C3,String)
            End If
            If (G1310C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(62).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(62).Value = CType(G1310C4,String)
            End If
            If (G1310C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(63).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(63).Value = CType(G1310C5,String)
            End If
            If (G1910C1.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(64).Value = CType(G1910C1.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(64).Value = Global.System.DBNull.Value
            End If
            If (G1910C2.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(65).Value = CType(G1910C2.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(65).Value = Global.System.DBNull.Value
            End If
            If (G1910C3.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(66).Value = CType(G1910C3.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(66).Value = Global.System.DBNull.Value
            End If
            If (G1910C4.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(67).Value = CType(G1910C4.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(67).Value = Global.System.DBNull.Value
            End If
            If (G1910C5.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(68).Value = CType(G1910C5.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(68).Value = Global.System.DBNull.Value
            End If
            If (G1910C6.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(69).Value = CType(G1910C6.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(69).Value = Global.System.DBNull.Value
            End If
            If (IDPrescripteur Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(70).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(70).Value = CType(IDPrescripteur,String)
            End If
            If (G1160C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(71).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(71).Value = CType(G1160C1,String)
            End If
            If (G1160C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(72).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(72).Value = CType(G1160C2,String)
            End If
            If (G1321C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(73).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(73).Value = CType(G1321C1,String)
            End If
            If (G1321C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(74).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(74).Value = CType(G1321C10,String)
            End If
            If (G1321C11 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(75).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(75).Value = CType(G1321C11,String)
            End If
            If (G1321C12 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(76).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(76).Value = CType(G1321C12,String)
            End If
            If (G1321C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(77).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(77).Value = CType(G1321C2,String)
            End If
            If (G1321C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(78).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(78).Value = CType(G1321C3,String)
            End If
            If (G1321C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(79).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(79).Value = CType(G1321C4,String)
            End If
            If (G1321C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(80).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(80).Value = CType(G1321C5,String)
            End If
            If (G1321C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(81).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(81).Value = CType(G1321C6,String)
            End If
            If (G1321C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(82).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(82).Value = CType(G1321C7,String)
            End If
            If (G1321C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(83).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(83).Value = CType(G1321C8,String)
            End If
            If (G1321C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(84).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(84).Value = CType(G1321C9,String)
            End If
            If (Assuré Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(85).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(85).Value = CType(Assuré,String)
            End If
            If (Bénéficiaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(86).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(86).Value = CType(Bénéficiaire,String)
            End If
            If (G1120C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(87).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(87).Value = CType(G1120C2,String)
            End If
            If (FactureAcree Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(88).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(88).Value = CType(FactureAcree,String)
            End If
            If (Num_Lot_DRE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(89).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(89).Value = CType(Num_Lot_DRE,String)
            End If
            If (Num_Lot_FSE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(90).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(90).Value = CType(Num_Lot_FSE,String)
            End If
            If (G1330C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(91).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(91).Value = CType(G1330C1,String)
            End If
            If (G1330C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(92).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(92).Value = CType(G1330C2,String)
            End If
            If (G3700C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(93).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(93).Value = CType(G3700C1,String)
            End If
            If (G3700C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(94).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(94).Value = CType(G3700C2,String)
            End If
            If (G3730C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(95).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(95).Value = CType(G3730C1,String)
            End If
            If (ModeSecur Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(96).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(96).Value = CType(ModeSecur,String)
            End If
            If (Date_Lot_DRE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(97).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(97).Value = CType(Date_Lot_DRE,String)
            End If
            If (Date_Lot_FSE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(98).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(98).Value = CType(Date_Lot_FSE,String)
            End If
            If (Composite_Convention Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(99).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(99).Value = CType(Composite_Convention,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function DeleteByNum(ByVal num As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            command.Parameters(0).Value = CType(num,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1(ByVal Num As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            command.Parameters(0).Value = CType(Num,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function SaveFacture( _
                    ByVal G110C1 As String,  _
                    ByVal G1110C2 As String,  _
                    ByVal G1110C3 As String,  _
                    ByVal G1110C4 As String,  _
                    ByVal G1120C1 As String,  _
                    ByVal G1120C2 As String,  _
                    ByVal G1130C1 As String,  _
                    ByVal G1130C2 As String,  _
                    ByVal G1130C3 As String,  _
                    ByVal G1130C4 As String,  _
                    ByVal G1130C5 As String,  _
                    ByVal G1130C6 As String,  _
                    ByVal G1130C7 As String,  _
                    ByVal G1130C8 As String,  _
                    ByVal G1160C1 As String,  _
                    ByVal G1160C2 As String,  _
                    ByVal G1211C1 As String,  _
                    ByVal G1211C2 As String,  _
                    ByVal G1211C3 As String,  _
                    ByVal G1211C4 As String,  _
                    ByVal G1211C5 As String,  _
                    ByVal G1211C6 As String,  _
                    ByVal G1211C7 As String,  _
                    ByVal G1213C1 As String,  _
                    ByVal G1213C2 As String,  _
                    ByVal G1213C3 As String,  _
                    ByVal G1213C4 As String,  _
                    ByVal G1213C5 As String,  _
                    ByVal G1213C6 As String,  _
                    ByVal G1213C7 As String,  _
                    ByVal G1213C8 As String,  _
                    ByVal G1214C1 As String,  _
                    ByVal G1214C2 As String,  _
                    ByVal G1214C3 As String,  _
                    ByVal G1214C4 As String,  _
                    ByVal G1214C5 As String,  _
                    ByVal G1214C6 As String,  _
                    ByVal G1214C7 As String,  _
                    ByVal G1214C8 As String,  _
                    ByVal G1230C1 As String,  _
                    ByVal G1310C1 As String,  _
                    ByVal G1310C2 As String,  _
                    ByVal G1310C3 As String,  _
                    ByVal G1310C4 As String,  _
                    ByVal G1310C5 As String,  _
                    ByVal G1321C1 As String,  _
                    ByVal G1321C2 As String,  _
                    ByVal G1321C3 As String,  _
                    ByVal G1321C4 As String,  _
                    ByVal G1321C5 As String,  _
                    ByVal G1321C6 As String,  _
                    ByVal G1321C7 As String,  _
                    ByVal G1321C8 As String,  _
                    ByVal G1321C9 As String,  _
                    ByVal G1321C10 As String,  _
                    ByVal G1321C11 As String,  _
                    ByVal G1321C12 As String,  _
                    ByVal G1330C1 As String,  _
                    ByVal G1330C2 As String,  _
                    ByVal G1410C1 As String,  _
                    ByVal G1420C1 As String,  _
                    ByVal G1420C2 As String,  _
                    ByVal G1420C3 As String,  _
                    ByVal G1440C1 As String,  _
                    ByVal G1440C2 As String,  _
                    ByVal G1440C3 As String,  _
                    ByVal G1511C1 As String,  _
                    ByVal G1511C2 As String,  _
                    ByVal G1512C1 As String,  _
                    ByVal G1513C1 As String,  _
                    ByVal G1513C2 As String,  _
                    ByVal G1513C3 As String,  _
                    ByVal G1514C1 As String,  _
                    ByVal G1514C2 As String,  _
                    ByVal G1514C3 As String,  _
                    ByVal G1514C4 As String,  _
                    ByVal G1910C1 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C2 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C3 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C4 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C5 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1910C6 As Global.System.Nullable(Of Decimal),  _
                    ByVal G3700C1 As String,  _
                    ByVal G3700C2 As String,  _
                    ByVal G3730C1 As String,  _
                    ByVal CRLdeDRE As String,  _
                    ByVal CRLdeFSE As String,  _
                    ByVal IDPrescripteur As String,  _
                    ByVal Bénéficiaire As String,  _
                    ByVal Assuré As String,  _
                    ByVal FactureAcree As String,  _
                    ByVal ModeSecur As String,  _
                    ByVal Composite_Convention As String,  _
                    ByVal Num As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(6)
            If (G110C1 Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(G110C1,String)
            End If
            If (G1110C2 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G1110C2,String)
            End If
            If (G1110C3 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G1110C3,String)
            End If
            If (G1110C4 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G1110C4,String)
            End If
            If (G1120C1 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G1120C1,String)
            End If
            If (G1120C2 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(G1120C2,String)
            End If
            If (G1130C1 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G1130C1,String)
            End If
            If (G1130C2 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G1130C2,String)
            End If
            If (G1130C3 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G1130C3,String)
            End If
            If (G1130C4 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G1130C4,String)
            End If
            If (G1130C5 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G1130C5,String)
            End If
            If (G1130C6 Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(G1130C6,String)
            End If
            If (G1130C7 Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(G1130C7,String)
            End If
            If (G1130C8 Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(G1130C8,String)
            End If
            If (G1160C1 Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(G1160C1,String)
            End If
            If (G1160C2 Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(G1160C2,String)
            End If
            If (G1211C1 Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(G1211C1,String)
            End If
            If (G1211C2 Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(G1211C2,String)
            End If
            If (G1211C3 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G1211C3,String)
            End If
            If (G1211C4 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G1211C4,String)
            End If
            If (G1211C5 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G1211C5,String)
            End If
            If (G1211C6 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G1211C6,String)
            End If
            If (G1211C7 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G1211C7,String)
            End If
            If (G1213C1 Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(G1213C1,String)
            End If
            If (G1213C2 Is Nothing) Then
                command.Parameters(24).Value = Global.System.DBNull.Value
            Else
                command.Parameters(24).Value = CType(G1213C2,String)
            End If
            If (G1213C3 Is Nothing) Then
                command.Parameters(25).Value = Global.System.DBNull.Value
            Else
                command.Parameters(25).Value = CType(G1213C3,String)
            End If
            If (G1213C4 Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(G1213C4,String)
            End If
            If (G1213C5 Is Nothing) Then
                command.Parameters(27).Value = Global.System.DBNull.Value
            Else
                command.Parameters(27).Value = CType(G1213C5,String)
            End If
            If (G1213C6 Is Nothing) Then
                command.Parameters(28).Value = Global.System.DBNull.Value
            Else
                command.Parameters(28).Value = CType(G1213C6,String)
            End If
            If (G1213C7 Is Nothing) Then
                command.Parameters(29).Value = Global.System.DBNull.Value
            Else
                command.Parameters(29).Value = CType(G1213C7,String)
            End If
            If (G1213C8 Is Nothing) Then
                command.Parameters(30).Value = Global.System.DBNull.Value
            Else
                command.Parameters(30).Value = CType(G1213C8,String)
            End If
            If (G1214C1 Is Nothing) Then
                command.Parameters(31).Value = Global.System.DBNull.Value
            Else
                command.Parameters(31).Value = CType(G1214C1,String)
            End If
            If (G1214C2 Is Nothing) Then
                command.Parameters(32).Value = Global.System.DBNull.Value
            Else
                command.Parameters(32).Value = CType(G1214C2,String)
            End If
            If (G1214C3 Is Nothing) Then
                command.Parameters(33).Value = Global.System.DBNull.Value
            Else
                command.Parameters(33).Value = CType(G1214C3,String)
            End If
            If (G1214C4 Is Nothing) Then
                command.Parameters(34).Value = Global.System.DBNull.Value
            Else
                command.Parameters(34).Value = CType(G1214C4,String)
            End If
            If (G1214C5 Is Nothing) Then
                command.Parameters(35).Value = Global.System.DBNull.Value
            Else
                command.Parameters(35).Value = CType(G1214C5,String)
            End If
            If (G1214C6 Is Nothing) Then
                command.Parameters(36).Value = Global.System.DBNull.Value
            Else
                command.Parameters(36).Value = CType(G1214C6,String)
            End If
            If (G1214C7 Is Nothing) Then
                command.Parameters(37).Value = Global.System.DBNull.Value
            Else
                command.Parameters(37).Value = CType(G1214C7,String)
            End If
            If (G1214C8 Is Nothing) Then
                command.Parameters(38).Value = Global.System.DBNull.Value
            Else
                command.Parameters(38).Value = CType(G1214C8,String)
            End If
            If (G1230C1 Is Nothing) Then
                command.Parameters(39).Value = Global.System.DBNull.Value
            Else
                command.Parameters(39).Value = CType(G1230C1,String)
            End If
            If (G1310C1 Is Nothing) Then
                command.Parameters(40).Value = Global.System.DBNull.Value
            Else
                command.Parameters(40).Value = CType(G1310C1,String)
            End If
            If (G1310C2 Is Nothing) Then
                command.Parameters(41).Value = Global.System.DBNull.Value
            Else
                command.Parameters(41).Value = CType(G1310C2,String)
            End If
            If (G1310C3 Is Nothing) Then
                command.Parameters(42).Value = Global.System.DBNull.Value
            Else
                command.Parameters(42).Value = CType(G1310C3,String)
            End If
            If (G1310C4 Is Nothing) Then
                command.Parameters(43).Value = Global.System.DBNull.Value
            Else
                command.Parameters(43).Value = CType(G1310C4,String)
            End If
            If (G1310C5 Is Nothing) Then
                command.Parameters(44).Value = Global.System.DBNull.Value
            Else
                command.Parameters(44).Value = CType(G1310C5,String)
            End If
            If (G1321C1 Is Nothing) Then
                command.Parameters(45).Value = Global.System.DBNull.Value
            Else
                command.Parameters(45).Value = CType(G1321C1,String)
            End If
            If (G1321C2 Is Nothing) Then
                command.Parameters(46).Value = Global.System.DBNull.Value
            Else
                command.Parameters(46).Value = CType(G1321C2,String)
            End If
            If (G1321C3 Is Nothing) Then
                command.Parameters(47).Value = Global.System.DBNull.Value
            Else
                command.Parameters(47).Value = CType(G1321C3,String)
            End If
            If (G1321C4 Is Nothing) Then
                command.Parameters(48).Value = Global.System.DBNull.Value
            Else
                command.Parameters(48).Value = CType(G1321C4,String)
            End If
            If (G1321C5 Is Nothing) Then
                command.Parameters(49).Value = Global.System.DBNull.Value
            Else
                command.Parameters(49).Value = CType(G1321C5,String)
            End If
            If (G1321C6 Is Nothing) Then
                command.Parameters(50).Value = Global.System.DBNull.Value
            Else
                command.Parameters(50).Value = CType(G1321C6,String)
            End If
            If (G1321C7 Is Nothing) Then
                command.Parameters(51).Value = Global.System.DBNull.Value
            Else
                command.Parameters(51).Value = CType(G1321C7,String)
            End If
            If (G1321C8 Is Nothing) Then
                command.Parameters(52).Value = Global.System.DBNull.Value
            Else
                command.Parameters(52).Value = CType(G1321C8,String)
            End If
            If (G1321C9 Is Nothing) Then
                command.Parameters(53).Value = Global.System.DBNull.Value
            Else
                command.Parameters(53).Value = CType(G1321C9,String)
            End If
            If (G1321C10 Is Nothing) Then
                command.Parameters(54).Value = Global.System.DBNull.Value
            Else
                command.Parameters(54).Value = CType(G1321C10,String)
            End If
            If (G1321C11 Is Nothing) Then
                command.Parameters(55).Value = Global.System.DBNull.Value
            Else
                command.Parameters(55).Value = CType(G1321C11,String)
            End If
            If (G1321C12 Is Nothing) Then
                command.Parameters(56).Value = Global.System.DBNull.Value
            Else
                command.Parameters(56).Value = CType(G1321C12,String)
            End If
            If (G1330C1 Is Nothing) Then
                command.Parameters(57).Value = Global.System.DBNull.Value
            Else
                command.Parameters(57).Value = CType(G1330C1,String)
            End If
            If (G1330C2 Is Nothing) Then
                command.Parameters(58).Value = Global.System.DBNull.Value
            Else
                command.Parameters(58).Value = CType(G1330C2,String)
            End If
            If (G1410C1 Is Nothing) Then
                command.Parameters(59).Value = Global.System.DBNull.Value
            Else
                command.Parameters(59).Value = CType(G1410C1,String)
            End If
            If (G1420C1 Is Nothing) Then
                command.Parameters(60).Value = Global.System.DBNull.Value
            Else
                command.Parameters(60).Value = CType(G1420C1,String)
            End If
            If (G1420C2 Is Nothing) Then
                command.Parameters(61).Value = Global.System.DBNull.Value
            Else
                command.Parameters(61).Value = CType(G1420C2,String)
            End If
            If (G1420C3 Is Nothing) Then
                command.Parameters(62).Value = Global.System.DBNull.Value
            Else
                command.Parameters(62).Value = CType(G1420C3,String)
            End If
            If (G1440C1 Is Nothing) Then
                command.Parameters(63).Value = Global.System.DBNull.Value
            Else
                command.Parameters(63).Value = CType(G1440C1,String)
            End If
            If (G1440C2 Is Nothing) Then
                command.Parameters(64).Value = Global.System.DBNull.Value
            Else
                command.Parameters(64).Value = CType(G1440C2,String)
            End If
            If (G1440C3 Is Nothing) Then
                command.Parameters(65).Value = Global.System.DBNull.Value
            Else
                command.Parameters(65).Value = CType(G1440C3,String)
            End If
            If (G1511C1 Is Nothing) Then
                command.Parameters(66).Value = Global.System.DBNull.Value
            Else
                command.Parameters(66).Value = CType(G1511C1,String)
            End If
            If (G1511C2 Is Nothing) Then
                command.Parameters(67).Value = Global.System.DBNull.Value
            Else
                command.Parameters(67).Value = CType(G1511C2,String)
            End If
            If (G1512C1 Is Nothing) Then
                command.Parameters(68).Value = Global.System.DBNull.Value
            Else
                command.Parameters(68).Value = CType(G1512C1,String)
            End If
            If (G1513C1 Is Nothing) Then
                command.Parameters(69).Value = Global.System.DBNull.Value
            Else
                command.Parameters(69).Value = CType(G1513C1,String)
            End If
            If (G1513C2 Is Nothing) Then
                command.Parameters(70).Value = Global.System.DBNull.Value
            Else
                command.Parameters(70).Value = CType(G1513C2,String)
            End If
            If (G1513C3 Is Nothing) Then
                command.Parameters(71).Value = Global.System.DBNull.Value
            Else
                command.Parameters(71).Value = CType(G1513C3,String)
            End If
            If (G1514C1 Is Nothing) Then
                command.Parameters(72).Value = Global.System.DBNull.Value
            Else
                command.Parameters(72).Value = CType(G1514C1,String)
            End If
            If (G1514C2 Is Nothing) Then
                command.Parameters(73).Value = Global.System.DBNull.Value
            Else
                command.Parameters(73).Value = CType(G1514C2,String)
            End If
            If (G1514C3 Is Nothing) Then
                command.Parameters(74).Value = Global.System.DBNull.Value
            Else
                command.Parameters(74).Value = CType(G1514C3,String)
            End If
            If (G1514C4 Is Nothing) Then
                command.Parameters(75).Value = Global.System.DBNull.Value
            Else
                command.Parameters(75).Value = CType(G1514C4,String)
            End If
            If (G1910C1.HasValue = true) Then
                command.Parameters(76).Value = CType(G1910C1.Value,Decimal)
            Else
                command.Parameters(76).Value = Global.System.DBNull.Value
            End If
            If (G1910C2.HasValue = true) Then
                command.Parameters(77).Value = CType(G1910C2.Value,Decimal)
            Else
                command.Parameters(77).Value = Global.System.DBNull.Value
            End If
            If (G1910C3.HasValue = true) Then
                command.Parameters(78).Value = CType(G1910C3.Value,Decimal)
            Else
                command.Parameters(78).Value = Global.System.DBNull.Value
            End If
            If (G1910C4.HasValue = true) Then
                command.Parameters(79).Value = CType(G1910C4.Value,Decimal)
            Else
                command.Parameters(79).Value = Global.System.DBNull.Value
            End If
            If (G1910C5.HasValue = true) Then
                command.Parameters(80).Value = CType(G1910C5.Value,Decimal)
            Else
                command.Parameters(80).Value = Global.System.DBNull.Value
            End If
            If (G1910C6.HasValue = true) Then
                command.Parameters(81).Value = CType(G1910C6.Value,Decimal)
            Else
                command.Parameters(81).Value = Global.System.DBNull.Value
            End If
            If (G3700C1 Is Nothing) Then
                command.Parameters(82).Value = Global.System.DBNull.Value
            Else
                command.Parameters(82).Value = CType(G3700C1,String)
            End If
            If (G3700C2 Is Nothing) Then
                command.Parameters(83).Value = Global.System.DBNull.Value
            Else
                command.Parameters(83).Value = CType(G3700C2,String)
            End If
            If (G3730C1 Is Nothing) Then
                command.Parameters(84).Value = Global.System.DBNull.Value
            Else
                command.Parameters(84).Value = CType(G3730C1,String)
            End If
            If (CRLdeDRE Is Nothing) Then
                command.Parameters(85).Value = Global.System.DBNull.Value
            Else
                command.Parameters(85).Value = CType(CRLdeDRE,String)
            End If
            If (CRLdeFSE Is Nothing) Then
                command.Parameters(86).Value = Global.System.DBNull.Value
            Else
                command.Parameters(86).Value = CType(CRLdeFSE,String)
            End If
            If (IDPrescripteur Is Nothing) Then
                command.Parameters(87).Value = Global.System.DBNull.Value
            Else
                command.Parameters(87).Value = CType(IDPrescripteur,String)
            End If
            If (Bénéficiaire Is Nothing) Then
                command.Parameters(88).Value = Global.System.DBNull.Value
            Else
                command.Parameters(88).Value = CType(Bénéficiaire,String)
            End If
            If (Assuré Is Nothing) Then
                command.Parameters(89).Value = Global.System.DBNull.Value
            Else
                command.Parameters(89).Value = CType(Assuré,String)
            End If
            If (FactureAcree Is Nothing) Then
                command.Parameters(90).Value = Global.System.DBNull.Value
            Else
                command.Parameters(90).Value = CType(FactureAcree,String)
            End If
            If (ModeSecur Is Nothing) Then
                command.Parameters(91).Value = Global.System.DBNull.Value
            Else
                command.Parameters(91).Value = CType(ModeSecur,String)
            End If
            If (Composite_Convention Is Nothing) Then
                command.Parameters(92).Value = Global.System.DBNull.Value
            Else
                command.Parameters(92).Value = CType(Composite_Convention,String)
            End If
            command.Parameters(93).Value = CType(Num,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxNum() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(7)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_Num_Lot_DRE(ByVal Num_Lot_DRE As String, ByVal Date_Lot_DRE As String, ByVal NumFacture As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(8)
            If (Num_Lot_DRE Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Lot_DRE,String)
            End If
            If (Date_Lot_DRE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Date_Lot_DRE,String)
            End If
            command.Parameters(2).Value = CType(NumFacture,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_Num_Lot_FSE(ByVal Num_Lot_FSE As String, ByVal Date_Lot_FSE As String, ByVal NumFacture As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(9)
            If (Num_Lot_FSE Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Lot_FSE,String)
            End If
            If (Date_Lot_FSE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Date_Lot_FSE,String)
            End If
            command.Parameters(2).Value = CType(NumFacture,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateCRLdeDRE(ByVal CRLdeDRE As String, ByVal Num_Facture As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(10)
            If (CRLdeDRE Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CRLdeDRE,String)
            End If
            command.Parameters(1).Value = CType(Num_Facture,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateCRLdeFSE(ByVal CRLdeFSE As String, ByVal Num_Facture As Decimal) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(11)
            If (CRLdeFSE Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CRLdeFSE,String)
            End If
            command.Parameters(1).Value = CType(Num_Facture,Decimal)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class FichiersSVTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "FichiersSV"
            tableMapping.ColumnMappings.Add("NomFichier", "NomFichier")
            tableMapping.ColumnMappings.Add("CRF", "CRF")
            tableMapping.ColumnMappings.Add("DateFichier", "DateFichier")
            tableMapping.ColumnMappings.Add("NombreLots", "NombreLots")
            tableMapping.ColumnMappings.Add("Longueur", "Longueur")
            tableMapping.ColumnMappings.Add("NombresFactures", "NombresFactures")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [FichiersSV] ([NomFichier], [CRF], [DateFichier], [Longueur], [Nombre"& _ 
                "Lots], [NombresFactures]) VALUES (@NomFichier, @CRF, @DateFichier, @Longueur, @N"& _ 
                "ombreLots, @NombresFactures)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRF", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CRF", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateFichier", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Longueur", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Longueur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreLots", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreLots", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombresFactures", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "NombresFactures", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(5) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT NomFichier, CRF, DateFichier, Longueur, NombreLots, NombresFactures FROM F"& _ 
                "ichiersSV"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT NomFichier, CRF, DateFichier, Longueur, NombreLots, NombresFactures FROM F"& _ 
                "ichiersSV"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where NomFichier=@NomFichier"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "INSERT INTO [FichiersSV] ([NomFichier], [CRF], [DateFichier], [Longueur], [Nombre"& _ 
                "Lots], [NombresFactures]) VALUES (@NomFichier, @CRF, @DateFichier, @Longueur, @N"& _ 
                "ombreLots, @NombresFactures)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRF", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRF", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateFichier", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DateFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Longueur", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Longueur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreLots", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreLots", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombresFactures", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NombresFactures", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT CRF FROM FichiersSV where NomFichier=@NomFichier"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT max(NomFichier) FROM FichiersSV"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "SELECT NombresFactures FROM FichiersSV where NomFichier=@NomFichier"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.FichiersSVDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.FichiersSVDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.FichiersSVDataTable = New PharmaDataSet.FichiersSVDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByNomFichier(ByVal NomFichier As Global.System.Nullable(Of Decimal)) As PharmaDataSet.FichiersSVDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (NomFichier.HasValue = true) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NomFichier.Value,Decimal)
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            Dim dataTable As PharmaDataSet.FichiersSVDataTable = New PharmaDataSet.FichiersSVDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.FichiersSVDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "FichiersSV")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal NomFichier As Global.System.Nullable(Of Decimal), ByVal CRF As String, ByVal DateFichier As String, ByVal Longueur As Global.System.Nullable(Of Decimal), ByVal NombreLots As Global.System.Nullable(Of Decimal), ByVal NombresFactures As Global.System.Nullable(Of Decimal)) As Integer
            If (NomFichier.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(NomFichier.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (CRF Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CRF,String)
            End If
            If (DateFichier Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(DateFichier,String)
            End If
            If (Longueur.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Longueur.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (NombreLots.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(NombreLots.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (NombresFactures.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(NombresFactures.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1(ByVal NomFichier As Global.System.Nullable(Of Decimal), ByVal CRF As String, ByVal DateFichier As String, ByVal Longueur As Global.System.Nullable(Of Decimal), ByVal NombreLots As Global.System.Nullable(Of Decimal), ByVal NombresFactures As Global.System.Nullable(Of Decimal)) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (NomFichier.HasValue = true) Then
                command.Parameters(0).Value = CType(NomFichier.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (CRF Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(CRF,String)
            End If
            If (DateFichier Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(DateFichier,String)
            End If
            If (Longueur.HasValue = true) Then
                command.Parameters(3).Value = CType(Longueur.Value,Decimal)
            Else
                command.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (NombreLots.HasValue = true) Then
                command.Parameters(4).Value = CType(NombreLots.Value,Decimal)
            Else
                command.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (NombresFactures.HasValue = true) Then
                command.Parameters(5).Value = CType(NombresFactures.Value,Decimal)
            Else
                command.Parameters(5).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectCRFbyNomFichier(ByVal NomFichier As Global.System.Nullable(Of Decimal)) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (NomFichier.HasValue = true) Then
                command.Parameters(0).Value = CType(NomFichier.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxNomFichier() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectNombresFacturesbyNomFichier(ByVal NomFichier As Global.System.Nullable(Of Decimal)) As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (NomFichier.HasValue = true) Then
                command.Parameters(0).Value = CType(NomFichier.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class ActesTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Actes"
            tableMapping.ColumnMappings.Add("NumActe", "NumActe")
            tableMapping.ColumnMappings.Add("Nom", "Nom")
            tableMapping.ColumnMappings.Add("Prénom", "Prénom")
            tableMapping.ColumnMappings.Add("Date", "Date")
            tableMapping.ColumnMappings.Add("TypeActe", "TypeActe")
            tableMapping.ColumnMappings.Add("CIP", "CIP")
            tableMapping.ColumnMappings.Add("EAN13", "EAN13")
            tableMapping.ColumnMappings.Add("CodeActe", "CodeActe")
            tableMapping.ColumnMappings.Add("Quantité", "Quantité")
            tableMapping.ColumnMappings.Add("Total", "Total")
            tableMapping.ColumnMappings.Add("Remise", "Remise")
            tableMapping.ColumnMappings.Add("NumFacturesSV", "NumFacturesSV")
            tableMapping.ColumnMappings.Add("NIR", "NIR")
            tableMapping.ColumnMappings.Add("NumFactureVenteDirecte", "NumFactureVenteDirecte")
            tableMapping.ColumnMappings.Add("Prix_Unitaire", "Prix_Unitaire")
            tableMapping.ColumnMappings.Add("Désignation", "Désignation")
            tableMapping.ColumnMappings.Add("TauxRmbrsmnt", "TauxRmbrsmnt")
            tableMapping.ColumnMappings.Add("Tarif_Remboursement", "Tarif_Remboursement")
            tableMapping.ColumnMappings.Add("LPP_Type_prestation", "LPP_Type_prestation")
            tableMapping.ColumnMappings.Add("LPP_Ref", "LPP_Ref")
            tableMapping.ColumnMappings.Add("LPP_Quantité", "LPP_Quantité")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Actes] ([NumActe], [Nom], [Prénom], [Date], [TypeActe], [CIP], [EAN1"& _ 
                "3], [CodeActe], [Quantité], [Total], [Remise], [NumFacturesSV], [NIR], [NumFactu"& _ 
                "reVenteDirecte], [Prix_Unitaire], [Désignation], [TauxRmbrsmnt], [Tarif_Rembours"& _ 
                "ement], [LPP_Quantité], [LPP_Ref], [LPP_Type_prestation]) VALUES (@NumActe, @Nom"& _ 
                ", @Prénom, @Date, @TypeActe, @CIP, @EAN13, @CodeActe, @Quantité, @Total, @Remise"& _ 
                ", @NumFacturesSV, @NIR, @NumFactureVenteDirecte, @Prix_Unitaire, @Désignation, @"& _ 
                "TauxRmbrsmnt, @Tarif_Remboursement, @LPP_Quantité, @LPP_Ref, @LPP_Type_prestatio"& _ 
                "n)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumActe", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "NumActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeActe", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Quantité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Quantité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Total", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Total", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Remise", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Remise", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacturesSV", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacturesSV", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NIR", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NIR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFactureVenteDirecte", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFactureVenteDirecte", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prix_Unitaire", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 2, "Prix_Unitaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Désignation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Désignation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TauxRmbrsmnt", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 3, 0, "TauxRmbrsmnt", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Tarif_Remboursement", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 2, "Tarif_Remboursement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Quantité", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LPP_Quantité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Ref", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LPP_Ref", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Type_prestation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LPP_Type_prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(5) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT NumActe, Nom, Prénom, Date, TypeActe, CIP, EAN13, CodeActe, Quantité, Tota"& _ 
                "l, Remise, NumFacturesSV, NIR, NumFactureVenteDirecte, Prix_Unitaire, Désignatio"& _ 
                "n, TauxRmbrsmnt, Tarif_Remboursement, LPP_Quantité, LPP_Ref, LPP_Type_prestation"& _ 
                " FROM Actes"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE from actes"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where NumFacturesSV=@NumFacturesSV"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacturesSV", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacturesSV", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT NumActe, Nom, Prénom, Date, TypeActe, CIP, EAN13, CodeActe, Quantité, Tota"& _ 
                "l, Remise, NumFacturesSV, NIR, NumFactureVenteDirecte, Prix_Unitaire, Désignatio"& _ 
                "n, TauxRmbrsmnt, Tarif_Remboursement, LPP_Quantité, LPP_Ref, LPP_Type_prestation"& _ 
                " FROM Actes WHERE (NumFacturesSV = @NumFacturesSV)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacturesSV", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacturesSV", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "INSERT INTO [Actes] ([NumActe], [Nom], [Prénom], [Date], [TypeActe], [CIP], [EAN1"& _ 
                "3], [CodeActe],[Désignation], [Quantité],[Prix_Unitaire], [Tarif_Remboursement],"& _ 
                " [Total], [Remise], [NumFacturesSV], [NIR], [NumFactureVenteDirecte],[TauxRmbrsm"& _ 
                "nt],[LPP_Type_prestation],[LPP_Ref],[LPP_Quantité]) VALUES (@NumActe, @Nom, @Pré"& _ 
                "nom, @Date, @TypeActe, @CIP, @EAN13, @CodeActe, @Désignation, @Quantité,@Prix_Un"& _ 
                "itaire, @Tarif_Remboursement, @Total, @Remise, @NumFacturesSV, @NIR, @NumFacture"& _ 
                "VenteDirecte, @TauxRmbrsmnt ,@LPP_Type_prestation ,@LPP_Ref ,@LPP_Quantité)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumActe", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NumActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nom", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prénom", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeActe", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EAN13", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EAN13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Désignation", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Désignation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Quantité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Quantité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prix_Unitaire", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 2, "Prix_Unitaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Tarif_Remboursement", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 2, "Tarif_Remboursement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Total", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Total", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Remise", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Remise", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacturesSV", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacturesSV", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NIR", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NIR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFactureVenteDirecte", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFactureVenteDirecte", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TauxRmbrsmnt", Global.System.Data.SqlDbType.[Decimal], 5, Global.System.Data.ParameterDirection.Input, 3, 0, "TauxRmbrsmnt", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Type_prestation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "LPP_Type_prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Ref", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "LPP_Ref", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LPP_Quantité", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "LPP_Quantité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT max(NumActe) FROM Actes"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "UPDATE Actes"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"set NumFacturesSV=@Nouveau_NumFacturesSV"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where  NumFacturesSV=@Anc"& _ 
                "ien_NumFacturesSV"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nouveau_NumFacturesSV", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacturesSV", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Ancien_NumFacturesSV", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacturesSV", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.ActesDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.ActesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.ActesDataTable = New PharmaDataSet.ActesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByNumFacturesSV(ByVal NumFacturesSV As String) As PharmaDataSet.ActesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (NumFacturesSV Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NumFacturesSV,String)
            End If
            Dim dataTable As PharmaDataSet.ActesDataTable = New PharmaDataSet.ActesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.ActesDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Actes")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal NumActe As Decimal,  _
                    ByVal Nom As String,  _
                    ByVal Prénom As String,  _
                    ByVal _Date As String,  _
                    ByVal TypeActe As String,  _
                    ByVal CIP As String,  _
                    ByVal EAN13 As String,  _
                    ByVal CodeActe As String,  _
                    ByVal Quantité As String,  _
                    ByVal Total As String,  _
                    ByVal Remise As String,  _
                    ByVal NumFacturesSV As String,  _
                    ByVal NIR As String,  _
                    ByVal NumFactureVenteDirecte As String,  _
                    ByVal Prix_Unitaire As Global.System.Nullable(Of Decimal),  _
                    ByVal Désignation As String,  _
                    ByVal TauxRmbrsmnt As Global.System.Nullable(Of Decimal),  _
                    ByVal Tarif_Remboursement As Global.System.Nullable(Of Decimal),  _
                    ByVal LPP_Quantité As Global.System.Nullable(Of Decimal),  _
                    ByVal LPP_Ref As String,  _
                    ByVal LPP_Type_prestation As String) As Integer
            Me.Adapter.InsertCommand.Parameters(0).Value = CType(NumActe,Decimal)
            If (Nom Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Nom,String)
            End If
            If (Prénom Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Prénom,String)
            End If
            If (_Date Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(_Date,String)
            End If
            If (TypeActe Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(TypeActe,String)
            End If
            If (CIP Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(EAN13,String)
            End If
            If (CodeActe Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(CodeActe,String)
            End If
            If (Quantité Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(Quantité,String)
            End If
            If (Total Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(Total,String)
            End If
            If (Remise Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(Remise,String)
            End If
            If (NumFacturesSV Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(NumFacturesSV,String)
            End If
            If (NIR Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(NIR,String)
            End If
            If (NumFactureVenteDirecte Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(NumFactureVenteDirecte,String)
            End If
            If (Prix_Unitaire.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(Prix_Unitaire.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (Désignation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(Désignation,String)
            End If
            If (TauxRmbrsmnt.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(TauxRmbrsmnt.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (Tarif_Remboursement.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(Tarif_Remboursement.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            End If
            If (LPP_Quantité.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(LPP_Quantité.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            End If
            If (LPP_Ref Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(LPP_Ref,String)
            End If
            If (LPP_Type_prestation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(LPP_Type_prestation,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_by_NumFacturesSV(ByVal NumFacturesSV As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (NumFacturesSV Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(NumFacturesSV,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert2( _
                    ByVal NumActe As Decimal,  _
                    ByVal Nom As String,  _
                    ByVal Prénom As String,  _
                    ByVal _Date As String,  _
                    ByVal TypeActe As String,  _
                    ByVal CIP As String,  _
                    ByVal EAN13 As String,  _
                    ByVal CodeActe As String,  _
                    ByVal Désignation As String,  _
                    ByVal Quantité As String,  _
                    ByVal Prix_Unitaire As Global.System.Nullable(Of Decimal),  _
                    ByVal Tarif_Remboursement As Global.System.Nullable(Of Decimal),  _
                    ByVal Total As String,  _
                    ByVal Remise As String,  _
                    ByVal NumFacturesSV As String,  _
                    ByVal NIR As String,  _
                    ByVal NumFactureVenteDirecte As String,  _
                    ByVal TauxRmbrsmnt As Global.System.Nullable(Of Decimal),  _
                    ByVal LPP_Type_prestation As String,  _
                    ByVal LPP_Ref As String,  _
                    ByVal LPP_Quantité As Global.System.Nullable(Of Decimal)) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            command.Parameters(0).Value = CType(NumActe,Decimal)
            If (Nom Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Nom,String)
            End If
            If (Prénom Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Prénom,String)
            End If
            If (_Date Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(_Date,String)
            End If
            If (TypeActe Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(TypeActe,String)
            End If
            If (CIP Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(CIP,String)
            End If
            If (EAN13 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(EAN13,String)
            End If
            If (CodeActe Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(CodeActe,String)
            End If
            If (Désignation Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(Désignation,String)
            End If
            If (Quantité Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(Quantité,String)
            End If
            If (Prix_Unitaire.HasValue = true) Then
                command.Parameters(10).Value = CType(Prix_Unitaire.Value,Decimal)
            Else
                command.Parameters(10).Value = Global.System.DBNull.Value
            End If
            If (Tarif_Remboursement.HasValue = true) Then
                command.Parameters(11).Value = CType(Tarif_Remboursement.Value,Decimal)
            Else
                command.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (Total Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(Total,String)
            End If
            If (Remise Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(Remise,String)
            End If
            If (NumFacturesSV Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(NumFacturesSV,String)
            End If
            If (NIR Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(NIR,String)
            End If
            If (NumFactureVenteDirecte Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(NumFactureVenteDirecte,String)
            End If
            If (TauxRmbrsmnt.HasValue = true) Then
                command.Parameters(17).Value = CType(TauxRmbrsmnt.Value,Decimal)
            Else
                command.Parameters(17).Value = Global.System.DBNull.Value
            End If
            If (LPP_Type_prestation Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(LPP_Type_prestation,String)
            End If
            If (LPP_Ref Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(LPP_Ref,String)
            End If
            If (LPP_Quantité.HasValue = true) Then
                command.Parameters(20).Value = CType(LPP_Quantité.Value,Decimal)
            Else
                command.Parameters(20).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxNumActe() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_NumFacturesSV(ByVal Nouveau_NumFacturesSV As String, ByVal Ancien_NumFacturesSV As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (Nouveau_NumFacturesSV Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Nouveau_NumFacturesSV,String)
            End If
            If (Ancien_NumFacturesSV Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Ancien_NumFacturesSV,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class SMTPTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "SMTP"
            tableMapping.ColumnMappings.Add("compteur", "compteur")
            tableMapping.ColumnMappings.Add("date", "date")
            tableMapping.ColumnMappings.Add("NomFichier", "NomFichier")
            tableMapping.ColumnMappings.Add("Subject", "Subject")
            tableMapping.ColumnMappings.Add("From_", "From_")
            tableMapping.ColumnMappings.Add("To_", "To_")
            tableMapping.ColumnMappings.Add("ContentType", "ContentType")
            tableMapping.ColumnMappings.Add("ContentDescription", "ContentDescription")
            tableMapping.ColumnMappings.Add("CRF", "CRF")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [SMTP] ([compteur], [date], [NomFichier], [CRF], [ContentDescription]"& _ 
                ", [ContentType], [From_], [Subject], [To_]) VALUES (@compteur, @date, @NomFichie"& _ 
                "r, @CRF, @ContentDescription, @ContentType, @From_, @Subject, @To_)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@compteur", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "compteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRF", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CRF", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ContentDescription", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ContentDescription", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ContentType", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ContentType", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@To_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "To_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(4) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT compteur, date, NomFichier, CRF, ContentDescription, ContentType, From_, S"& _ 
                "ubject, To_ FROM SMTP"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT compteur, date, NomFichier, CRF, ContentDescription, ContentType, From_, S"& _ 
                "ubject, To_ FROM SMTP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where NomFichier=@NomFichier"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "INSERT INTO SMTP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      (compteur, date, NomFichier, Subject, Fro"& _ 
                "m_, To_, ContentType, ContentDescription, CRF)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES     (@compteur,@date,@Nom"& _ 
                "Fichier,@Subject,@From_,@To_,@ContentType,@ContentDescription,@CRF)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@compteur", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "compteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NomFichier", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NomFichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@To_", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "To_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ContentType", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ContentType", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ContentDescription", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ContentDescription", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRF", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRF", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT      NomFichier"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         SMTP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (Subject =@subject)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@subject", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT max(compteur) FROM SMTP"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.SMTPDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.SMTPDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.SMTPDataTable = New PharmaDataSet.SMTPDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_NomFichier(ByVal NomFichier As String) As PharmaDataSet.SMTPDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (NomFichier Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NomFichier,String)
            End If
            Dim dataTable As PharmaDataSet.SMTPDataTable = New PharmaDataSet.SMTPDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.SMTPDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "SMTP")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal compteur As Global.System.Nullable(Of Decimal), ByVal _date As String, ByVal NomFichier As String, ByVal CRF As String, ByVal ContentDescription As String, ByVal ContentType As String, ByVal From_ As String, ByVal Subject As String, ByVal To_ As String) As Integer
            If (compteur.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(compteur.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (_date Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(_date,String)
            End If
            If (NomFichier Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(NomFichier,String)
            End If
            If (CRF Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(CRF,String)
            End If
            If (ContentDescription Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(ContentDescription,String)
            End If
            If (ContentType Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(ContentType,String)
            End If
            If (From_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(From_,String)
            End If
            If (Subject Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(Subject,String)
            End If
            If (To_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(To_,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1(ByVal compteur As Global.System.Nullable(Of Decimal), ByVal _date As String, ByVal NomFichier As String, ByVal Subject As String, ByVal From_ As String, ByVal To_ As String, ByVal ContentType As String, ByVal ContentDescription As String, ByVal CRF As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (compteur.HasValue = true) Then
                command.Parameters(0).Value = CType(compteur.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (_date Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(_date,String)
            End If
            If (NomFichier Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(NomFichier,String)
            End If
            If (Subject Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Subject,String)
            End If
            If (From_ Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(From_,String)
            End If
            If (To_ Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(To_,String)
            End If
            If (ContentType Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(ContentType,String)
            End If
            If (ContentDescription Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(ContentDescription,String)
            End If
            If (CRF Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(CRF,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_NumFichier_By_Subject(ByVal subject As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (subject Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(subject,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxCompteur() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class LotsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Lots"
            tableMapping.ColumnMappings.Add("Référence", "Référence")
            tableMapping.ColumnMappings.Add("CRL", "CRL")
            tableMapping.ColumnMappings.Add("CRF", "CRF")
            tableMapping.ColumnMappings.Add("Date", "Date")
            tableMapping.ColumnMappings.Add("NombreDeFSE", "NombreDeFSE")
            tableMapping.ColumnMappings.Add("Taille", "Taille")
            tableMapping.ColumnMappings.Add("Montant", "Montant")
            tableMapping.ColumnMappings.Add("Organisme", "Organisme")
            tableMapping.ColumnMappings.Add("FichierLots", "FichierLots")
            tableMapping.ColumnMappings.Add("G13C1", "G13C1")
            tableMapping.ColumnMappings.Add("G13C2", "G13C2")
            tableMapping.ColumnMappings.Add("G13C3", "G13C3")
            tableMapping.ColumnMappings.Add("G13C4", "G13C4")
            tableMapping.ColumnMappings.Add("G13C5", "G13C5")
            tableMapping.ColumnMappings.Add("G13C6", "G13C6")
            tableMapping.ColumnMappings.Add("G13C7", "G13C7")
            tableMapping.ColumnMappings.Add("G93C1", "G93C1")
            tableMapping.ColumnMappings.Add("G93C2", "G93C2")
            tableMapping.ColumnMappings.Add("G93C3", "G93C3")
            tableMapping.ColumnMappings.Add("G93C4", "G93C4")
            tableMapping.ColumnMappings.Add("G93C5", "G93C5")
            tableMapping.ColumnMappings.Add("G93C6", "G93C6")
            tableMapping.ColumnMappings.Add("G93C7", "G93C7")
            tableMapping.ColumnMappings.Add("Etat", "Etat")
            tableMapping.ColumnMappings.Add("ARLG31C1", "ARLG31C1")
            tableMapping.ColumnMappings.Add("ARLG31C2", "ARLG31C2")
            tableMapping.ColumnMappings.Add("ARLG31C3", "ARLG31C3")
            tableMapping.ColumnMappings.Add("ARLG31C4", "ARLG31C4")
            tableMapping.ColumnMappings.Add("ARLG31C5", "ARLG31C5")
            tableMapping.ColumnMappings.Add("ARLG31C6", "ARLG31C6")
            tableMapping.ColumnMappings.Add("ARLG31C7", "ARLG31C7")
            tableMapping.ColumnMappings.Add("ARLG31C8", "ARLG31C8")
            tableMapping.ColumnMappings.Add("ARLG31C9", "ARLG31C9")
            tableMapping.ColumnMappings.Add("ARLG31C10", "ARLG31C10")
            tableMapping.ColumnMappings.Add("ArlIdMessage", "ArlIdMessage")
            tableMapping.ColumnMappings.Add("NombreTransmission", "NombreTransmission")
            tableMapping.ColumnMappings.Add("DateTransmission", "DateTransmission")
            tableMapping.ColumnMappings.Add("Référence_DRE", "Référence_DRE")
            tableMapping.ColumnMappings.Add("Référence_bdd", "Référence_bdd")
            tableMapping.ColumnMappings.Add("Référence_DRE_bdd", "Référence_DRE_bdd")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Lots] ([Référence], [CRL], [CRF], [Date], [NombreDeFSE], [Taille], ["& _ 
                "Montant], [Organisme], [FichierLots], [ARLG31C1], [ARLG31C10], [ARLG31C2], [ARLG"& _ 
                "31C3], [ARLG31C4], [ARLG31C5], [ARLG31C6], [ARLG31C7], [ARLG31C8], [ARLG31C9], ["& _ 
                "ArlIdMessage], [Etat], [G13C1], [G13C2], [G13C3], [G13C4], [G13C5], [G13C6], [G1"& _ 
                "3C7], [G93C1], [G93C2], [G93C3], [G93C4], [G93C5], [G93C6], [G93C7], [NombreTran"& _ 
                "smission], [DateTransmission], [Référence_DRE], [Référence_DRE_bdd], [Référence_"& _ 
                "bdd]) VALUES (@Référence, @CRL, @CRF, @Date, @NombreDeFSE, @Taille, @Montant, @O"& _ 
                "rganisme, @FichierLots, @ARLG31C1, @ARLG31C10, @ARLG31C2, @ARLG31C3, @ARLG31C4, "& _ 
                "@ARLG31C5, @ARLG31C6, @ARLG31C7, @ARLG31C8, @ARLG31C9, @ArlIdMessage, @Etat, @G1"& _ 
                "3C1, @G13C2, @G13C3, @G13C4, @G13C5, @G13C6, @G13C7, @G93C1, @G93C2, @G93C3, @G9"& _ 
                "3C4, @G93C5, @G93C6, @G93C7, @NombreTransmission, @DateTransmission, @Référence_"& _ 
                "DRE, @Référence_DRE_bdd, @Référence_bdd)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRL", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CRL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRF", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CRF", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreDeFSE", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreDeFSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Taille", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Taille", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Montant", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Montant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Organisme", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Organisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierLots", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "FichierLots", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ArlIdMessage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ArlIdMessage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Etat", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Etat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreTransmission", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreTransmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateTransmission", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateTransmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE_bdd", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE_bdd", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_bdd", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence_bdd", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(21) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE from lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where Référence=@Référence"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"or Référence_DRE=@Référence_DRE"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (Etat = @Etat) AND (NombreTransmission = @NombreTransmission)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Etat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Etat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreTransmission", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreTransmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (CRL <> 'init') AND (Etat = 'ARL RECU') AND (ARLG31C9 = '') AND (CAST(Da"& _ 
                "teTransmission AS float) >= @date_mini) OR (CRL <> 'init') AND (Etat = 'DEGRADE'"& _ 
                ") AND (CAST(DateTransmission AS float) >= @date_mini) OR (CRL <> 'init') AND (Et"& _ 
                "at = 'RECONSTITUE') AND (CAST(DateTransmission AS float) >= @date_mini) OR (CRL "& _ 
                "<> 'init') AND (Etat = 'TRAITEMENT MANUEL') AND (CAST(DateTransmission AS float)"& _ 
                " >= @date_mini)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date_mini", Global.System.Data.SqlDbType.Real, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (Etat <> 'ARL RECU') AND (Etat <> 'A TRANSMETTRE') AND (Etat <> 'DEGRADE"& _ 
                "') AND (CRL <> 'init') AND (Etat <> 'RECONSTITUE') AND (Etat <> 'TRAITEMENT MANU"& _ 
                "EL') OR (Etat <> 'RECONSTITUE') AND (Etat <> 'TRAITEMENT MANUEL') AND (CRL <> 'i"& _ 
                "nit') AND (ARLG31C9 <> '') OR (Etat = 'ATTENTE ARL') AND (Etat <> 'RECONSTITUE')"& _ 
                " AND (Etat <> 'TRAITEMENT MANUEL')"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (FichierLots = @FichierLots)"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierLots", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "FichierLots", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Montant, Taille, Organisme, Fichie"& _ 
                "rLots, G13C1, G13C2, G13C3, G13C4, G13C5, G13C6, G13C7, G93C1, G93C2, G93C3, G93"& _ 
                "C4, G93C5, G93C6, G93C7, Etat, ARLG31C1, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5,"& _ 
                " ARLG31C6, ARLG31C7, ARLG31C8, ARLG31C9, ARLG31C10, ArlIdMessage, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (ArlIdMessage = @ArlIdMessage)"
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ArlIdMessage", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ArlIdMessage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(7).Connection = Me.Connection
            Me._commandCollection(7).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (FichierLots = @FichierLots)"
            Me._commandCollection(7).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierLots", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "FichierLots", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(8).Connection = Me.Connection
            Me._commandCollection(8).CommandText = "SELECT Référence, CRL, CRF, Date, NombreDeFSE, Taille, Montant, Organisme, Fichie"& _ 
                "rLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, AR"& _ 
                "LG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, Etat, G13C1, G13C2, G13C3, G13C4, G13C"& _ 
                "5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4, G93C5, G93C6, G93C7, NombreTransmis"& _ 
                "sion, DateTransmission, Référence_DRE, Référence_DRE_bdd, Référence_bdd FROM Lot"& _ 
                "s WHERE (Référence = @Référence_FSE) OR (Référence_DRE = @Référence_DRE)"
            Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(9).Connection = Me.Connection
            Me._commandCollection(9).CommandText = "INSERT INTO Lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      (Référence,Référence_DRE, CRL, CRF, Date,"& _ 
                " NombreDeFSE, Montant, Taille, Organisme, G13C1, G13C2, G13C3, G13C4, G13C5, G13"& _ 
                "C6, G13C7, G93C1, G93C2, G93C3, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      G93C4, G93C5, G93C6, G93"& _ 
                "C7, Etat,NombreTransmission,Référence_bdd,Référence_DRE_bdd)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES     (@Référ"& _ 
                "ence,@Référence_DRE,@CRL,@CRF,@Date,@NombreDeFSE,@Montant,@Taille,@Organisme,@G1"& _ 
                "3C1,@G13C2,@G13C3,@G13C4,@G13C5,@G13C6,@G13C7,@G93C1,@G93C2,@G93C3,@G93C4,@G93C5"& _ 
                ",@G93C6,@G93C7,@Etat,@NombreTransmission,@Référence_bdd,@Référence_DRE_bdd)"
            Me._commandCollection(9).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRL", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CRL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CRF", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CRF", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreDeFSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreDeFSE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Montant", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Montant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Taille", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Taille", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Organisme", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Organisme", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C1", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C3", Global.System.Data.SqlDbType.NVarChar, 14, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C4", Global.System.Data.SqlDbType.NVarChar, 14, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C5", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C6", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G13C7", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "G13C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C1", Global.System.Data.SqlDbType.NVarChar, 14, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C3", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C4", Global.System.Data.SqlDbType.NVarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C5", Global.System.Data.SqlDbType.NVarChar, 20, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C6", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G93C7", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "G93C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Etat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Etat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreTransmission", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreTransmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_bdd", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence_bdd", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE_bdd", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE_bdd", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(10).Connection = Me.Connection
            Me._commandCollection(10).CommandText = "SELECT max(Référence_bdd) FROM Lots"
            Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(11) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(11).Connection = Me.Connection
            Me._commandCollection(11).CommandText = "SELECT max(Référence_DRE) FROM Lots"
            Me._commandCollection(11).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(12) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(12).Connection = Me.Connection
            Me._commandCollection(12).CommandText = "SELECT max(Référence_DRE_bdd) FROM Lots"
            Me._commandCollection(12).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(13) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(13).Connection = Me.Connection
            Me._commandCollection(13).CommandText = "SELECT CRF, Montant, Organisme, FichierLots, ARLG31C1, ARLG31C10, ARLG31C2, ARLG3"& _ 
                "1C3, ARLG31C4, ARLG31C5, ARLG31C6, ARLG31C7, ARLG31C8, ARLG31C9, ArlIdMessage, E"& _ 
                "tat, G13C1, G13C2, G13C3, G13C4, G13C5, G13C6, G13C7, G93C1, G93C2, G93C3, G93C4"& _ 
                ", G93C5, G93C6, G93C7, NombreTransmission, DateTransmission, Référence_DRE, Réfé"& _ 
                "rence_DRE_bdd, Référence_bdd FROM Lots WHERE (Référence = @Référence_FSE) OR (Ré"& _ 
                "férence_DRE = @Référence_DRE)"
            Me._commandCollection(13).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(13).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(13).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(14) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(14).Connection = Me.Connection
            Me._commandCollection(14).CommandText = "SELECT max(référence) FROM Lots"
            Me._commandCollection(14).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(15) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(15).Connection = Me.Connection
            Me._commandCollection(15).CommandText = "SELECT NombreDeFSE, Montant, Organisme, FichierLots, ARLG31C1, ARLG31C10, ARLG31C"& _ 
                "2, ARLG31C3, ARLG31C4, ARLG31C5, ARLG31C6, ARLG31C7, ARLG31C8, ARLG31C9, ArlIdMe"& _ 
                "ssage, Etat, G13C1, G13C2, G13C3, G13C4, G13C5, G13C6, G13C7, G93C1, G93C2, G93C"& _ 
                "3, G93C4, G93C5, G93C6, G93C7, NombreTransmission, DateTransmission, Référence_D"& _ 
                "RE, Référence_DRE_bdd, Référence_bdd FROM Lots WHERE (Référence = @Référence_FSE"& _ 
                ") OR (Référence_DRE = @Référence_DRE)"
            Me._commandCollection(15).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(15).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(15).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(16) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(16).Connection = Me.Connection
            Me._commandCollection(16).CommandText = "SELECT Taille, Montant, Organisme, FichierLots, ARLG31C1, ARLG31C10, ARLG31C2, AR"& _ 
                "LG31C3, ARLG31C4, ARLG31C5, ARLG31C6, ARLG31C7, ARLG31C8, ARLG31C9, ArlIdMessage"& _ 
                ", Etat, G13C1, G13C2, G13C3, G13C4, G13C5, G13C6, G13C7, G93C1, G93C2, G93C3, G9"& _ 
                "3C4, G93C5, G93C6, G93C7, NombreTransmission, DateTransmission, Référence_DRE, R"& _ 
                "éférence_DRE_bdd, Référence_bdd FROM Lots WHERE (Référence = @Référence_FSE) OR "& _ 
                "(Référence_DRE = @Référence_DRE)"
            Me._commandCollection(16).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(16).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(16).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(17).Connection = Me.Connection
            Me._commandCollection(17).CommandText = "UPDATE    Lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              Etat = @Etat, ARLG31C1 = @ARLG31C1, ARLG31C2 = @"& _ 
                "ARLG31C2, ARLG31C3 = @ARLG31C3, ARLG31C4 = @ARLG31C4, ARLG31C5 = @ARLG31C5, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"  "& _ 
                "                    ARLG31C6 = @ARLG31C6, ARLG31C7 = @ARLG31C7, ARLG31C8 = @ARLG"& _ 
                "31C8, ARLG31C9 = @ARLG31C9, ARLG31C10 = @ARLG31C10, "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                      ArlI"& _ 
                "dMessage =@ArlIdMessage"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE    (Référence = @Référence_FSE or Référence_DRE=@"& _ 
                "Référence_DRE)"
            Me._commandCollection(17).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Etat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Etat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARLG31C10", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "ARLG31C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ArlIdMessage", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "ArlIdMessage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(17).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(18) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(18).Connection = Me.Connection
            Me._commandCollection(18).CommandText = "UPDATE    Lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              DateTransmission=@DateTransmission"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (R"& _ 
                "éférence = @Référence_FSE or Référence_DRE=@Référence_DRE)"
            Me._commandCollection(18).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(18).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateTransmission", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DateTransmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(18).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(18).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(19) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(19).Connection = Me.Connection
            Me._commandCollection(19).CommandText = "UPDATE    Lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              Etat= @Etat"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE    (Référence = @Référence_FS"& _ 
                "E or Référence_DRE=@Référence_DRE)"
            Me._commandCollection(19).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(19).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Etat", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Etat", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(19).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(19).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(20) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(20).Connection = Me.Connection
            Me._commandCollection(20).CommandText = "UPDATE    Lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              FichierLots = @FichierLots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE    (Référence "& _ 
                "= @Référence_FSE or Référence_DRE=@Référence_DRE)"
            Me._commandCollection(20).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(20).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierLots", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "FichierLots", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(20).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(20).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(21) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(21).Connection = Me.Connection
            Me._commandCollection(21).CommandText = "UPDATE    Lots"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET             NombreTransmission= @NombreTransmission"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE   "& _ 
                " (Référence = @Référence_FSE or Référence_DRE=@Référence_DRE)"
            Me._commandCollection(21).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(21).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NombreTransmission", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "NombreTransmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(21).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_FSE", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Référence", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(21).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_DRE", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_DRE", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.LotsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function FillByEtat_and_NombreTransmission(ByVal dataTable As PharmaDataSet.LotsDataTable, ByVal Etat As String, ByVal NombreTransmission As Global.System.Nullable(Of Decimal)) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (Etat Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Etat,String)
            End If
            If (NombreTransmission.HasValue = true) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(NombreTransmission.Value,Decimal)
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetData_Lots_aquittés(ByVal date_mini As Single) As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(3)
            Me.Adapter.SelectCommand.Parameters(0).Value = CType(date_mini,Single)
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetData_Lots_en_echec() As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(4)
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_FichierLots(ByVal FichierLots As String) As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(5)
            If (FichierLots Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(FichierLots,String)
            End If
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByArlIdMessage(ByVal ArlIdMessage As String) As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(6)
            If (ArlIdMessage Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(ArlIdMessage,String)
            End If
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByFichierLots(ByVal FichierLots As String) As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(7)
            If (FichierLots Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(FichierLots,String)
            End If
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByRéférence(ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As PharmaDataSet.LotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(8)
            If (Référence_FSE.HasValue = true) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Référence_FSE.Value,Decimal)
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(Référence_DRE,String)
            End If
            Dim dataTable As PharmaDataSet.LotsDataTable = New PharmaDataSet.LotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.LotsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Lots")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal Référence As Global.System.Nullable(Of Decimal),  _
                    ByVal CRL As String,  _
                    ByVal CRF As String,  _
                    ByVal _Date As String,  _
                    ByVal NombreDeFSE As Global.System.Nullable(Of Decimal),  _
                    ByVal Taille As Global.System.Nullable(Of Decimal),  _
                    ByVal Montant As Global.System.Nullable(Of Decimal),  _
                    ByVal Organisme As String,  _
                    ByVal FichierLots As String,  _
                    ByVal ARLG31C1 As String,  _
                    ByVal ARLG31C10 As String,  _
                    ByVal ARLG31C2 As String,  _
                    ByVal ARLG31C3 As String,  _
                    ByVal ARLG31C4 As String,  _
                    ByVal ARLG31C5 As String,  _
                    ByVal ARLG31C6 As String,  _
                    ByVal ARLG31C7 As String,  _
                    ByVal ARLG31C8 As String,  _
                    ByVal ARLG31C9 As String,  _
                    ByVal ArlIdMessage As String,  _
                    ByVal Etat As String,  _
                    ByVal G13C1 As String,  _
                    ByVal G13C2 As String,  _
                    ByVal G13C3 As String,  _
                    ByVal G13C4 As String,  _
                    ByVal G13C5 As String,  _
                    ByVal G13C6 As String,  _
                    ByVal G13C7 As String,  _
                    ByVal G93C1 As String,  _
                    ByVal G93C2 As String,  _
                    ByVal G93C3 As String,  _
                    ByVal G93C4 As String,  _
                    ByVal G93C5 As String,  _
                    ByVal G93C6 As String,  _
                    ByVal G93C7 As String,  _
                    ByVal NombreTransmission As Global.System.Nullable(Of Decimal),  _
                    ByVal DateTransmission As String,  _
                    ByVal Référence_DRE As String,  _
                    ByVal Référence_DRE_bdd As String,  _
                    ByVal Référence_bdd As Global.System.Nullable(Of Decimal)) As Integer
            If (Référence.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Référence.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (CRL Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CRL,String)
            End If
            If (CRF Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(CRF,String)
            End If
            If (_Date Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(_Date,String)
            End If
            If (NombreDeFSE.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(NombreDeFSE.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Taille.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Taille.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (Montant.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(Montant.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (Organisme Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(Organisme,String)
            End If
            If (FichierLots Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(FichierLots,String)
            End If
            If (ARLG31C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(ARLG31C1,String)
            End If
            If (ARLG31C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(ARLG31C10,String)
            End If
            If (ARLG31C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(ARLG31C2,String)
            End If
            If (ARLG31C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(ARLG31C3,String)
            End If
            If (ARLG31C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(ARLG31C4,String)
            End If
            If (ARLG31C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(ARLG31C5,String)
            End If
            If (ARLG31C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(ARLG31C6,String)
            End If
            If (ARLG31C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(ARLG31C7,String)
            End If
            If (ARLG31C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(ARLG31C8,String)
            End If
            If (ARLG31C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(ARLG31C9,String)
            End If
            If (ArlIdMessage Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(ArlIdMessage,String)
            End If
            If (Etat Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(Etat,String)
            End If
            If (G13C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(G13C1,String)
            End If
            If (G13C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(22).Value = CType(G13C2,String)
            End If
            If (G13C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(23).Value = CType(G13C3,String)
            End If
            If (G13C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(24).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(24).Value = CType(G13C4,String)
            End If
            If (G13C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(25).Value = CType(G13C5,String)
            End If
            If (G13C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(26).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(26).Value = CType(G13C6,String)
            End If
            If (G13C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(27).Value = CType(G13C7,String)
            End If
            If (G93C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(28).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(28).Value = CType(G93C1,String)
            End If
            If (G93C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(29).Value = CType(G93C2,String)
            End If
            If (G93C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(30).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(30).Value = CType(G93C3,String)
            End If
            If (G93C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(31).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(31).Value = CType(G93C4,String)
            End If
            If (G93C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(32).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(32).Value = CType(G93C5,String)
            End If
            If (G93C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(33).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(33).Value = CType(G93C6,String)
            End If
            If (G93C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(34).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(34).Value = CType(G93C7,String)
            End If
            If (NombreTransmission.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(35).Value = CType(NombreTransmission.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(35).Value = Global.System.DBNull.Value
            End If
            If (DateTransmission Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(36).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(36).Value = CType(DateTransmission,String)
            End If
            If (Référence_DRE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(37).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(37).Value = CType(Référence_DRE,String)
            End If
            If (Référence_DRE_bdd Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(38).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(38).Value = CType(Référence_DRE_bdd,String)
            End If
            If (Référence_bdd.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(39).Value = CType(Référence_bdd.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(39).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_By_référence(ByVal Référence As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Référence.HasValue = true) Then
                command.Parameters(0).Value = CType(Référence.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1( _
                    ByVal Référence As Global.System.Nullable(Of Decimal),  _
                    ByVal Référence_DRE As String,  _
                    ByVal CRL As String,  _
                    ByVal CRF As String,  _
                    ByVal _Date As String,  _
                    ByVal NombreDeFSE As Global.System.Nullable(Of Decimal),  _
                    ByVal Montant As Global.System.Nullable(Of Decimal),  _
                    ByVal Taille As Global.System.Nullable(Of Decimal),  _
                    ByVal Organisme As String,  _
                    ByVal G13C1 As String,  _
                    ByVal G13C2 As String,  _
                    ByVal G13C3 As String,  _
                    ByVal G13C4 As String,  _
                    ByVal G13C5 As String,  _
                    ByVal G13C6 As String,  _
                    ByVal G13C7 As String,  _
                    ByVal G93C1 As String,  _
                    ByVal G93C2 As String,  _
                    ByVal G93C3 As String,  _
                    ByVal G93C4 As String,  _
                    ByVal G93C5 As String,  _
                    ByVal G93C6 As String,  _
                    ByVal G93C7 As String,  _
                    ByVal Etat As String,  _
                    ByVal NombreTransmission As Global.System.Nullable(Of Decimal),  _
                    ByVal Référence_bdd As Global.System.Nullable(Of Decimal),  _
                    ByVal Référence_DRE_bdd As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(9)
            If (Référence.HasValue = true) Then
                command.Parameters(0).Value = CType(Référence.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Référence_DRE,String)
            End If
            If (CRL Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(CRL,String)
            End If
            If (CRF Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(CRF,String)
            End If
            If (_Date Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(_Date,String)
            End If
            If (NombreDeFSE.HasValue = true) Then
                command.Parameters(5).Value = CType(NombreDeFSE.Value,Decimal)
            Else
                command.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (Montant.HasValue = true) Then
                command.Parameters(6).Value = CType(Montant.Value,Decimal)
            Else
                command.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (Taille.HasValue = true) Then
                command.Parameters(7).Value = CType(Taille.Value,Decimal)
            Else
                command.Parameters(7).Value = Global.System.DBNull.Value
            End If
            If (Organisme Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(Organisme,String)
            End If
            If (G13C1 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G13C1,String)
            End If
            If (G13C2 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G13C2,String)
            End If
            If (G13C3 Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(G13C3,String)
            End If
            If (G13C4 Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(G13C4,String)
            End If
            If (G13C5 Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(G13C5,String)
            End If
            If (G13C6 Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(G13C6,String)
            End If
            If (G13C7 Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(G13C7,String)
            End If
            If (G93C1 Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(G93C1,String)
            End If
            If (G93C2 Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(G93C2,String)
            End If
            If (G93C3 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G93C3,String)
            End If
            If (G93C4 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G93C4,String)
            End If
            If (G93C5 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G93C5,String)
            End If
            If (G93C6 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G93C6,String)
            End If
            If (G93C7 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G93C7,String)
            End If
            If (Etat Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(Etat,String)
            End If
            If (NombreTransmission.HasValue = true) Then
                command.Parameters(24).Value = CType(NombreTransmission.Value,Decimal)
            Else
                command.Parameters(24).Value = Global.System.DBNull.Value
            End If
            If (Référence_bdd.HasValue = true) Then
                command.Parameters(25).Value = CType(Référence_bdd.Value,Decimal)
            Else
                command.Parameters(25).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE_bdd Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(Référence_DRE_bdd,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SELECT_max_Référence_bdd() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(10)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_max_Référence_DRE() As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(11)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SELECT_max_Référence_DRE_bdd() As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(12)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectCRFbyRéférence(ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(13)
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(0).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxRéférence() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(14)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectNombreDeFSEbyRéférence(ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(15)
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(0).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectTailleByRéférence(ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(16)
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(0).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_ARL(ByVal Etat As String, ByVal ARLG31C1 As String, ByVal ARLG31C2 As String, ByVal ARLG31C3 As String, ByVal ARLG31C4 As String, ByVal ARLG31C5 As String, ByVal ARLG31C6 As String, ByVal ARLG31C7 As String, ByVal ARLG31C8 As String, ByVal ARLG31C9 As String, ByVal ARLG31C10 As String, ByVal ArlIdMessage As String, ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(17)
            If (Etat Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Etat,String)
            End If
            If (ARLG31C1 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(ARLG31C1,String)
            End If
            If (ARLG31C2 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(ARLG31C2,String)
            End If
            If (ARLG31C3 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(ARLG31C3,String)
            End If
            If (ARLG31C4 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(ARLG31C4,String)
            End If
            If (ARLG31C5 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(ARLG31C5,String)
            End If
            If (ARLG31C6 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(ARLG31C6,String)
            End If
            If (ARLG31C7 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(ARLG31C7,String)
            End If
            If (ARLG31C8 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(ARLG31C8,String)
            End If
            If (ARLG31C9 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(ARLG31C9,String)
            End If
            If (ARLG31C10 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(ARLG31C10,String)
            End If
            If (ArlIdMessage Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(ArlIdMessage,String)
            End If
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(12).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_DateTransmission(ByVal DateTransmission As String, ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(18)
            If (DateTransmission Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(DateTransmission,String)
            End If
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(1).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_Etat(ByVal Etat As String, ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(19)
            If (Etat Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Etat,String)
            End If
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(1).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_Fichier(ByVal FichierLots As String, ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(20)
            If (FichierLots Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(FichierLots,String)
            End If
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(1).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_NombreTransmission(ByVal NombreTransmission As Global.System.Nullable(Of Decimal), ByVal Référence_FSE As Global.System.Nullable(Of Decimal), ByVal Référence_DRE As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(21)
            If (NombreTransmission.HasValue = true) Then
                command.Parameters(0).Value = CType(NombreTransmission.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (Référence_FSE.HasValue = true) Then
                command.Parameters(1).Value = CType(Référence_FSE.Value,Decimal)
            Else
                command.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Référence_DRE Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Référence_DRE,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Facture_DétailCodeCIPTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Facture_DétailCodeCIP"
            tableMapping.ColumnMappings.Add("NumLigne", "NumLigne")
            tableMapping.ColumnMappings.Add("G1740C1", "G1740C1")
            tableMapping.ColumnMappings.Add("G1740C2", "G1740C2")
            tableMapping.ColumnMappings.Add("G1740C3", "G1740C3")
            tableMapping.ColumnMappings.Add("G1740C4", "G1740C4")
            tableMapping.ColumnMappings.Add("G1740C5", "G1740C5")
            tableMapping.ColumnMappings.Add("G1740C6", "G1740C6")
            tableMapping.ColumnMappings.Add("G1740C7", "G1740C7")
            tableMapping.ColumnMappings.Add("G1740C8", "G1740C8")
            tableMapping.ColumnMappings.Add("G1740C9", "G1740C9")
            tableMapping.ColumnMappings.Add("G1740C10", "G1740C10")
            tableMapping.ColumnMappings.Add("G1740C11", "G1740C11")
            tableMapping.ColumnMappings.Add("G1740C12", "G1740C12")
            tableMapping.ColumnMappings.Add("G1740C13", "G1740C13")
            tableMapping.ColumnMappings.Add("G1740C14", "G1740C14")
            tableMapping.ColumnMappings.Add("G1740C15", "G1740C15")
            tableMapping.ColumnMappings.Add("G1110C1", "G1110C1")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Facture_DétailCodeCIP] ([NumLigne], [G1740C1], [G1740C2], [G1740C3],"& _ 
                " [G1740C4], [G1740C5], [G1740C6], [G1740C7], [G1740C8], [G1740C9], [G1740C10], ["& _ 
                "G1740C11], [G1740C12], [G1740C13], [G1740C14], [G1740C15], [G1110C1]) VALUES (@N"& _ 
                "umLigne, @G1740C1, @G1740C2, @G1740C3, @G1740C4, @G1740C5, @G1740C6, @G1740C7, @"& _ 
                "G1740C8, @G1740C9, @G1740C10, @G1740C11, @G1740C12, @G1740C13, @G1740C14, @G1740"& _ 
                "C15, @G1110C1)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLigne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLigne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C12", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C14", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1740C15", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1740C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT NumLigne, G1740C1, G1740C2, G1740C3, G1740C4, G1740C5, G1740C6, G1740C7, G"& _ 
                "1740C8, G1740C9, G1740C10, G1740C11, G1740C12, G1740C13, G1740C14, G1740C15, G11"& _ 
                "10C1 FROM Facture_DétailCodeCIP"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE FROM Facture_DétailCodeCIP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where G1110C1 =@Num_Facture"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT NumLigne, G1740C1, G1740C2, G1740C3, G1740C4, G1740C5, G1740C6, G1740C7, G"& _ 
                "1740C8, G1740C9, G1740C10, G1740C11, G1740C12, G1740C13, G1740C14, G1740C15, G11"& _ 
                "10C1 FROM Facture_DétailCodeCIP"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE  G1110C1 =@NumFacture"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"ORDER BY NumLigne"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Facture_DétailCodeCIPDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Facture_DétailCodeCIPDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Facture_DétailCodeCIPDataTable = New PharmaDataSet.Facture_DétailCodeCIPDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByNumFacture(ByVal NumFacture As String) As PharmaDataSet.Facture_DétailCodeCIPDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (NumFacture Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim dataTable As PharmaDataSet.Facture_DétailCodeCIPDataTable = New PharmaDataSet.Facture_DétailCodeCIPDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Facture_DétailCodeCIPDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Facture_DétailCodeCIP")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal NumLigne As String,  _
                    ByVal G1740C1 As String,  _
                    ByVal G1740C2 As String,  _
                    ByVal G1740C3 As String,  _
                    ByVal G1740C4 As String,  _
                    ByVal G1740C5 As String,  _
                    ByVal G1740C6 As String,  _
                    ByVal G1740C7 As String,  _
                    ByVal G1740C8 As String,  _
                    ByVal G1740C9 As String,  _
                    ByVal G1740C10 As String,  _
                    ByVal G1740C11 As String,  _
                    ByVal G1740C12 As String,  _
                    ByVal G1740C13 As String,  _
                    ByVal G1740C14 As String,  _
                    ByVal G1740C15 As String,  _
                    ByVal G1110C1 As String) As Integer
            If (NumLigne Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(NumLigne,String)
            End If
            If (G1740C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(G1740C1,String)
            End If
            If (G1740C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(G1740C2,String)
            End If
            If (G1740C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(G1740C3,String)
            End If
            If (G1740C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(G1740C4,String)
            End If
            If (G1740C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(G1740C5,String)
            End If
            If (G1740C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(G1740C6,String)
            End If
            If (G1740C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(G1740C7,String)
            End If
            If (G1740C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(G1740C8,String)
            End If
            If (G1740C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(G1740C9,String)
            End If
            If (G1740C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(G1740C10,String)
            End If
            If (G1740C11 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(G1740C11,String)
            End If
            If (G1740C12 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(G1740C12,String)
            End If
            If (G1740C13 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(G1740C13,String)
            End If
            If (G1740C14 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(G1740C14,String)
            End If
            If (G1740C15 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(G1740C15,String)
            End If
            If (G1110C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(G1110C1,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_By_Num_Facture(ByVal Num_Facture As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Num_Facture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Facture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Facture_DétailLppTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Facture_DétailLpp"
            tableMapping.ColumnMappings.Add("NumLigne", "NumLigne")
            tableMapping.ColumnMappings.Add("G1730C1", "G1730C1")
            tableMapping.ColumnMappings.Add("G1730C2", "G1730C2")
            tableMapping.ColumnMappings.Add("G1730C3", "G1730C3")
            tableMapping.ColumnMappings.Add("G1730C4", "G1730C4")
            tableMapping.ColumnMappings.Add("G1730C5", "G1730C5")
            tableMapping.ColumnMappings.Add("G1730C6", "G1730C6")
            tableMapping.ColumnMappings.Add("G1730C7", "G1730C7")
            tableMapping.ColumnMappings.Add("G1730C8", "G1730C8")
            tableMapping.ColumnMappings.Add("G1730C9", "G1730C9")
            tableMapping.ColumnMappings.Add("G1730C10", "G1730C10")
            tableMapping.ColumnMappings.Add("G1730C11", "G1730C11")
            tableMapping.ColumnMappings.Add("G1110C1", "G1110C1")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Facture_DétailLpp] ([NumLigne], [G1730C1], [G1730C2], [G1730C3], [G1"& _ 
                "730C4], [G1730C5], [G1730C6], [G1730C7], [G1730C8], [G1730C9], [G1730C10], [G173"& _ 
                "0C11], [G1110C1]) VALUES (@NumLigne, @G1730C1, @G1730C2, @G1730C3, @G1730C4, @G1"& _ 
                "730C5, @G1730C6, @G1730C7, @G1730C8, @G1730C9, @G1730C10, @G1730C11, @G1110C1)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLigne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLigne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C6", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C11", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT NumLigne, G1730C1, G1730C2, G1730C3, G1730C4, G1730C5, G1730C6, G1730C7, G"& _ 
                "1730C8, G1730C9, G1730C10, G1730C11, G1110C1 FROM Facture_DétailLpp"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE FROM Facture_DétailLpp"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where G1110C1 =@Num_Facture"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT NumLigne, G1730C1, G1730C2, G1730C3, G1730C4, G1730C5, G1730C6, G1730C7, G"& _ 
                "1730C8, G1730C9, G1730C10, G1730C11, G1110C1 FROM Facture_DétailLpp"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE  G111"& _ 
                "0C1=@NumFacture"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Order By Numligne"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "INSERT INTO [Facture_DétailLpp] ([NumLigne], [G1730C1], [G1730C2], [G1730C3], [G1"& _ 
                "730C4], [G1730C5], [G1730C6], [G1730C7], [G1730C8], [G1730C9], [G1730C10], [G173"& _ 
                "0C11], [G1110C1]) VALUES (@NumLigne, @G1730C1, @G1730C2, @G1730C3, @G1730C4, @G1"& _ 
                "730C5, @G1730C6, @G1730C7, @G1730C8, @G1730C9, @G1730C10, @G1730C11, @G1110C1)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLigne", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLigne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C6", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1730C11", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1730C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1110C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1110C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Facture_DétailLppDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Facture_DétailLppDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Facture_DétailLppDataTable = New PharmaDataSet.Facture_DétailLppDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByNumFacture(ByVal NumFacture As String) As PharmaDataSet.Facture_DétailLppDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (NumFacture Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim dataTable As PharmaDataSet.Facture_DétailLppDataTable = New PharmaDataSet.Facture_DétailLppDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Facture_DétailLppDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Facture_DétailLpp")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal NumLigne As String, ByVal G1730C1 As String, ByVal G1730C2 As String, ByVal G1730C3 As String, ByVal G1730C4 As String, ByVal G1730C5 As String, ByVal G1730C6 As String, ByVal G1730C7 As String, ByVal G1730C8 As String, ByVal G1730C9 As String, ByVal G1730C10 As String, ByVal G1730C11 As String, ByVal G1110C1 As String) As Integer
            If (NumLigne Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(NumLigne,String)
            End If
            If (G1730C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(G1730C1,String)
            End If
            If (G1730C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(G1730C2,String)
            End If
            If (G1730C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(G1730C3,String)
            End If
            If (G1730C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(G1730C4,String)
            End If
            If (G1730C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(G1730C5,String)
            End If
            If (G1730C6 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(G1730C6,String)
            End If
            If (G1730C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(G1730C7,String)
            End If
            If (G1730C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(G1730C8,String)
            End If
            If (G1730C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(G1730C9,String)
            End If
            If (G1730C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(G1730C10,String)
            End If
            If (G1730C11 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(G1730C11,String)
            End If
            If (G1110C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(G1110C1,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_By_Num_Facture(ByVal Num_Facture As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Num_Facture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Facture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1(ByVal NumLigne As String, ByVal G1730C1 As String, ByVal G1730C2 As String, ByVal G1730C3 As String, ByVal G1730C4 As String, ByVal G1730C5 As String, ByVal G1730C6 As String, ByVal G1730C7 As String, ByVal G1730C8 As String, ByVal G1730C9 As String, ByVal G1730C10 As String, ByVal G1730C11 As String, ByVal G1110C1 As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (NumLigne Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(NumLigne,String)
            End If
            If (G1730C1 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G1730C1,String)
            End If
            If (G1730C2 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G1730C2,String)
            End If
            If (G1730C3 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G1730C3,String)
            End If
            If (G1730C4 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G1730C4,String)
            End If
            If (G1730C5 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(G1730C5,String)
            End If
            If (G1730C6 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G1730C6,String)
            End If
            If (G1730C7 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G1730C7,String)
            End If
            If (G1730C8 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G1730C8,String)
            End If
            If (G1730C9 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G1730C9,String)
            End If
            If (G1730C10 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G1730C10,String)
            End If
            If (G1730C11 Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(G1730C11,String)
            End If
            If (G1110C1 Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(G1110C1,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Facture_LigneFactureTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Facture_LigneFacture"
            tableMapping.ColumnMappings.Add("NumLigne", "NumLigne")
            tableMapping.ColumnMappings.Add("G1610C1", "G1610C1")
            tableMapping.ColumnMappings.Add("G1610C2", "G1610C2")
            tableMapping.ColumnMappings.Add("G1610C3", "G1610C3")
            tableMapping.ColumnMappings.Add("G1610C4", "G1610C4")
            tableMapping.ColumnMappings.Add("G1610C5", "G1610C5")
            tableMapping.ColumnMappings.Add("G1610C6", "G1610C6")
            tableMapping.ColumnMappings.Add("G1610C7", "G1610C7")
            tableMapping.ColumnMappings.Add("G1610C8", "G1610C8")
            tableMapping.ColumnMappings.Add("G1610C9", "G1610C9")
            tableMapping.ColumnMappings.Add("G1610C10", "G1610C10")
            tableMapping.ColumnMappings.Add("G1610C11", "G1610C11")
            tableMapping.ColumnMappings.Add("G1610C12", "G1610C12")
            tableMapping.ColumnMappings.Add("G1610C13", "G1610C13")
            tableMapping.ColumnMappings.Add("G1610C14", "G1610C14")
            tableMapping.ColumnMappings.Add("G1610C15", "G1610C15")
            tableMapping.ColumnMappings.Add("G1610C16", "G1610C16")
            tableMapping.ColumnMappings.Add("G1820C2", "G1820C2")
            tableMapping.ColumnMappings.Add("G1850C2", "G1850C2")
            tableMapping.ColumnMappings.Add("G1840C2", "G1840C2")
            tableMapping.ColumnMappings.Add("G1840C3", "G1840C3")
            tableMapping.ColumnMappings.Add("G1840C4", "G1840C4")
            tableMapping.ColumnMappings.Add("G2000C2", "G2000C2")
            tableMapping.ColumnMappings.Add("G2010C2", "G2010C2")
            tableMapping.ColumnMappings.Add("G2030C2", "G2030C2")
            tableMapping.ColumnMappings.Add("G2030C3", "G2030C3")
            tableMapping.ColumnMappings.Add("G3710C2", "G3710C2")
            tableMapping.ColumnMappings.Add("G3710C3", "G3710C3")
            tableMapping.ColumnMappings.Add("G3710_Paramètes", "G3710_Paramètes")
            tableMapping.ColumnMappings.Add("Num_Facture", "Num_Facture")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Facture_LigneFacture] ([NumLigne], [G1610C1], [G1610C2], [G1610C3], "& _ 
                "[G1610C4], [G1610C5], [G1610C6], [G1610C7], [G1610C8], [G1610C9], [G1610C10], [G"& _ 
                "1610C11], [G1610C12], [G1610C13], [G1610C14], [G1610C15], [G1610C16], [G1820C2],"& _ 
                " [G1850C2], [G1840C2], [G1840C3], [G1840C4], [G2000C2], [G2010C2], [G2030C2], [G"& _ 
                "2030C3], [G3710C2], [G3710C3], [G3710_Paramètes], [Num_Facture]) VALUES (@NumLig"& _ 
                "ne, @G1610C1, @G1610C2, @G1610C3, @G1610C4, @G1610C5, @G1610C6, @G1610C7, @G1610"& _ 
                "C8, @G1610C9, @G1610C10, @G1610C11, @G1610C12, @G1610C13, @G1610C14, @G1610C15, "& _ 
                "@G1610C16, @G1820C2, @G1850C2, @G1840C2, @G1840C3, @G1840C4, @G2000C2, @G2010C2,"& _ 
                " @G2030C2, @G2030C3, @G3710C2, @G3710C3, @G3710_Paramètes, @Num_Facture)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLigne", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLigne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C5", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C6", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C8", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C9", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C10", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C11", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C12", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C13", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C14", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C15", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C16", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1820C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1820C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1850C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1850C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1840C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1840C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1840C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1840C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1840C4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G1840C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2000C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G2000C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2010C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G2010C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2030C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G2030C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2030C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G2030C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3710C2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G3710C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3710C3", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G3710C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3710_Paramètes", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "G3710_Paramètes", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(7) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT NumLigne, G1610C1, G1610C2, G1610C3, G1610C4, G1610C5, G1610C6, G1610C7, G"& _ 
                "1610C8, G1610C9, G1610C10, G1610C11, G1610C12, G1610C13, G1610C14, G1610C15, G16"& _ 
                "10C16, G1820C2, G1850C2, G1840C2, G1840C3, G1840C4, G2000C2, G2010C2, G2030C2, G"& _ 
                "2030C3, G3710C2, G3710C3, G3710_Paramètes, Num_Facture FROM Facture_LigneFacture"& _ 
                ""
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE FROM Facture_LigneFacture"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" WHERE (Num_Facture = @Num_Facture) "
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT NumLigne, G1610C1, G1610C2, G1610C3, G1610C4, G1610C5, G1610C6, G1610C7, G"& _ 
                "1610C8, G1610C9, G1610C10, G1610C11, G1610C12, G1610C13, G1610C14, G1610C15, G16"& _ 
                "10C16, G1820C2, G1850C2, G1840C2, G1840C3, G1840C4, G2000C2, G2010C2, G2030C2, G"& _ 
                "2030C3, G3710C2, G3710C3, G3710_Paramètes, Num_Facture FROM Facture_LigneFacture"& _ 
                " WHERE (Num_Facture = @NumFacture) ORDER BY NumLigne"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "INSERT INTO [dbo].[Facture_LigneFacture] ([Num_Facture], [NumLigne], [G1610C1], ["& _ 
                "G1610C2], [G1610C3], [G1610C4], [G1610C5], [G1610C6], [G1610C7], [G1610C8], [G16"& _ 
                "10C9], [G1610C10], [G1610C11], [G1610C12], [G1610C13], [G1610C14], [G1610C15], ["& _ 
                "G1610C16]) VALUES (@Num_Facture, @NumLigne, @G1610C1, @G1610C2, @G1610C3, @G1610"& _ 
                "C4, @G1610C5, @G1610C6, @G1610C7, @G1610C8, @G1610C9, @G1610C10, @G1610C11, @G16"& _ 
                "10C12, @G1610C13, @G1610C14, @G1610C15, @G1610C16)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLigne", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLigne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C6", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C11", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C12", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C13", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C14", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C15", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C16", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "INSERT INTO [Facture_LigneFacture] ([NumLigne], [G1610C1], [G1610C2], [G1610C3], "& _ 
                "[G1610C4], [G1610C5], [G1610C6], [G1610C7], [G1610C8], [G1610C9], [G1610C10], [G"& _ 
                "1610C11], [G1610C12], [G1610C13],[G1610C14],[G1610C15],[G1610C16],[Num_Facture],"& _ 
                "[G1820C2],[G1840C2],[G1840C3],"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[G1840C4],[G1850C2],[G2000C2],[G2010C2],[G2030C2"& _ 
                "],[G2030C3],[G3710C2],[G3710C3],[G3710_Paramètes]) "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"VALUES (@NumLigne, @G1610C1"& _ 
                ", @G1610C2, @G1610C3, @G1610C4, @G1610C5, @G1610C6, @G1610C7, @G1610C8, @G1610C9"& _ 
                ", @G1610C10, @G1610C11, @G1610C12, @G1610C13, @G1610C14, @G1610C15, @G1610C16, @"& _ 
                "Num_Facture,@G1820C2,@G1840C2,@G1840C3,@G1840C4,@G1850C2,@G2000C2,@G2010C2,@G203"& _ 
                "0C2,@G2030C3,@G3710C2,@G3710C3,@G3710_Paramètes)"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLigne", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLigne", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C1", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C2", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C3", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C4", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C5", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C5", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C6", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C6", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C7", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C8", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C8", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C9", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C9", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C10", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "G1610C10", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C11", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C11", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C12", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C12", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C13", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C14", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C14", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C15", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C15", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1610C16", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "G1610C16", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1820C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1820C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1840C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G1840C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1840C3", Global.System.Data.SqlDbType.NVarChar, 12, Global.System.Data.ParameterDirection.Input, 0, 0, "G1840C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1840C4", Global.System.Data.SqlDbType.NVarChar, 15, Global.System.Data.ParameterDirection.Input, 0, 0, "G1840C4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G1850C2", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "G1850C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2000C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G2000C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2010C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G2010C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2030C2", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "G2030C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G2030C3", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "G2030C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3710C2", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "G3710C2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3710C3", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "G3710C3", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@G3710_Paramètes", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "G3710_Paramètes", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "SELECT     SUM(G1610C12)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Facture_LigneFacture"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (Num_Factu"& _ 
                "re = @NumFacture)"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "SELECT     SUM(G1610C15)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Facture_LigneFacture"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (Num_Factu"& _ 
                "re = @NumFacture)"
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(7).Connection = Me.Connection
            Me._commandCollection(7).CommandText = "SELECT     SUM(G1610C14)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         Facture_LigneFacture"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (Num_Factu"& _ 
                "re = @NumFacture)"
            Me._commandCollection(7).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Facture_LigneFactureDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Facture_LigneFactureDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Facture_LigneFactureDataTable = New PharmaDataSet.Facture_LigneFactureDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataByNumFacture(ByVal NumFacture As String) As PharmaDataSet.Facture_LigneFactureDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (NumFacture Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim dataTable As PharmaDataSet.Facture_LigneFactureDataTable = New PharmaDataSet.Facture_LigneFactureDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Facture_LigneFactureDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Facture_LigneFacture")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal NumLigne As String,  _
                    ByVal G1610C1 As String,  _
                    ByVal G1610C2 As String,  _
                    ByVal G1610C3 As String,  _
                    ByVal G1610C4 As String,  _
                    ByVal G1610C5 As String,  _
                    ByVal G1610C6 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C7 As String,  _
                    ByVal G1610C8 As String,  _
                    ByVal G1610C9 As String,  _
                    ByVal G1610C10 As String,  _
                    ByVal G1610C11 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C12 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C13 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C14 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C15 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C16 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1820C2 As String,  _
                    ByVal G1850C2 As String,  _
                    ByVal G1840C2 As String,  _
                    ByVal G1840C3 As String,  _
                    ByVal G1840C4 As String,  _
                    ByVal G2000C2 As String,  _
                    ByVal G2010C2 As String,  _
                    ByVal G2030C2 As String,  _
                    ByVal G2030C3 As String,  _
                    ByVal G3710C2 As String,  _
                    ByVal G3710C3 As String,  _
                    ByVal G3710_Paramètes As String,  _
                    ByVal Num_Facture As String) As Integer
            If (NumLigne Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(NumLigne,String)
            End If
            If (G1610C1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(G1610C1,String)
            End If
            If (G1610C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(G1610C2,String)
            End If
            If (G1610C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(G1610C3,String)
            End If
            If (G1610C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(G1610C4,String)
            End If
            If (G1610C5 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(G1610C5,String)
            End If
            If (G1610C6.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(G1610C6.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (G1610C7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(G1610C7,String)
            End If
            If (G1610C8 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(G1610C8,String)
            End If
            If (G1610C9 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(G1610C9,String)
            End If
            If (G1610C10 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(G1610C10,String)
            End If
            If (G1610C11.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(G1610C11.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (G1610C12.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(G1610C12.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (G1610C13.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(G1610C13.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            End If
            If (G1610C14.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(G1610C14.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (G1610C15.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(G1610C15.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            End If
            If (G1610C16.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(G1610C16.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (G1820C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(G1820C2,String)
            End If
            If (G1850C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(G1850C2,String)
            End If
            If (G1840C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(G1840C2,String)
            End If
            If (G1840C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(G1840C3,String)
            End If
            If (G1840C4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(G1840C4,String)
            End If
            If (G2000C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(22).Value = CType(G2000C2,String)
            End If
            If (G2010C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(23).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(23).Value = CType(G2010C2,String)
            End If
            If (G2030C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(24).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(24).Value = CType(G2030C2,String)
            End If
            If (G2030C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(25).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(25).Value = CType(G2030C3,String)
            End If
            If (G3710C2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(26).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(26).Value = CType(G3710C2,String)
            End If
            If (G3710C3 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(27).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(27).Value = CType(G3710C3,String)
            End If
            If (G3710_Paramètes Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(28).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(28).Value = CType(G3710_Paramètes,String)
            End If
            If (Num_Facture Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(29).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(29).Value = CType(Num_Facture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_By_Num_Facture(ByVal Num_Facture As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Num_Facture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Facture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1( _
                    ByVal Num_Facture As String,  _
                    ByVal NumLigne As String,  _
                    ByVal G1610C1 As String,  _
                    ByVal G1610C2 As String,  _
                    ByVal G1610C3 As String,  _
                    ByVal G1610C4 As String,  _
                    ByVal G1610C5 As String,  _
                    ByVal G1610C6 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C7 As String,  _
                    ByVal G1610C8 As String,  _
                    ByVal G1610C9 As String,  _
                    ByVal G1610C10 As String,  _
                    ByVal G1610C11 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C12 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C13 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C14 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C15 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C16 As Global.System.Nullable(Of Decimal)) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (Num_Facture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Facture,String)
            End If
            If (NumLigne Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(NumLigne,String)
            End If
            If (G1610C1 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G1610C1,String)
            End If
            If (G1610C2 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G1610C2,String)
            End If
            If (G1610C3 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G1610C3,String)
            End If
            If (G1610C4 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(G1610C4,String)
            End If
            If (G1610C5 Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(G1610C5,String)
            End If
            If (G1610C6.HasValue = true) Then
                command.Parameters(7).Value = CType(G1610C6.Value,Decimal)
            Else
                command.Parameters(7).Value = Global.System.DBNull.Value
            End If
            If (G1610C7 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G1610C7,String)
            End If
            If (G1610C8 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G1610C8,String)
            End If
            If (G1610C9 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G1610C9,String)
            End If
            If (G1610C10 Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(G1610C10,String)
            End If
            If (G1610C11.HasValue = true) Then
                command.Parameters(12).Value = CType(G1610C11.Value,Decimal)
            Else
                command.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (G1610C12.HasValue = true) Then
                command.Parameters(13).Value = CType(G1610C12.Value,Decimal)
            Else
                command.Parameters(13).Value = Global.System.DBNull.Value
            End If
            If (G1610C13.HasValue = true) Then
                command.Parameters(14).Value = CType(G1610C13.Value,Decimal)
            Else
                command.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (G1610C14.HasValue = true) Then
                command.Parameters(15).Value = CType(G1610C14.Value,Decimal)
            Else
                command.Parameters(15).Value = Global.System.DBNull.Value
            End If
            If (G1610C15.HasValue = true) Then
                command.Parameters(16).Value = CType(G1610C15.Value,Decimal)
            Else
                command.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (G1610C16.HasValue = true) Then
                command.Parameters(17).Value = CType(G1610C16.Value,Decimal)
            Else
                command.Parameters(17).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert2( _
                    ByVal NumLigne As String,  _
                    ByVal G1610C1 As String,  _
                    ByVal G1610C2 As String,  _
                    ByVal G1610C3 As String,  _
                    ByVal G1610C4 As String,  _
                    ByVal G1610C5 As String,  _
                    ByVal G1610C6 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C7 As String,  _
                    ByVal G1610C8 As String,  _
                    ByVal G1610C9 As String,  _
                    ByVal G1610C10 As String,  _
                    ByVal G1610C11 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C12 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C13 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C14 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C15 As Global.System.Nullable(Of Decimal),  _
                    ByVal G1610C16 As Global.System.Nullable(Of Decimal),  _
                    ByVal Num_Facture As String,  _
                    ByVal G1820C2 As String,  _
                    ByVal G1840C2 As String,  _
                    ByVal G1840C3 As String,  _
                    ByVal G1840C4 As String,  _
                    ByVal G1850C2 As String,  _
                    ByVal G2000C2 As String,  _
                    ByVal G2010C2 As String,  _
                    ByVal G2030C2 As String,  _
                    ByVal G2030C3 As String,  _
                    ByVal G3710C2 As String,  _
                    ByVal G3710C3 As String,  _
                    ByVal G3710_Paramètes As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            If (NumLigne Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(NumLigne,String)
            End If
            If (G1610C1 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(G1610C1,String)
            End If
            If (G1610C2 Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(G1610C2,String)
            End If
            If (G1610C3 Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(G1610C3,String)
            End If
            If (G1610C4 Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(G1610C4,String)
            End If
            If (G1610C5 Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(G1610C5,String)
            End If
            If (G1610C6.HasValue = true) Then
                command.Parameters(6).Value = CType(G1610C6.Value,Decimal)
            Else
                command.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (G1610C7 Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(G1610C7,String)
            End If
            If (G1610C8 Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(G1610C8,String)
            End If
            If (G1610C9 Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(G1610C9,String)
            End If
            If (G1610C10 Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(G1610C10,String)
            End If
            If (G1610C11.HasValue = true) Then
                command.Parameters(11).Value = CType(G1610C11.Value,Decimal)
            Else
                command.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (G1610C12.HasValue = true) Then
                command.Parameters(12).Value = CType(G1610C12.Value,Decimal)
            Else
                command.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (G1610C13.HasValue = true) Then
                command.Parameters(13).Value = CType(G1610C13.Value,Decimal)
            Else
                command.Parameters(13).Value = Global.System.DBNull.Value
            End If
            If (G1610C14.HasValue = true) Then
                command.Parameters(14).Value = CType(G1610C14.Value,Decimal)
            Else
                command.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (G1610C15.HasValue = true) Then
                command.Parameters(15).Value = CType(G1610C15.Value,Decimal)
            Else
                command.Parameters(15).Value = Global.System.DBNull.Value
            End If
            If (G1610C16.HasValue = true) Then
                command.Parameters(16).Value = CType(G1610C16.Value,Decimal)
            Else
                command.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (Num_Facture Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(Num_Facture,String)
            End If
            If (G1820C2 Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(G1820C2,String)
            End If
            If (G1840C2 Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(G1840C2,String)
            End If
            If (G1840C3 Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(G1840C3,String)
            End If
            If (G1840C4 Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(G1840C4,String)
            End If
            If (G1850C2 Is Nothing) Then
                command.Parameters(22).Value = Global.System.DBNull.Value
            Else
                command.Parameters(22).Value = CType(G1850C2,String)
            End If
            If (G2000C2 Is Nothing) Then
                command.Parameters(23).Value = Global.System.DBNull.Value
            Else
                command.Parameters(23).Value = CType(G2000C2,String)
            End If
            If (G2010C2 Is Nothing) Then
                command.Parameters(24).Value = Global.System.DBNull.Value
            Else
                command.Parameters(24).Value = CType(G2010C2,String)
            End If
            If (G2030C2 Is Nothing) Then
                command.Parameters(25).Value = Global.System.DBNull.Value
            Else
                command.Parameters(25).Value = CType(G2030C2,String)
            End If
            If (G2030C3 Is Nothing) Then
                command.Parameters(26).Value = Global.System.DBNull.Value
            Else
                command.Parameters(26).Value = CType(G2030C3,String)
            End If
            If (G3710C2 Is Nothing) Then
                command.Parameters(27).Value = Global.System.DBNull.Value
            Else
                command.Parameters(27).Value = CType(G3710C2,String)
            End If
            If (G3710C3 Is Nothing) Then
                command.Parameters(28).Value = Global.System.DBNull.Value
            Else
                command.Parameters(28).Value = CType(G3710C3,String)
            End If
            If (G3710_Paramètes Is Nothing) Then
                command.Parameters(29).Value = Global.System.DBNull.Value
            Else
                command.Parameters(29).Value = CType(G3710_Paramètes,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectSUMBaseRemboursementByNumFacture(ByVal NumFacture As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (NumFacture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectSUMMonstantAMCByNumFacture(ByVal NumFacture As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(6)
            If (NumFacture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectSUMMontantAMOByNumFacture(ByVal NumFacture As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(7)
            If (NumFacture Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class AMC__Organismes_Contrat_Type_TableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "AMC_(Organismes/Contrat_Type)"
            tableMapping.ColumnMappings.Add("NumAMC", "NumAMC")
            tableMapping.ColumnMappings.Add("Id_Contrat_Type", "Id_Contrat_Type")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[AMC_(Organismes/Contrat_Type)] ([NumAMC], [Id_Contrat_Type]) V"& _ 
                "ALUES (@NumAMC, @Id_Contrat_Type)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumAMC", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumAMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_Contrat_Type", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_Contrat_Type", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT NumAMC, Id_Contrat_Type FROM dbo.[AMC_(Organismes/Contrat_Type)]"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet._AMC__Organismes_Contrat_Type_DataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet._AMC__Organismes_Contrat_Type_DataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet._AMC__Organismes_Contrat_Type_DataTable = New PharmaDataSet._AMC__Organismes_Contrat_Type_DataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet._AMC__Organismes_Contrat_Type_DataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "AMC_(Organismes/Contrat_Type)")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal NumAMC As String, ByVal Id_Contrat_Type As String) As Integer
            If (NumAMC Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(NumAMC,String)
            End If
            If (Id_Contrat_Type Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Id_Contrat_Type,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class AMC_Contrat_TypeTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "AMC_Contrat_Type"
            tableMapping.ColumnMappings.Add("Id", "Id")
            tableMapping.ColumnMappings.Add("Intitulé", "Intitulé")
            tableMapping.ColumnMappings.Add("AAD", "AAD")
            tableMapping.ColumnMappings.Add("AAR", "AAR")
            tableMapping.ColumnMappings.Add("ARO", "ARO")
            tableMapping.ColumnMappings.Add("B", "B")
            tableMapping.ColumnMappings.Add("CPH", "CPH")
            tableMapping.ColumnMappings.Add("MAC", "MAC")
            tableMapping.ColumnMappings.Add("MAD", "MAD")
            tableMapping.ColumnMappings.Add("MHU", "MHU")
            tableMapping.ColumnMappings.Add("MPI", "MPI")
            tableMapping.ColumnMappings.Add("PA", "PA")
            tableMapping.ColumnMappings.Add("PAN", "PAN")
            tableMapping.ColumnMappings.Add("PDM", "PDM")
            tableMapping.ColumnMappings.Add("PG7", "PG7")
            tableMapping.ColumnMappings.Add("PH1", "PH1")
            tableMapping.ColumnMappings.Add("PH2", "PH2")
            tableMapping.ColumnMappings.Add("PH4", "PH4")
            tableMapping.ColumnMappings.Add("PH7", "PH7")
            tableMapping.ColumnMappings.Add("PHA", "PHA")
            tableMapping.ColumnMappings.Add("PHN", "PHN")
            tableMapping.ColumnMappings.Add("PII", "PII")
            tableMapping.ColumnMappings.Add("PM2", "PM2")
            tableMapping.ColumnMappings.Add("PM4", "PM4")
            tableMapping.ColumnMappings.Add("PMR", "PMR")
            tableMapping.ColumnMappings.Add("SNG", "SNG")
            tableMapping.ColumnMappings.Add("UPH", "UPH")
            tableMapping.ColumnMappings.Add("COR", "COR")
            tableMapping.ColumnMappings.Add("GLU", "GLU")
            tableMapping.ColumnMappings.Add("LEN", "LEN")
            tableMapping.ColumnMappings.Add("LUN", "LUN")
            tableMapping.ColumnMappings.Add("OPT", "OPT")
            tableMapping.ColumnMappings.Add("ORP", "ORP")
            tableMapping.ColumnMappings.Add("PAU", "PAU")
            tableMapping.ColumnMappings.Add("PEX", "PEX")
            tableMapping.ColumnMappings.Add("POC", "POC")
            tableMapping.ColumnMappings.Add("TNS", "TNS")
            tableMapping.ColumnMappings.Add("VEH", "VEH")
            tableMapping.ColumnMappings.Add("VER", "VER")
            tableMapping.ColumnMappings.Add("ATL", "ATL")
            tableMapping.ColumnMappings.Add("DPS", "DPS")
            tableMapping.ColumnMappings.Add("DVO", "DVO")
            tableMapping.ColumnMappings.Add("KGP", "KGP")
            tableMapping.ColumnMappings.Add("PMH", "PMH")
            tableMapping.ColumnMappings.Add("SGN", "SGN")
            tableMapping.ColumnMappings.Add("SGS", "SGS")
            tableMapping.ColumnMappings.Add("PPI", "PPI")
            tableMapping.ColumnMappings.Add("Top_CMU", "Top_CMU")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.DeleteCommand.Connection = Me.Connection
            Me._adapter.DeleteCommand.CommandText = "DELETE FROM [AMC_Contrat_Type] WHERE (([Id] = @Original_Id) AND ((@IsNull_AAD = 1"& _ 
                " AND [AAD] IS NULL) OR ([AAD] = @Original_AAD)) AND ((@IsNull_AAR = 1 AND [AAR] "& _ 
                "IS NULL) OR ([AAR] = @Original_AAR)) AND ((@IsNull_ARO = 1 AND [ARO] IS NULL) OR"& _ 
                " ([ARO] = @Original_ARO)) AND ((@IsNull_B = 1 AND [B] IS NULL) OR ([B] = @Origin"& _ 
                "al_B)) AND ((@IsNull_CPH = 1 AND [CPH] IS NULL) OR ([CPH] = @Original_CPH)) AND "& _ 
                "((@IsNull_MAC = 1 AND [MAC] IS NULL) OR ([MAC] = @Original_MAC)) AND ((@IsNull_M"& _ 
                "AD = 1 AND [MAD] IS NULL) OR ([MAD] = @Original_MAD)) AND ((@IsNull_MHU = 1 AND "& _ 
                "[MHU] IS NULL) OR ([MHU] = @Original_MHU)) AND ((@IsNull_MPI = 1 AND [MPI] IS NU"& _ 
                "LL) OR ([MPI] = @Original_MPI)) AND ((@IsNull_PA = 1 AND [PA] IS NULL) OR ([PA] "& _ 
                "= @Original_PA)) AND ((@IsNull_PAN = 1 AND [PAN] IS NULL) OR ([PAN] = @Original_"& _ 
                "PAN)) AND ((@IsNull_PDM = 1 AND [PDM] IS NULL) OR ([PDM] = @Original_PDM)) AND ("& _ 
                "(@IsNull_PG7 = 1 AND [PG7] IS NULL) OR ([PG7] = @Original_PG7)) AND ((@IsNull_PH"& _ 
                "1 = 1 AND [PH1] IS NULL) OR ([PH1] = @Original_PH1)) AND ((@IsNull_PH2 = 1 AND ["& _ 
                "PH2] IS NULL) OR ([PH2] = @Original_PH2)) AND ((@IsNull_PH4 = 1 AND [PH4] IS NUL"& _ 
                "L) OR ([PH4] = @Original_PH4)) AND ((@IsNull_PH7 = 1 AND [PH7] IS NULL) OR ([PH7"& _ 
                "] = @Original_PH7)) AND ((@IsNull_PHA = 1 AND [PHA] IS NULL) OR ([PHA] = @Origin"& _ 
                "al_PHA)) AND ((@IsNull_PHN = 1 AND [PHN] IS NULL) OR ([PHN] = @Original_PHN)) AN"& _ 
                "D ((@IsNull_PII = 1 AND [PII] IS NULL) OR ([PII] = @Original_PII)) AND ((@IsNull"& _ 
                "_PM2 = 1 AND [PM2] IS NULL) OR ([PM2] = @Original_PM2)) AND ((@IsNull_PM4 = 1 AN"& _ 
                "D [PM4] IS NULL) OR ([PM4] = @Original_PM4)) AND ((@IsNull_PMR = 1 AND [PMR] IS "& _ 
                "NULL) OR ([PMR] = @Original_PMR)) AND ((@IsNull_SNG = 1 AND [SNG] IS NULL) OR (["& _ 
                "SNG] = @Original_SNG)) AND ((@IsNull_UPH = 1 AND [UPH] IS NULL) OR ([UPH] = @Ori"& _ 
                "ginal_UPH)) AND ((@IsNull_COR = 1 AND [COR] IS NULL) OR ([COR] = @Original_COR))"& _ 
                " AND ((@IsNull_GLU = 1 AND [GLU] IS NULL) OR ([GLU] = @Original_GLU)) AND ((@IsN"& _ 
                "ull_LEN = 1 AND [LEN] IS NULL) OR ([LEN] = @Original_LEN)) AND ((@IsNull_LUN = 1"& _ 
                " AND [LUN] IS NULL) OR ([LUN] = @Original_LUN)) AND ((@IsNull_OPT = 1 AND [OPT] "& _ 
                "IS NULL) OR ([OPT] = @Original_OPT)) AND ((@IsNull_ORP = 1 AND [ORP] IS NULL) OR"& _ 
                " ([ORP] = @Original_ORP)) AND ((@IsNull_PAU = 1 AND [PAU] IS NULL) OR ([PAU] = @"& _ 
                "Original_PAU)) AND ((@IsNull_PEX = 1 AND [PEX] IS NULL) OR ([PEX] = @Original_PE"& _ 
                "X)) AND ((@IsNull_POC = 1 AND [POC] IS NULL) OR ([POC] = @Original_POC)) AND ((@"& _ 
                "IsNull_TNS = 1 AND [TNS] IS NULL) OR ([TNS] = @Original_TNS)) AND ((@IsNull_VEH "& _ 
                "= 1 AND [VEH] IS NULL) OR ([VEH] = @Original_VEH)) AND ((@IsNull_VER = 1 AND [VE"& _ 
                "R] IS NULL) OR ([VER] = @Original_VER)) AND ((@IsNull_ATL = 1 AND [ATL] IS NULL)"& _ 
                " OR ([ATL] = @Original_ATL)) AND ((@IsNull_DPS = 1 AND [DPS] IS NULL) OR ([DPS] "& _ 
                "= @Original_DPS)) AND ((@IsNull_DVO = 1 AND [DVO] IS NULL) OR ([DVO] = @Original"& _ 
                "_DVO)) AND ((@IsNull_KGP = 1 AND [KGP] IS NULL) OR ([KGP] = @Original_KGP)) AND "& _ 
                "((@IsNull_PMH = 1 AND [PMH] IS NULL) OR ([PMH] = @Original_PMH)) AND ((@IsNull_P"& _ 
                "PI = 1 AND [PPI] IS NULL) OR ([PPI] = @Original_PPI)) AND ((@IsNull_SGN = 1 AND "& _ 
                "[SGN] IS NULL) OR ([SGN] = @Original_SGN)) AND ((@IsNull_SGS = 1 AND [SGS] IS NU"& _ 
                "LL) OR ([SGS] = @Original_SGS)) AND ((@IsNull_Top_CMU = 1 AND [Top_CMU] IS NULL)"& _ 
                " OR ([Top_CMU] = @Original_Top_CMU)))"
            Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Id", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AAD", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AAD", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAD", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AAR", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AAR", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AAR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAR", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ARO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ARO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ARO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_B", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "B", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_B", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "B", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CPH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CPH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "CPH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MAC", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MAC", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MAC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAC", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MAD", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MAD", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAD", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MHU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MHU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MHU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MHU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MPI", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MPI", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MPI", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PA", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PA", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PA", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PAN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PAN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PAN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PDM", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PDM", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PDM", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PDM", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PG7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PG7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PG7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PG7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH1", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PHA", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PHA", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PHA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHA", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PHN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PHN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PHN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PII", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PII", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PII", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PII", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PM2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PM2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PM2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PM4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PM4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PM4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PMR", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PMR", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PMR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMR", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SNG", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SNG", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SNG", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SNG", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_UPH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "UPH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_UPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "UPH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_COR", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "COR", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_COR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "COR", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_GLU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GLU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GLU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "GLU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_LEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LEN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_LUN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LUN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LUN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LUN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_OPT", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "OPT", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_OPT", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "OPT", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ORP", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ORP", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ORP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ORP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PAU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PAU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PAU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PEX", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PEX", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PEX", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PEX", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_POC", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "POC", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_POC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "POC", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_TNS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TNS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TNS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "TNS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_VEH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VEH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VEH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VEH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_VER", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VER", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VER", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VER", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ATL", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ATL", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ATL", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ATL", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DPS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DPS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DPS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DPS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DVO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DVO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DVO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DVO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_KGP", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "KGP", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_KGP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "KGP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PMH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PMH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PMH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PPI", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PPI", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PPI", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SGN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SGN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SGN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SGS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SGS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SGS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Top_CMU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_CMU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Top_CMU", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_CMU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [AMC_Contrat_Type] ([Id], [Intitulé], [AAD], [AAR], [ARO], [B], [CPH]"& _ 
                ", [MAC], [MAD], [MHU], [MPI], [PA], [PAN], [PDM], [PG7], [PH1], [PH2], [PH4], [P"& _ 
                "H7], [PHA], [PHN], [PII], [PM2], [PM4], [PMR], [SNG], [UPH], [COR], [GLU], [LEN]"& _ 
                ", [LUN], [OPT], [ORP], [PAU], [PEX], [POC], [TNS], [VEH], [VER], [ATL], [DPS], ["& _ 
                "DVO], [KGP], [PMH], [PPI], [SGN], [SGS], [Top_CMU]) VALUES (@Id, @Intitulé, @AAD"& _ 
                ", @AAR, @ARO, @B, @CPH, @MAC, @MAD, @MHU, @MPI, @PA, @PAN, @PDM, @PG7, @PH1, @PH"& _ 
                "2, @PH4, @PH7, @PHA, @PHN, @PII, @PM2, @PM4, @PMR, @SNG, @UPH, @COR, @GLU, @LEN,"& _ 
                " @LUN, @OPT, @ORP, @PAU, @PEX, @POC, @TNS, @VEH, @VER, @ATL, @DPS, @DVO, @KGP, @"& _ 
                "PMH, @PPI, @SGN, @SGS, @Top_CMU);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT Id, Intitulé, AAD, AAR, ARO, B, CPH, M"& _ 
                "AC, MAD, MHU, MPI, PA, PAN, PDM, PG7, PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM"& _ 
                "4, PMR, SNG, UPH, COR, GLU, LEN, LUN, OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, AT"& _ 
                "L, DPS, DVO, KGP, PMH, PPI, SGN, SGS, Top_CMU FROM AMC_Contrat_Type WHERE (Id = "& _ 
                "@Id)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Intitulé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Intitulé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AAR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ARO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@B", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "B", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "CPH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MAC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MHU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MHU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MPI", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PA", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PAN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PDM", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PDM", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PG7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PG7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH1", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PHA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHA", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PHN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PII", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PII", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PM2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PM4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PMR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SNG", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SNG", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@UPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "UPH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "COR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GLU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "GLU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LEN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LUN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LUN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@OPT", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "OPT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ORP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ORP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PAU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PEX", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@POC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "POC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TNS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "TNS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VEH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VEH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VER", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ATL", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ATL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DPS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DVO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DVO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@KGP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "KGP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PMH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PPI", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SGN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SGS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Top_CMU", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_CMU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [AMC_Contrat_Type] SET [Id] = @Id, [Intitulé] = @Intitulé, [AAD] = @AAD, ["& _ 
                "AAR] = @AAR, [ARO] = @ARO, [B] = @B, [CPH] = @CPH, [MAC] = @MAC, [MAD] = @MAD, ["& _ 
                "MHU] = @MHU, [MPI] = @MPI, [PA] = @PA, [PAN] = @PAN, [PDM] = @PDM, [PG7] = @PG7,"& _ 
                " [PH1] = @PH1, [PH2] = @PH2, [PH4] = @PH4, [PH7] = @PH7, [PHA] = @PHA, [PHN] = @"& _ 
                "PHN, [PII] = @PII, [PM2] = @PM2, [PM4] = @PM4, [PMR] = @PMR, [SNG] = @SNG, [UPH]"& _ 
                " = @UPH, [COR] = @COR, [GLU] = @GLU, [LEN] = @LEN, [LUN] = @LUN, [OPT] = @OPT, ["& _ 
                "ORP] = @ORP, [PAU] = @PAU, [PEX] = @PEX, [POC] = @POC, [TNS] = @TNS, [VEH] = @VE"& _ 
                "H, [VER] = @VER, [ATL] = @ATL, [DPS] = @DPS, [DVO] = @DVO, [KGP] = @KGP, [PMH] ="& _ 
                " @PMH, [PPI] = @PPI, [SGN] = @SGN, [SGS] = @SGS, [Top_CMU] = @Top_CMU WHERE (([I"& _ 
                "d] = @Original_Id) AND ((@IsNull_AAD = 1 AND [AAD] IS NULL) OR ([AAD] = @Origina"& _ 
                "l_AAD)) AND ((@IsNull_AAR = 1 AND [AAR] IS NULL) OR ([AAR] = @Original_AAR)) AND"& _ 
                " ((@IsNull_ARO = 1 AND [ARO] IS NULL) OR ([ARO] = @Original_ARO)) AND ((@IsNull_"& _ 
                "B = 1 AND [B] IS NULL) OR ([B] = @Original_B)) AND ((@IsNull_CPH = 1 AND [CPH] I"& _ 
                "S NULL) OR ([CPH] = @Original_CPH)) AND ((@IsNull_MAC = 1 AND [MAC] IS NULL) OR "& _ 
                "([MAC] = @Original_MAC)) AND ((@IsNull_MAD = 1 AND [MAD] IS NULL) OR ([MAD] = @O"& _ 
                "riginal_MAD)) AND ((@IsNull_MHU = 1 AND [MHU] IS NULL) OR ([MHU] = @Original_MHU"& _ 
                ")) AND ((@IsNull_MPI = 1 AND [MPI] IS NULL) OR ([MPI] = @Original_MPI)) AND ((@I"& _ 
                "sNull_PA = 1 AND [PA] IS NULL) OR ([PA] = @Original_PA)) AND ((@IsNull_PAN = 1 A"& _ 
                "ND [PAN] IS NULL) OR ([PAN] = @Original_PAN)) AND ((@IsNull_PDM = 1 AND [PDM] IS"& _ 
                " NULL) OR ([PDM] = @Original_PDM)) AND ((@IsNull_PG7 = 1 AND [PG7] IS NULL) OR ("& _ 
                "[PG7] = @Original_PG7)) AND ((@IsNull_PH1 = 1 AND [PH1] IS NULL) OR ([PH1] = @Or"& _ 
                "iginal_PH1)) AND ((@IsNull_PH2 = 1 AND [PH2] IS NULL) OR ([PH2] = @Original_PH2)"& _ 
                ") AND ((@IsNull_PH4 = 1 AND [PH4] IS NULL) OR ([PH4] = @Original_PH4)) AND ((@Is"& _ 
                "Null_PH7 = 1 AND [PH7] IS NULL) OR ([PH7] = @Original_PH7)) AND ((@IsNull_PHA = "& _ 
                "1 AND [PHA] IS NULL) OR ([PHA] = @Original_PHA)) AND ((@IsNull_PHN = 1 AND [PHN]"& _ 
                " IS NULL) OR ([PHN] = @Original_PHN)) AND ((@IsNull_PII = 1 AND [PII] IS NULL) O"& _ 
                "R ([PII] = @Original_PII)) AND ((@IsNull_PM2 = 1 AND [PM2] IS NULL) OR ([PM2] = "& _ 
                "@Original_PM2)) AND ((@IsNull_PM4 = 1 AND [PM4] IS NULL) OR ([PM4] = @Original_P"& _ 
                "M4)) AND ((@IsNull_PMR = 1 AND [PMR] IS NULL) OR ([PMR] = @Original_PMR)) AND (("& _ 
                "@IsNull_SNG = 1 AND [SNG] IS NULL) OR ([SNG] = @Original_SNG)) AND ((@IsNull_UPH"& _ 
                " = 1 AND [UPH] IS NULL) OR ([UPH] = @Original_UPH)) AND ((@IsNull_COR = 1 AND [C"& _ 
                "OR] IS NULL) OR ([COR] = @Original_COR)) AND ((@IsNull_GLU = 1 AND [GLU] IS NULL"& _ 
                ") OR ([GLU] = @Original_GLU)) AND ((@IsNull_LEN = 1 AND [LEN] IS NULL) OR ([LEN]"& _ 
                " = @Original_LEN)) AND ((@IsNull_LUN = 1 AND [LUN] IS NULL) OR ([LUN] = @Origina"& _ 
                "l_LUN)) AND ((@IsNull_OPT = 1 AND [OPT] IS NULL) OR ([OPT] = @Original_OPT)) AND"& _ 
                " ((@IsNull_ORP = 1 AND [ORP] IS NULL) OR ([ORP] = @Original_ORP)) AND ((@IsNull_"& _ 
                "PAU = 1 AND [PAU] IS NULL) OR ([PAU] = @Original_PAU)) AND ((@IsNull_PEX = 1 AND"& _ 
                " [PEX] IS NULL) OR ([PEX] = @Original_PEX)) AND ((@IsNull_POC = 1 AND [POC] IS N"& _ 
                "ULL) OR ([POC] = @Original_POC)) AND ((@IsNull_TNS = 1 AND [TNS] IS NULL) OR ([T"& _ 
                "NS] = @Original_TNS)) AND ((@IsNull_VEH = 1 AND [VEH] IS NULL) OR ([VEH] = @Orig"& _ 
                "inal_VEH)) AND ((@IsNull_VER = 1 AND [VER] IS NULL) OR ([VER] = @Original_VER)) "& _ 
                "AND ((@IsNull_ATL = 1 AND [ATL] IS NULL) OR ([ATL] = @Original_ATL)) AND ((@IsNu"& _ 
                "ll_DPS = 1 AND [DPS] IS NULL) OR ([DPS] = @Original_DPS)) AND ((@IsNull_DVO = 1 "& _ 
                "AND [DVO] IS NULL) OR ([DVO] = @Original_DVO)) AND ((@IsNull_KGP = 1 AND [KGP] I"& _ 
                "S NULL) OR ([KGP] = @Original_KGP)) AND ((@IsNull_PMH = 1 AND [PMH] IS NULL) OR "& _ 
                "([PMH] = @Original_PMH)) AND ((@IsNull_PPI = 1 AND [PPI] IS NULL) OR ([PPI] = @O"& _ 
                "riginal_PPI)) AND ((@IsNull_SGN = 1 AND [SGN] IS NULL) OR ([SGN] = @Original_SGN"& _ 
                ")) AND ((@IsNull_SGS = 1 AND [SGS] IS NULL) OR ([SGS] = @Original_SGS)) AND ((@I"& _ 
                "sNull_Top_CMU = 1 AND [Top_CMU] IS NULL) OR ([Top_CMU] = @Original_Top_CMU)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                "SELECT Id, Intitulé, AAD, AAR, ARO, B, CPH, MAC, MAD, MHU, MPI, PA, PAN, PDM, PG"& _ 
                "7, PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM4, PMR, SNG, UPH, COR, GLU, LEN, LU"& _ 
                "N, OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, ATL, DPS, DVO, KGP, PMH, PPI, SGN, SG"& _ 
                "S, Top_CMU FROM AMC_Contrat_Type WHERE (Id = @Id)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Intitulé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Intitulé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AAR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ARO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ARO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@B", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "B", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "CPH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MAC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAD", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MHU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MHU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MPI", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PA", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PAN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PDM", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PDM", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PG7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PG7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH1", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PH7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PHA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHA", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PHN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PII", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PII", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PM2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PM4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM4", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PMR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SNG", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SNG", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@UPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "UPH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@COR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "COR", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@GLU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "GLU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LEN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LEN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LUN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LUN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@OPT", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "OPT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ORP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ORP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PAU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PEX", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PEX", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@POC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "POC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TNS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "TNS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VEH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VEH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@VER", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VER", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ATL", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ATL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DPS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DPS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DVO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DVO", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@KGP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "KGP", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PMH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMH", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PPI", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SGN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGN", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SGS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Top_CMU", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_CMU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Id", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AAD", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AAD", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAD", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_AAR", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "AAR", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_AAR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AAR", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ARO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ARO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ARO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ARO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_B", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "B", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_B", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "B", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_CPH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CPH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "CPH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MAC", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MAC", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MAC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAC", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MAD", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MAD", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MAD", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MAD", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MHU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MHU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MHU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MHU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_MPI", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MPI", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_MPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "MPI", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PA", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PA", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PA", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PAN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PAN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PAN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PDM", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PDM", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PDM", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PDM", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PG7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PG7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PG7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PG7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH1", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH1", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH1", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PH7", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PH7", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PH7", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PH7", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PHA", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PHA", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PHA", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHA", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PHN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PHN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PHN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PHN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PII", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PII", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PII", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PII", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PM2", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PM2", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PM2", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM2", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PM4", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PM4", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PM4", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PM4", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PMR", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PMR", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PMR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMR", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SNG", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SNG", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SNG", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SNG", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_UPH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "UPH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_UPH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "UPH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_COR", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "COR", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_COR", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "COR", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_GLU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "GLU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_GLU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "GLU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_LEN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LEN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LEN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LEN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_LUN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LUN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_LUN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "LUN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_OPT", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "OPT", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_OPT", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "OPT", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ORP", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ORP", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ORP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ORP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PAU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PAU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PAU", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PAU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PEX", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PEX", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PEX", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PEX", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_POC", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "POC", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_POC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "POC", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_TNS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TNS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TNS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "TNS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_VEH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VEH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VEH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VEH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_VER", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "VER", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_VER", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "VER", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_ATL", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ATL", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_ATL", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "ATL", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DPS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DPS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DPS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DPS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_DVO", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DVO", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_DVO", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "DVO", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_KGP", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "KGP", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_KGP", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "KGP", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PMH", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PMH", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PMH", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PMH", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_PPI", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PPI", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_PPI", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "PPI", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SGN", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SGN", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SGN", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGN", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_SGS", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SGS", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_SGS", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "SGS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Top_CMU", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_CMU", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Top_CMU", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_CMU", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Id, Intitulé, AAD, AAR, ARO, B, CPH, MAC, MAD, MHU, MPI, PA, PAN, PDM, PG7"& _ 
                ", PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM4, PMR, SNG, UPH, COR, GLU, LEN, LUN"& _ 
                ", OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, ATL, DPS, DVO, KGP, PMH, PPI, SGN, SGS"& _ 
                ", Top_CMU FROM AMC_Contrat_Type"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Id, Intitulé, AAD, AAR, ARO, B, CPH, MAC, MAD, MHU, MPI, PA, PAN, PDM, PG7"& _ 
                ", PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM4, PMR, SNG, UPH, COR, GLU, LEN, LUN"& _ 
                ", OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, ATL, DPS, DVO, KGP, PMH, PPI, SGN, SGS"& _ 
                ", Top_CMU FROM AMC_Contrat_Type"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where Id=@Id"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Id, Intitulé, AAD, AAR, ARO, B, CPH, MAC, MAD, MHU, MPI, PA, PAN, PDM, PG7"& _ 
                ", PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM4, PMR, SNG, UPH, COR, GLU, LEN, LUN"& _ 
                ", OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, ATL, DPS, DVO, KGP, PMH, PPI, SGN, SGS"& _ 
                ", Top_CMU FROM AMC_Contrat_Type WHERE (Id = @Id)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT Id+ Intitulé+'AAD'+ CONVERT(nvarchar(3),AAD)+'AAR'+ CONVERT(nvarchar(3), A"& _ 
                "AR) FROM AMC_Contrat_Type where id ='1'"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.AMC_Contrat_TypeDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.AMC_Contrat_TypeDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.AMC_Contrat_TypeDataTable = New PharmaDataSet.AMC_Contrat_TypeDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Id2(ByVal Id As String) As PharmaDataSet.AMC_Contrat_TypeDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (Id Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Id")
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Id,String)
            End If
            Dim dataTable As PharmaDataSet.AMC_Contrat_TypeDataTable = New PharmaDataSet.AMC_Contrat_TypeDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataById(ByVal Id As String) As PharmaDataSet.AMC_Contrat_TypeDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (Id Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Id")
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Id,String)
            End If
            Dim dataTable As PharmaDataSet.AMC_Contrat_TypeDataTable = New PharmaDataSet.AMC_Contrat_TypeDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.AMC_Contrat_TypeDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "AMC_Contrat_Type")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)>  _
        Public Overloads Overridable Function Delete( _
                    ByVal Original_Id As String,  _
                    ByVal Original_AAD As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_AAR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ARO As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_B As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_CPH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MAC As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MAD As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MHU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MPI As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PA As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PAN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PDM As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PG7 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH1 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH2 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH4 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH7 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PHA As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PHN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PII As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PM2 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PM4 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PMR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SNG As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_UPH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_COR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_GLU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_LEN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_LUN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_OPT As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ORP As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PAU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PEX As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_POC As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_TNS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_VEH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_VER As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ATL As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_DPS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_DVO As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_KGP As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PMH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PPI As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SGN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SGS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_Top_CMU As String) As Integer
            If (Original_Id Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_Id")
            Else
                Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Id,String)
            End If
            If (Original_AAD.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_AAD.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (Original_AAR.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_AAR.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Original_ARO.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_ARO.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (Original_B.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_B.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
            End If
            If (Original_CPH.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_CPH.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
            End If
            If (Original_MAC.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(11).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(12).Value = CType(Original_MAC.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(11).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (Original_MAD.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(13).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(14).Value = CType(Original_MAD.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(13).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (Original_MHU.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(15).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(16).Value = CType(Original_MHU.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(15).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (Original_MPI.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(17).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(18).Value = CType(Original_MPI.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(17).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(18).Value = Global.System.DBNull.Value
            End If
            If (Original_PA.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(19).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(20).Value = CType(Original_PA.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(19).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(20).Value = Global.System.DBNull.Value
            End If
            If (Original_PAN.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(21).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(22).Value = CType(Original_PAN.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(21).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(22).Value = Global.System.DBNull.Value
            End If
            If (Original_PDM.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(23).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(24).Value = CType(Original_PDM.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(23).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(24).Value = Global.System.DBNull.Value
            End If
            If (Original_PG7.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(25).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(26).Value = CType(Original_PG7.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(25).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(26).Value = Global.System.DBNull.Value
            End If
            If (Original_PH1.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(27).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(28).Value = CType(Original_PH1.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(27).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(28).Value = Global.System.DBNull.Value
            End If
            If (Original_PH2.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(29).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(30).Value = CType(Original_PH2.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(29).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(30).Value = Global.System.DBNull.Value
            End If
            If (Original_PH4.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(31).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(32).Value = CType(Original_PH4.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(31).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(32).Value = Global.System.DBNull.Value
            End If
            If (Original_PH7.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(33).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(34).Value = CType(Original_PH7.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(33).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(34).Value = Global.System.DBNull.Value
            End If
            If (Original_PHA.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(35).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(36).Value = CType(Original_PHA.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(35).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(36).Value = Global.System.DBNull.Value
            End If
            If (Original_PHN.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(37).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(38).Value = CType(Original_PHN.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(37).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(38).Value = Global.System.DBNull.Value
            End If
            If (Original_PII.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(39).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(40).Value = CType(Original_PII.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(39).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(40).Value = Global.System.DBNull.Value
            End If
            If (Original_PM2.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(41).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(42).Value = CType(Original_PM2.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(41).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(42).Value = Global.System.DBNull.Value
            End If
            If (Original_PM4.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(43).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(44).Value = CType(Original_PM4.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(43).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(44).Value = Global.System.DBNull.Value
            End If
            If (Original_PMR.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(45).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(46).Value = CType(Original_PMR.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(45).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(46).Value = Global.System.DBNull.Value
            End If
            If (Original_SNG.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(47).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(48).Value = CType(Original_SNG.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(47).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(48).Value = Global.System.DBNull.Value
            End If
            If (Original_UPH.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(49).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(50).Value = CType(Original_UPH.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(49).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(50).Value = Global.System.DBNull.Value
            End If
            If (Original_COR.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(51).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(52).Value = CType(Original_COR.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(51).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(52).Value = Global.System.DBNull.Value
            End If
            If (Original_GLU.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(53).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(54).Value = CType(Original_GLU.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(53).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(54).Value = Global.System.DBNull.Value
            End If
            If (Original_LEN.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(55).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(56).Value = CType(Original_LEN.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(55).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(56).Value = Global.System.DBNull.Value
            End If
            If (Original_LUN.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(57).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(58).Value = CType(Original_LUN.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(57).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(58).Value = Global.System.DBNull.Value
            End If
            If (Original_OPT.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(59).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(60).Value = CType(Original_OPT.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(59).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(60).Value = Global.System.DBNull.Value
            End If
            If (Original_ORP.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(61).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(62).Value = CType(Original_ORP.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(61).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(62).Value = Global.System.DBNull.Value
            End If
            If (Original_PAU.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(63).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(64).Value = CType(Original_PAU.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(63).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(64).Value = Global.System.DBNull.Value
            End If
            If (Original_PEX.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(65).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(66).Value = CType(Original_PEX.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(65).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(66).Value = Global.System.DBNull.Value
            End If
            If (Original_POC.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(67).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(68).Value = CType(Original_POC.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(67).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(68).Value = Global.System.DBNull.Value
            End If
            If (Original_TNS.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(69).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(70).Value = CType(Original_TNS.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(69).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(70).Value = Global.System.DBNull.Value
            End If
            If (Original_VEH.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(71).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(72).Value = CType(Original_VEH.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(71).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(72).Value = Global.System.DBNull.Value
            End If
            If (Original_VER.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(73).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(74).Value = CType(Original_VER.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(73).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(74).Value = Global.System.DBNull.Value
            End If
            If (Original_ATL.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(75).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(76).Value = CType(Original_ATL.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(75).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(76).Value = Global.System.DBNull.Value
            End If
            If (Original_DPS.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(77).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(78).Value = CType(Original_DPS.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(77).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(78).Value = Global.System.DBNull.Value
            End If
            If (Original_DVO.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(79).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(80).Value = CType(Original_DVO.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(79).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(80).Value = Global.System.DBNull.Value
            End If
            If (Original_KGP.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(81).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(82).Value = CType(Original_KGP.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(81).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(82).Value = Global.System.DBNull.Value
            End If
            If (Original_PMH.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(83).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(84).Value = CType(Original_PMH.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(83).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(84).Value = Global.System.DBNull.Value
            End If
            If (Original_PPI.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(85).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(86).Value = CType(Original_PPI.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(85).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(86).Value = Global.System.DBNull.Value
            End If
            If (Original_SGN.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(87).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(88).Value = CType(Original_SGN.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(87).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(88).Value = Global.System.DBNull.Value
            End If
            If (Original_SGS.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(89).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(90).Value = CType(Original_SGS.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(89).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(90).Value = Global.System.DBNull.Value
            End If
            If (Original_Top_CMU Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(91).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(92).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(91).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(92).Value = CType(Original_Top_CMU,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
            If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.DeleteCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.DeleteCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal Id As String,  _
                    ByVal Intitulé As String,  _
                    ByVal AAD As Global.System.Nullable(Of Decimal),  _
                    ByVal AAR As Global.System.Nullable(Of Decimal),  _
                    ByVal ARO As Global.System.Nullable(Of Decimal),  _
                    ByVal B As Global.System.Nullable(Of Decimal),  _
                    ByVal CPH As Global.System.Nullable(Of Decimal),  _
                    ByVal MAC As Global.System.Nullable(Of Decimal),  _
                    ByVal MAD As Global.System.Nullable(Of Decimal),  _
                    ByVal MHU As Global.System.Nullable(Of Decimal),  _
                    ByVal MPI As Global.System.Nullable(Of Decimal),  _
                    ByVal PA As Global.System.Nullable(Of Decimal),  _
                    ByVal PAN As Global.System.Nullable(Of Decimal),  _
                    ByVal PDM As Global.System.Nullable(Of Decimal),  _
                    ByVal PG7 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH1 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH2 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH4 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH7 As Global.System.Nullable(Of Decimal),  _
                    ByVal PHA As Global.System.Nullable(Of Decimal),  _
                    ByVal PHN As Global.System.Nullable(Of Decimal),  _
                    ByVal PII As Global.System.Nullable(Of Decimal),  _
                    ByVal PM2 As Global.System.Nullable(Of Decimal),  _
                    ByVal PM4 As Global.System.Nullable(Of Decimal),  _
                    ByVal PMR As Global.System.Nullable(Of Decimal),  _
                    ByVal SNG As Global.System.Nullable(Of Decimal),  _
                    ByVal UPH As Global.System.Nullable(Of Decimal),  _
                    ByVal COR As Global.System.Nullable(Of Decimal),  _
                    ByVal GLU As Global.System.Nullable(Of Decimal),  _
                    ByVal LEN As Global.System.Nullable(Of Decimal),  _
                    ByVal LUN As Global.System.Nullable(Of Decimal),  _
                    ByVal OPT As Global.System.Nullable(Of Decimal),  _
                    ByVal ORP As Global.System.Nullable(Of Decimal),  _
                    ByVal PAU As Global.System.Nullable(Of Decimal),  _
                    ByVal PEX As Global.System.Nullable(Of Decimal),  _
                    ByVal POC As Global.System.Nullable(Of Decimal),  _
                    ByVal TNS As Global.System.Nullable(Of Decimal),  _
                    ByVal VEH As Global.System.Nullable(Of Decimal),  _
                    ByVal VER As Global.System.Nullable(Of Decimal),  _
                    ByVal ATL As Global.System.Nullable(Of Decimal),  _
                    ByVal DPS As Global.System.Nullable(Of Decimal),  _
                    ByVal DVO As Global.System.Nullable(Of Decimal),  _
                    ByVal KGP As Global.System.Nullable(Of Decimal),  _
                    ByVal PMH As Global.System.Nullable(Of Decimal),  _
                    ByVal PPI As Global.System.Nullable(Of Decimal),  _
                    ByVal SGN As Global.System.Nullable(Of Decimal),  _
                    ByVal SGS As Global.System.Nullable(Of Decimal),  _
                    ByVal Top_CMU As String) As Integer
            If (Id Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Id")
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Id,String)
            End If
            If (Intitulé Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Intitulé,String)
            End If
            If (AAD.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(AAD.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (AAR.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(AAR.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (ARO.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(ARO.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (B.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(B.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (CPH.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(CPH.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (MAC.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(MAC.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            End If
            If (MAD.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(MAD.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            End If
            If (MHU.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(MHU.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            End If
            If (MPI.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(MPI.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            End If
            If (PA.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(PA.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (PAN.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(PAN.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (PDM.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(PDM.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            End If
            If (PG7.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(PG7.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (PH1.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(PH1.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            End If
            If (PH2.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(PH2.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (PH4.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(PH4.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            End If
            If (PH7.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(PH7.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            End If
            If (PHA.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(PHA.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            End If
            If (PHN.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(PHN.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            End If
            If (PII.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(PII.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            End If
            If (PM2.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(22).Value = CType(PM2.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(22).Value = Global.System.DBNull.Value
            End If
            If (PM4.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(23).Value = CType(PM4.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(23).Value = Global.System.DBNull.Value
            End If
            If (PMR.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(24).Value = CType(PMR.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(24).Value = Global.System.DBNull.Value
            End If
            If (SNG.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(25).Value = CType(SNG.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(25).Value = Global.System.DBNull.Value
            End If
            If (UPH.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(26).Value = CType(UPH.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(26).Value = Global.System.DBNull.Value
            End If
            If (COR.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(27).Value = CType(COR.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(27).Value = Global.System.DBNull.Value
            End If
            If (GLU.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(28).Value = CType(GLU.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(28).Value = Global.System.DBNull.Value
            End If
            If (LEN.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(29).Value = CType(LEN.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(29).Value = Global.System.DBNull.Value
            End If
            If (LUN.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(30).Value = CType(LUN.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(30).Value = Global.System.DBNull.Value
            End If
            If (OPT.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(31).Value = CType(OPT.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(31).Value = Global.System.DBNull.Value
            End If
            If (ORP.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(32).Value = CType(ORP.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(32).Value = Global.System.DBNull.Value
            End If
            If (PAU.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(33).Value = CType(PAU.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(33).Value = Global.System.DBNull.Value
            End If
            If (PEX.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(34).Value = CType(PEX.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(34).Value = Global.System.DBNull.Value
            End If
            If (POC.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(35).Value = CType(POC.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(35).Value = Global.System.DBNull.Value
            End If
            If (TNS.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(36).Value = CType(TNS.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(36).Value = Global.System.DBNull.Value
            End If
            If (VEH.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(37).Value = CType(VEH.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(37).Value = Global.System.DBNull.Value
            End If
            If (VER.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(38).Value = CType(VER.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(38).Value = Global.System.DBNull.Value
            End If
            If (ATL.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(39).Value = CType(ATL.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(39).Value = Global.System.DBNull.Value
            End If
            If (DPS.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(40).Value = CType(DPS.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(40).Value = Global.System.DBNull.Value
            End If
            If (DVO.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(41).Value = CType(DVO.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(41).Value = Global.System.DBNull.Value
            End If
            If (KGP.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(42).Value = CType(KGP.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(42).Value = Global.System.DBNull.Value
            End If
            If (PMH.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(43).Value = CType(PMH.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(43).Value = Global.System.DBNull.Value
            End If
            If (PPI.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(44).Value = CType(PPI.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(44).Value = Global.System.DBNull.Value
            End If
            If (SGN.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(45).Value = CType(SGN.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(45).Value = Global.System.DBNull.Value
            End If
            If (SGS.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(46).Value = CType(SGS.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(46).Value = Global.System.DBNull.Value
            End If
            If (Top_CMU Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(47).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(47).Value = CType(Top_CMU,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update( _
                    ByVal Id As String,  _
                    ByVal Intitulé As String,  _
                    ByVal AAD As Global.System.Nullable(Of Decimal),  _
                    ByVal AAR As Global.System.Nullable(Of Decimal),  _
                    ByVal ARO As Global.System.Nullable(Of Decimal),  _
                    ByVal B As Global.System.Nullable(Of Decimal),  _
                    ByVal CPH As Global.System.Nullable(Of Decimal),  _
                    ByVal MAC As Global.System.Nullable(Of Decimal),  _
                    ByVal MAD As Global.System.Nullable(Of Decimal),  _
                    ByVal MHU As Global.System.Nullable(Of Decimal),  _
                    ByVal MPI As Global.System.Nullable(Of Decimal),  _
                    ByVal PA As Global.System.Nullable(Of Decimal),  _
                    ByVal PAN As Global.System.Nullable(Of Decimal),  _
                    ByVal PDM As Global.System.Nullable(Of Decimal),  _
                    ByVal PG7 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH1 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH2 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH4 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH7 As Global.System.Nullable(Of Decimal),  _
                    ByVal PHA As Global.System.Nullable(Of Decimal),  _
                    ByVal PHN As Global.System.Nullable(Of Decimal),  _
                    ByVal PII As Global.System.Nullable(Of Decimal),  _
                    ByVal PM2 As Global.System.Nullable(Of Decimal),  _
                    ByVal PM4 As Global.System.Nullable(Of Decimal),  _
                    ByVal PMR As Global.System.Nullable(Of Decimal),  _
                    ByVal SNG As Global.System.Nullable(Of Decimal),  _
                    ByVal UPH As Global.System.Nullable(Of Decimal),  _
                    ByVal COR As Global.System.Nullable(Of Decimal),  _
                    ByVal GLU As Global.System.Nullable(Of Decimal),  _
                    ByVal LEN As Global.System.Nullable(Of Decimal),  _
                    ByVal LUN As Global.System.Nullable(Of Decimal),  _
                    ByVal OPT As Global.System.Nullable(Of Decimal),  _
                    ByVal ORP As Global.System.Nullable(Of Decimal),  _
                    ByVal PAU As Global.System.Nullable(Of Decimal),  _
                    ByVal PEX As Global.System.Nullable(Of Decimal),  _
                    ByVal POC As Global.System.Nullable(Of Decimal),  _
                    ByVal TNS As Global.System.Nullable(Of Decimal),  _
                    ByVal VEH As Global.System.Nullable(Of Decimal),  _
                    ByVal VER As Global.System.Nullable(Of Decimal),  _
                    ByVal ATL As Global.System.Nullable(Of Decimal),  _
                    ByVal DPS As Global.System.Nullable(Of Decimal),  _
                    ByVal DVO As Global.System.Nullable(Of Decimal),  _
                    ByVal KGP As Global.System.Nullable(Of Decimal),  _
                    ByVal PMH As Global.System.Nullable(Of Decimal),  _
                    ByVal PPI As Global.System.Nullable(Of Decimal),  _
                    ByVal SGN As Global.System.Nullable(Of Decimal),  _
                    ByVal SGS As Global.System.Nullable(Of Decimal),  _
                    ByVal Top_CMU As String,  _
                    ByVal Original_Id As String,  _
                    ByVal Original_AAD As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_AAR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ARO As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_B As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_CPH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MAC As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MAD As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MHU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MPI As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PA As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PAN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PDM As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PG7 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH1 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH2 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH4 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH7 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PHA As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PHN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PII As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PM2 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PM4 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PMR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SNG As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_UPH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_COR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_GLU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_LEN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_LUN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_OPT As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ORP As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PAU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PEX As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_POC As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_TNS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_VEH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_VER As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ATL As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_DPS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_DVO As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_KGP As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PMH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PPI As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SGN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SGS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_Top_CMU As String) As Integer
            If (Id Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Id")
            Else
                Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Id,String)
            End If
            If (Intitulé Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Intitulé,String)
            End If
            If (AAD.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(2).Value = CType(AAD.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (AAR.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(3).Value = CType(AAR.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (ARO.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(4).Value = CType(ARO.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (B.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(5).Value = CType(B.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (CPH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(6).Value = CType(CPH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (MAC.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(MAC.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(7).Value = Global.System.DBNull.Value
            End If
            If (MAD.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(8).Value = CType(MAD.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
            End If
            If (MHU.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(9).Value = CType(MHU.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(9).Value = Global.System.DBNull.Value
            End If
            If (MPI.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(10).Value = CType(MPI.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
            End If
            If (PA.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(11).Value = CType(PA.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (PAN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(12).Value = CType(PAN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (PDM.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(13).Value = CType(PDM.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(13).Value = Global.System.DBNull.Value
            End If
            If (PG7.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(14).Value = CType(PG7.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
            End If
            If (PH1.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(15).Value = CType(PH1.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(15).Value = Global.System.DBNull.Value
            End If
            If (PH2.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(16).Value = CType(PH2.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
            End If
            If (PH4.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(17).Value = CType(PH4.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(17).Value = Global.System.DBNull.Value
            End If
            If (PH7.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(18).Value = CType(PH7.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(18).Value = Global.System.DBNull.Value
            End If
            If (PHA.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(19).Value = CType(PHA.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(19).Value = Global.System.DBNull.Value
            End If
            If (PHN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(20).Value = CType(PHN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(20).Value = Global.System.DBNull.Value
            End If
            If (PII.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(21).Value = CType(PII.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(21).Value = Global.System.DBNull.Value
            End If
            If (PM2.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(22).Value = CType(PM2.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(22).Value = Global.System.DBNull.Value
            End If
            If (PM4.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(23).Value = CType(PM4.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(23).Value = Global.System.DBNull.Value
            End If
            If (PMR.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(24).Value = CType(PMR.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(24).Value = Global.System.DBNull.Value
            End If
            If (SNG.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(25).Value = CType(SNG.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(25).Value = Global.System.DBNull.Value
            End If
            If (UPH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(26).Value = CType(UPH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(26).Value = Global.System.DBNull.Value
            End If
            If (COR.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(27).Value = CType(COR.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(27).Value = Global.System.DBNull.Value
            End If
            If (GLU.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(28).Value = CType(GLU.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(28).Value = Global.System.DBNull.Value
            End If
            If (LEN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(29).Value = CType(LEN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(29).Value = Global.System.DBNull.Value
            End If
            If (LUN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(30).Value = CType(LUN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(30).Value = Global.System.DBNull.Value
            End If
            If (OPT.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(31).Value = CType(OPT.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(31).Value = Global.System.DBNull.Value
            End If
            If (ORP.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(32).Value = CType(ORP.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(32).Value = Global.System.DBNull.Value
            End If
            If (PAU.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(33).Value = CType(PAU.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(33).Value = Global.System.DBNull.Value
            End If
            If (PEX.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(34).Value = CType(PEX.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(34).Value = Global.System.DBNull.Value
            End If
            If (POC.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(35).Value = CType(POC.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(35).Value = Global.System.DBNull.Value
            End If
            If (TNS.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(36).Value = CType(TNS.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(36).Value = Global.System.DBNull.Value
            End If
            If (VEH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(37).Value = CType(VEH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(37).Value = Global.System.DBNull.Value
            End If
            If (VER.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(38).Value = CType(VER.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(38).Value = Global.System.DBNull.Value
            End If
            If (ATL.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(39).Value = CType(ATL.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(39).Value = Global.System.DBNull.Value
            End If
            If (DPS.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(40).Value = CType(DPS.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(40).Value = Global.System.DBNull.Value
            End If
            If (DVO.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(41).Value = CType(DVO.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(41).Value = Global.System.DBNull.Value
            End If
            If (KGP.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(42).Value = CType(KGP.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(42).Value = Global.System.DBNull.Value
            End If
            If (PMH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(43).Value = CType(PMH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(43).Value = Global.System.DBNull.Value
            End If
            If (PPI.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(44).Value = CType(PPI.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(44).Value = Global.System.DBNull.Value
            End If
            If (SGN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(45).Value = CType(SGN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(45).Value = Global.System.DBNull.Value
            End If
            If (SGS.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(46).Value = CType(SGS.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(46).Value = Global.System.DBNull.Value
            End If
            If (Top_CMU Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(47).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(47).Value = CType(Top_CMU,String)
            End If
            If (Original_Id Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_Id")
            Else
                Me.Adapter.UpdateCommand.Parameters(48).Value = CType(Original_Id,String)
            End If
            If (Original_AAD.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(49).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(50).Value = CType(Original_AAD.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(49).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(50).Value = Global.System.DBNull.Value
            End If
            If (Original_AAR.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(51).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(52).Value = CType(Original_AAR.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(51).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(52).Value = Global.System.DBNull.Value
            End If
            If (Original_ARO.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(53).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(54).Value = CType(Original_ARO.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(53).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(54).Value = Global.System.DBNull.Value
            End If
            If (Original_B.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(55).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(56).Value = CType(Original_B.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(55).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(56).Value = Global.System.DBNull.Value
            End If
            If (Original_CPH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(57).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(58).Value = CType(Original_CPH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(57).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(58).Value = Global.System.DBNull.Value
            End If
            If (Original_MAC.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(59).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(60).Value = CType(Original_MAC.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(59).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(60).Value = Global.System.DBNull.Value
            End If
            If (Original_MAD.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(61).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(62).Value = CType(Original_MAD.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(61).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(62).Value = Global.System.DBNull.Value
            End If
            If (Original_MHU.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(63).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(64).Value = CType(Original_MHU.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(63).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(64).Value = Global.System.DBNull.Value
            End If
            If (Original_MPI.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(65).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(66).Value = CType(Original_MPI.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(65).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(66).Value = Global.System.DBNull.Value
            End If
            If (Original_PA.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(67).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(68).Value = CType(Original_PA.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(67).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(68).Value = Global.System.DBNull.Value
            End If
            If (Original_PAN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(69).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(70).Value = CType(Original_PAN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(69).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(70).Value = Global.System.DBNull.Value
            End If
            If (Original_PDM.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(71).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(72).Value = CType(Original_PDM.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(71).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(72).Value = Global.System.DBNull.Value
            End If
            If (Original_PG7.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(73).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(74).Value = CType(Original_PG7.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(73).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(74).Value = Global.System.DBNull.Value
            End If
            If (Original_PH1.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(75).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(76).Value = CType(Original_PH1.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(75).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(76).Value = Global.System.DBNull.Value
            End If
            If (Original_PH2.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(77).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(78).Value = CType(Original_PH2.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(77).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(78).Value = Global.System.DBNull.Value
            End If
            If (Original_PH4.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(79).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(80).Value = CType(Original_PH4.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(79).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(80).Value = Global.System.DBNull.Value
            End If
            If (Original_PH7.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(81).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(82).Value = CType(Original_PH7.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(81).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(82).Value = Global.System.DBNull.Value
            End If
            If (Original_PHA.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(83).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(84).Value = CType(Original_PHA.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(83).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(84).Value = Global.System.DBNull.Value
            End If
            If (Original_PHN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(85).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(86).Value = CType(Original_PHN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(85).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(86).Value = Global.System.DBNull.Value
            End If
            If (Original_PII.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(87).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(88).Value = CType(Original_PII.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(87).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(88).Value = Global.System.DBNull.Value
            End If
            If (Original_PM2.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(89).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(90).Value = CType(Original_PM2.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(89).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(90).Value = Global.System.DBNull.Value
            End If
            If (Original_PM4.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(91).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(92).Value = CType(Original_PM4.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(91).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(92).Value = Global.System.DBNull.Value
            End If
            If (Original_PMR.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(93).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(94).Value = CType(Original_PMR.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(93).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(94).Value = Global.System.DBNull.Value
            End If
            If (Original_SNG.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(95).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(96).Value = CType(Original_SNG.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(95).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(96).Value = Global.System.DBNull.Value
            End If
            If (Original_UPH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(97).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(98).Value = CType(Original_UPH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(97).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(98).Value = Global.System.DBNull.Value
            End If
            If (Original_COR.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(99).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(100).Value = CType(Original_COR.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(99).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(100).Value = Global.System.DBNull.Value
            End If
            If (Original_GLU.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(101).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(102).Value = CType(Original_GLU.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(101).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(102).Value = Global.System.DBNull.Value
            End If
            If (Original_LEN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(103).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(104).Value = CType(Original_LEN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(103).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(104).Value = Global.System.DBNull.Value
            End If
            If (Original_LUN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(105).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(106).Value = CType(Original_LUN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(105).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(106).Value = Global.System.DBNull.Value
            End If
            If (Original_OPT.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(107).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(108).Value = CType(Original_OPT.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(107).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(108).Value = Global.System.DBNull.Value
            End If
            If (Original_ORP.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(109).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(110).Value = CType(Original_ORP.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(109).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(110).Value = Global.System.DBNull.Value
            End If
            If (Original_PAU.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(111).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(112).Value = CType(Original_PAU.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(111).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(112).Value = Global.System.DBNull.Value
            End If
            If (Original_PEX.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(113).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(114).Value = CType(Original_PEX.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(113).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(114).Value = Global.System.DBNull.Value
            End If
            If (Original_POC.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(115).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(116).Value = CType(Original_POC.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(115).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(116).Value = Global.System.DBNull.Value
            End If
            If (Original_TNS.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(117).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(118).Value = CType(Original_TNS.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(117).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(118).Value = Global.System.DBNull.Value
            End If
            If (Original_VEH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(119).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(120).Value = CType(Original_VEH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(119).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(120).Value = Global.System.DBNull.Value
            End If
            If (Original_VER.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(121).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(122).Value = CType(Original_VER.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(121).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(122).Value = Global.System.DBNull.Value
            End If
            If (Original_ATL.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(123).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(124).Value = CType(Original_ATL.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(123).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(124).Value = Global.System.DBNull.Value
            End If
            If (Original_DPS.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(125).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(126).Value = CType(Original_DPS.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(125).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(126).Value = Global.System.DBNull.Value
            End If
            If (Original_DVO.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(127).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(128).Value = CType(Original_DVO.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(127).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(128).Value = Global.System.DBNull.Value
            End If
            If (Original_KGP.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(129).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(130).Value = CType(Original_KGP.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(129).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(130).Value = Global.System.DBNull.Value
            End If
            If (Original_PMH.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(131).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(132).Value = CType(Original_PMH.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(131).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(132).Value = Global.System.DBNull.Value
            End If
            If (Original_PPI.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(133).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(134).Value = CType(Original_PPI.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(133).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(134).Value = Global.System.DBNull.Value
            End If
            If (Original_SGN.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(135).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(136).Value = CType(Original_SGN.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(135).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(136).Value = Global.System.DBNull.Value
            End If
            If (Original_SGS.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(137).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(138).Value = CType(Original_SGS.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(137).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(138).Value = Global.System.DBNull.Value
            End If
            If (Original_Top_CMU Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(139).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(140).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(139).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(140).Value = CType(Original_Top_CMU,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
            If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.UpdateCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.UpdateCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update( _
                    ByVal Intitulé As String,  _
                    ByVal AAD As Global.System.Nullable(Of Decimal),  _
                    ByVal AAR As Global.System.Nullable(Of Decimal),  _
                    ByVal ARO As Global.System.Nullable(Of Decimal),  _
                    ByVal B As Global.System.Nullable(Of Decimal),  _
                    ByVal CPH As Global.System.Nullable(Of Decimal),  _
                    ByVal MAC As Global.System.Nullable(Of Decimal),  _
                    ByVal MAD As Global.System.Nullable(Of Decimal),  _
                    ByVal MHU As Global.System.Nullable(Of Decimal),  _
                    ByVal MPI As Global.System.Nullable(Of Decimal),  _
                    ByVal PA As Global.System.Nullable(Of Decimal),  _
                    ByVal PAN As Global.System.Nullable(Of Decimal),  _
                    ByVal PDM As Global.System.Nullable(Of Decimal),  _
                    ByVal PG7 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH1 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH2 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH4 As Global.System.Nullable(Of Decimal),  _
                    ByVal PH7 As Global.System.Nullable(Of Decimal),  _
                    ByVal PHA As Global.System.Nullable(Of Decimal),  _
                    ByVal PHN As Global.System.Nullable(Of Decimal),  _
                    ByVal PII As Global.System.Nullable(Of Decimal),  _
                    ByVal PM2 As Global.System.Nullable(Of Decimal),  _
                    ByVal PM4 As Global.System.Nullable(Of Decimal),  _
                    ByVal PMR As Global.System.Nullable(Of Decimal),  _
                    ByVal SNG As Global.System.Nullable(Of Decimal),  _
                    ByVal UPH As Global.System.Nullable(Of Decimal),  _
                    ByVal COR As Global.System.Nullable(Of Decimal),  _
                    ByVal GLU As Global.System.Nullable(Of Decimal),  _
                    ByVal LEN As Global.System.Nullable(Of Decimal),  _
                    ByVal LUN As Global.System.Nullable(Of Decimal),  _
                    ByVal OPT As Global.System.Nullable(Of Decimal),  _
                    ByVal ORP As Global.System.Nullable(Of Decimal),  _
                    ByVal PAU As Global.System.Nullable(Of Decimal),  _
                    ByVal PEX As Global.System.Nullable(Of Decimal),  _
                    ByVal POC As Global.System.Nullable(Of Decimal),  _
                    ByVal TNS As Global.System.Nullable(Of Decimal),  _
                    ByVal VEH As Global.System.Nullable(Of Decimal),  _
                    ByVal VER As Global.System.Nullable(Of Decimal),  _
                    ByVal ATL As Global.System.Nullable(Of Decimal),  _
                    ByVal DPS As Global.System.Nullable(Of Decimal),  _
                    ByVal DVO As Global.System.Nullable(Of Decimal),  _
                    ByVal KGP As Global.System.Nullable(Of Decimal),  _
                    ByVal PMH As Global.System.Nullable(Of Decimal),  _
                    ByVal PPI As Global.System.Nullable(Of Decimal),  _
                    ByVal SGN As Global.System.Nullable(Of Decimal),  _
                    ByVal SGS As Global.System.Nullable(Of Decimal),  _
                    ByVal Top_CMU As String,  _
                    ByVal Original_Id As String,  _
                    ByVal Original_AAD As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_AAR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ARO As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_B As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_CPH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MAC As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MAD As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MHU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_MPI As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PA As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PAN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PDM As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PG7 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH1 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH2 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH4 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PH7 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PHA As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PHN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PII As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PM2 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PM4 As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PMR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SNG As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_UPH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_COR As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_GLU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_LEN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_LUN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_OPT As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ORP As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PAU As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PEX As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_POC As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_TNS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_VEH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_VER As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_ATL As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_DPS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_DVO As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_KGP As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PMH As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_PPI As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SGN As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_SGS As Global.System.Nullable(Of Decimal),  _
                    ByVal Original_Top_CMU As String) As Integer
            Return Me.Update(Original_Id, Intitulé, AAD, AAR, ARO, B, CPH, MAC, MAD, MHU, MPI, PA, PAN, PDM, PG7, PH1, PH2, PH4, PH7, PHA, PHN, PII, PM2, PM4, PMR, SNG, UPH, COR, GLU, LEN, LUN, OPT, ORP, PAU, PEX, POC, TNS, VEH, VER, ATL, DPS, DVO, KGP, PMH, PPI, SGN, SGS, Top_CMU, Original_Id, Original_AAD, Original_AAR, Original_ARO, Original_B, Original_CPH, Original_MAC, Original_MAD, Original_MHU, Original_MPI, Original_PA, Original_PAN, Original_PDM, Original_PG7, Original_PH1, Original_PH2, Original_PH4, Original_PH7, Original_PHA, Original_PHN, Original_PII, Original_PM2, Original_PM4, Original_PMR, Original_SNG, Original_UPH, Original_COR, Original_GLU, Original_LEN, Original_LUN, Original_OPT, Original_ORP, Original_PAU, Original_PEX, Original_POC, Original_TNS, Original_VEH, Original_VER, Original_ATL, Original_DPS, Original_DVO, Original_KGP, Original_PMH, Original_PPI, Original_SGN, Original_SGS, Original_Top_CMU)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function ScalarQuery() As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class AMC_OrganismesTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "AMC_Organismes"
            tableMapping.ColumnMappings.Add("Num", "Num")
            tableMapping.ColumnMappings.Add("Intitulé", "Intitulé")
            tableMapping.ColumnMappings.Add("Adresse", "Adresse")
            tableMapping.ColumnMappings.Add("Telephone", "Telephone")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[AMC_Organismes] ([Num], [Intitulé], [Adresse], [Telephone]) VA"& _ 
                "LUES (@Num, @Intitulé, @Adresse, @Telephone)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.NChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Intitulé", Global.System.Data.SqlDbType.NChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Intitulé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Telephone", Global.System.Data.SqlDbType.NChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Telephone", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Num, Intitulé, Adresse, Telephone FROM dbo.AMC_Organismes"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Num, Intitulé, Adresse, Telephone FROM dbo.AMC_Organismes"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Where Num=@Num"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Intitulé FROM AMC_Organismes where Num=@Num"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.AMC_OrganismesDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.AMC_OrganismesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.AMC_OrganismesDataTable = New PharmaDataSet.AMC_OrganismesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Num(ByVal Num As String) As PharmaDataSet.AMC_OrganismesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (Num Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Num,String)
            End If
            Dim dataTable As PharmaDataSet.AMC_OrganismesDataTable = New PharmaDataSet.AMC_OrganismesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.AMC_OrganismesDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "AMC_Organismes")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Num As String, ByVal Intitulé As String, ByVal Adresse As String, ByVal Telephone As String) As Integer
            If (Num Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Num,String)
            End If
            If (Intitulé Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Intitulé,String)
            End If
            If (Adresse Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Adresse,String)
            End If
            If (Telephone Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Telephone,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Intitulé(ByVal Num As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (Num Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class CodePrestationsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "CodePrestations"
            tableMapping.ColumnMappings.Add("Code", "Code")
            tableMapping.ColumnMappings.Add("Signification", "Signification")
            tableMapping.ColumnMappings.Add("TypeNomenclature", "TypeNomenclature")
            tableMapping.ColumnMappings.Add("CompatiblePharma", "CompatiblePharma")
            tableMapping.ColumnMappings.Add("CompatibleTable1", "CompatibleTable1")
            tableMapping.ColumnMappings.Add("Top_Codage_Affiné", "Top_Codage_Affiné")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.DeleteCommand.Connection = Me.Connection
            Me._adapter.DeleteCommand.CommandText = "DELETE FROM [CodePrestations] WHERE (([Code] = @Original_Code) AND ((@IsNull_Type"& _ 
                "Nomenclature = 1 AND [TypeNomenclature] IS NULL) OR ([TypeNomenclature] = @Origi"& _ 
                "nal_TypeNomenclature)) AND ([CompatiblePharma] = @Original_CompatiblePharma) AND"& _ 
                " ([CompatibleTable1] = @Original_CompatibleTable1) AND ((@IsNull_Top_Codage_Affi"& _ 
                "né = 1 AND [Top_Codage_Affiné] IS NULL) OR ([Top_Codage_Affiné] = @Original_Top_"& _ 
                "Codage_Affiné)))"
            Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Code", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_TypeNomenclature", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNomenclature", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TypeNomenclature", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNomenclature", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CompatiblePharma", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatiblePharma", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CompatibleTable1", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatibleTable1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Top_Codage_Affiné", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_Codage_Affiné", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Top_Codage_Affiné", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_Codage_Affiné", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [CodePrestations] ([Code], [Signification], [TypeNomenclature], [Comp"& _ 
                "atiblePharma], [CompatibleTable1], [Top_Codage_Affiné]) VALUES (@Code, @Signific"& _ 
                "ation, @TypeNomenclature, @CompatiblePharma, @CompatibleTable1, @Top_Codage_Affi"& _ 
                "né);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT Code, Signification, TypeNomenclature, CompatiblePharma, Compatible"& _ 
                "Table1, Top_Codage_Affiné FROM CodePrestations WHERE (Code = @Code)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Signification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Signification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeNomenclature", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNomenclature", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CompatiblePharma", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatiblePharma", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CompatibleTable1", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatibleTable1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Top_Codage_Affiné", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_Codage_Affiné", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [CodePrestations] SET [Code] = @Code, [Signification] = @Signification, [T"& _ 
                "ypeNomenclature] = @TypeNomenclature, [CompatiblePharma] = @CompatiblePharma, [C"& _ 
                "ompatibleTable1] = @CompatibleTable1, [Top_Codage_Affiné] = @Top_Codage_Affiné W"& _ 
                "HERE (([Code] = @Original_Code) AND ((@IsNull_TypeNomenclature = 1 AND [TypeNome"& _ 
                "nclature] IS NULL) OR ([TypeNomenclature] = @Original_TypeNomenclature)) AND ([C"& _ 
                "ompatiblePharma] = @Original_CompatiblePharma) AND ([CompatibleTable1] = @Origin"& _ 
                "al_CompatibleTable1) AND ((@IsNull_Top_Codage_Affiné = 1 AND [Top_Codage_Affiné]"& _ 
                " IS NULL) OR ([Top_Codage_Affiné] = @Original_Top_Codage_Affiné)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT Code"& _ 
                ", Signification, TypeNomenclature, CompatiblePharma, CompatibleTable1, Top_Codag"& _ 
                "e_Affiné FROM CodePrestations WHERE (Code = @Code)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Signification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Signification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeNomenclature", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNomenclature", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CompatiblePharma", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatiblePharma", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CompatibleTable1", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatibleTable1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Top_Codage_Affiné", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_Codage_Affiné", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Code", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_TypeNomenclature", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNomenclature", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_TypeNomenclature", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNomenclature", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CompatiblePharma", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatiblePharma", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_CompatibleTable1", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CompatibleTable1", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Top_Codage_Affiné", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_Codage_Affiné", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Top_Codage_Affiné", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Top_Codage_Affiné", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Code, Signification, TypeNomenclature, CompatiblePharma, CompatibleTable1,"& _ 
                " Top_Codage_Affiné FROM CodePrestations"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Code, Signification, TypeNomenclature, CompatiblePharma, CompatibleTable1,"& _ 
                " Top_Codage_Affiné FROM CodePrestations WHERE (Code = @CodeActe)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT TypeNomenclature, CompatiblePharma, CompatibleTable1, Top_Codage_Affiné FR"& _ 
                "OM CodePrestations WHERE (Code = @CodeActe)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.CodePrestationsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.CodePrestationsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.CodePrestationsDataTable = New PharmaDataSet.CodePrestationsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_CodeActe(ByVal CodeActe As String) As PharmaDataSet.CodePrestationsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (CodeActe Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeActe")
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(CodeActe,String)
            End If
            Dim dataTable As PharmaDataSet.CodePrestationsDataTable = New PharmaDataSet.CodePrestationsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.CodePrestationsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "CodePrestations")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)>  _
        Public Overloads Overridable Function Delete(ByVal Original_Code As String, ByVal Original_TypeNomenclature As String, ByVal Original_CompatiblePharma As Boolean, ByVal Original_CompatibleTable1 As Boolean, ByVal Original_Top_Codage_Affiné As Global.System.Nullable(Of Boolean)) As Integer
            If (Original_Code Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_Code")
            Else
                Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Code,String)
            End If
            If (Original_TypeNomenclature Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_TypeNomenclature,String)
            End If
            Me.Adapter.DeleteCommand.Parameters(3).Value = CType(Original_CompatiblePharma,Boolean)
            Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_CompatibleTable1,Boolean)
            If (Original_Top_Codage_Affiné.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Top_Codage_Affiné.Value,Boolean)
            Else
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
            If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.DeleteCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.DeleteCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Code As String, ByVal Signification As String, ByVal TypeNomenclature As String, ByVal CompatiblePharma As Boolean, ByVal CompatibleTable1 As Boolean, ByVal Top_Codage_Affiné As Global.System.Nullable(Of Boolean)) As Integer
            If (Code Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Code")
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Code,String)
            End If
            If (Signification Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Signification,String)
            End If
            If (TypeNomenclature Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(TypeNomenclature,String)
            End If
            Me.Adapter.InsertCommand.Parameters(3).Value = CType(CompatiblePharma,Boolean)
            Me.Adapter.InsertCommand.Parameters(4).Value = CType(CompatibleTable1,Boolean)
            If (Top_Codage_Affiné.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Top_Codage_Affiné.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update(ByVal Code As String, ByVal Signification As String, ByVal TypeNomenclature As String, ByVal CompatiblePharma As Boolean, ByVal CompatibleTable1 As Boolean, ByVal Top_Codage_Affiné As Global.System.Nullable(Of Boolean), ByVal Original_Code As String, ByVal Original_TypeNomenclature As String, ByVal Original_CompatiblePharma As Boolean, ByVal Original_CompatibleTable1 As Boolean, ByVal Original_Top_Codage_Affiné As Global.System.Nullable(Of Boolean)) As Integer
            If (Code Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Code")
            Else
                Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Code,String)
            End If
            If (Signification Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Signification,String)
            End If
            If (TypeNomenclature Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(2).Value = CType(TypeNomenclature,String)
            End If
            Me.Adapter.UpdateCommand.Parameters(3).Value = CType(CompatiblePharma,Boolean)
            Me.Adapter.UpdateCommand.Parameters(4).Value = CType(CompatibleTable1,Boolean)
            If (Top_Codage_Affiné.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Top_Codage_Affiné.Value,Boolean)
            Else
                Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (Original_Code Is Nothing) Then
                Throw New Global.System.ArgumentNullException("Original_Code")
            Else
                Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Original_Code,String)
            End If
            If (Original_TypeNomenclature Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_TypeNomenclature,String)
            End If
            Me.Adapter.UpdateCommand.Parameters(9).Value = CType(Original_CompatiblePharma,Boolean)
            Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Original_CompatibleTable1,Boolean)
            If (Original_Top_Codage_Affiné.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(11).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Original_Top_Codage_Affiné.Value,Boolean)
            Else
                Me.Adapter.UpdateCommand.Parameters(11).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
            If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.UpdateCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.UpdateCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update(ByVal Signification As String, ByVal TypeNomenclature As String, ByVal CompatiblePharma As Boolean, ByVal CompatibleTable1 As Boolean, ByVal Top_Codage_Affiné As Global.System.Nullable(Of Boolean), ByVal Original_Code As String, ByVal Original_TypeNomenclature As String, ByVal Original_CompatiblePharma As Boolean, ByVal Original_CompatibleTable1 As Boolean, ByVal Original_Top_Codage_Affiné As Global.System.Nullable(Of Boolean)) As Integer
            Return Me.Update(Original_Code, Signification, TypeNomenclature, CompatiblePharma, CompatibleTable1, Top_Codage_Affiné, Original_Code, Original_TypeNomenclature, Original_CompatiblePharma, Original_CompatibleTable1, Original_Top_Codage_Affiné)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectTypeNomenclatureByCodeActe(ByVal CodeActe As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (CodeActe Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeActe")
            Else
                command.Parameters(0).Value = CType(CodeActe,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class ARLTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "ARL"
            tableMapping.ColumnMappings.Add("MessageId", "MessageId")
            tableMapping.ColumnMappings.Add("InReplyTo", "InReplyTo")
            tableMapping.ColumnMappings.Add("Subject", "Subject")
            tableMapping.ColumnMappings.Add("From_", "From_")
            tableMapping.ColumnMappings.Add("FichierPieceJointe", "FichierPieceJointe")
            tableMapping.ColumnMappings.Add("Content_Description", "Content_Description")
            tableMapping.ColumnMappings.Add("Numéro", "Numéro")
            tableMapping.ColumnMappings.Add("DateCréation", "DateCréation")
            tableMapping.ColumnMappings.Add("DateRéception", "DateRéception")
            tableMapping.ColumnMappings.Add("EmetteurLot", "EmetteurLot")
            tableMapping.ColumnMappings.Add("NumDestinataire", "NumDestinataire")
            tableMapping.ColumnMappings.Add("RefLot", "RefLot")
            tableMapping.ColumnMappings.Add("DateLot", "DateLot")
            tableMapping.ColumnMappings.Add("TypeCodeTraitementLot", "TypeCodeTraitementLot")
            tableMapping.ColumnMappings.Add("CodeTraitementLot", "CodeTraitementLot")
            tableMapping.ColumnMappings.Add("LibelléTraitementLot", "LibelléTraitementLot")
            tableMapping.ColumnMappings.Add("To_", "To_")
            tableMapping.ColumnMappings.Add("Content_Type", "Content_Type")
            tableMapping.ColumnMappings.Add("CodeErreurTraduireARL", "CodeErreurTraduireARL")
            tableMapping.ColumnMappings.Add("TypeNumEmetteurLot", "TypeNumEmetteurLot")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [ARL] ([MessageId], [InReplyTo], [Subject], [From_], [FichierPieceJoi"& _ 
                "nte], [Content_Description], [Numéro], [DateCréation], [DateRéception], [Emetteu"& _ 
                "rLot], [NumDestinataire], [RefLot], [DateLot], [TypeCodeTraitementLot], [CodeTra"& _ 
                "itementLot], [LibelléTraitementLot], [CodeErreurTraduireARL], [Content_Type], [T"& _ 
                "o_], [TypeNumEmetteurLot]) VALUES (@MessageId, @InReplyTo, @Subject, @From_, @Fi"& _ 
                "chierPieceJointe, @Content_Description, @Numéro, @DateCréation, @DateRéception, "& _ 
                "@EmetteurLot, @NumDestinataire, @RefLot, @DateLot, @TypeCodeTraitementLot, @Code"& _ 
                "TraitementLot, @LibelléTraitementLot, @CodeErreurTraduireARL, @Content_Type, @To"& _ 
                "_, @TypeNumEmetteurLot)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MessageId", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MessageId", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@InReplyTo", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "InReplyTo", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierPieceJointe", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "FichierPieceJointe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Content_Description", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Content_Description", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Numéro", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Numéro", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateCréation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateCréation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateRéception", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateRéception", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EmetteurLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EmetteurLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumDestinataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumDestinataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@RefLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "RefLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeCodeTraitementLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeCodeTraitementLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeTraitementLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeTraitementLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LibelléTraitementLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LibelléTraitementLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeErreurTraduireARL", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeErreurTraduireARL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Content_Type", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Content_Type", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@To_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "To_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeNumEmetteurLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeNumEmetteurLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT MessageId, InReplyTo, Subject, From_, FichierPieceJointe, Content_Descript"& _ 
                "ion, Numéro, DateCréation, DateRéception, EmetteurLot, NumDestinataire, RefLot, "& _ 
                "DateLot, TypeCodeTraitementLot, CodeTraitementLot, LibelléTraitementLot, CodeErr"& _ 
                "eurTraduireARL, Content_Type, To_, TypeNumEmetteurLot FROM ARL"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "INSERT INTO [dbo].[ARL] ([MessageId], [InReplyTo], [Subject], [From_], [FichierPi"& _ 
                "eceJointe], [Content_Description], [Numéro], [DateCréation], [DateRéception], [E"& _ 
                "metteurLot], [NumDestinataire], [RefLot], [DateLot], [TypeCodeTraitementLot], [C"& _ 
                "odeTraitementLot], [LibelléTraitementLot]) VALUES (@MessageId, @InReplyTo, @Subj"& _ 
                "ect, @From_, @FichierPieceJointe, @Content_Description, @Numéro, @DateCréation, "& _ 
                "@DateRéception, @EmetteurLot, @NumDestinataire, @RefLot, @DateLot, @TypeCodeTrai"& _ 
                "tementLot, @CodeTraitementLot, @LibelléTraitementLot)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MessageId", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "MessageId", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@InReplyTo", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "InReplyTo", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierPieceJointe", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "FichierPieceJointe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Content_Description", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Content_Description", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Numéro", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Numéro", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateCréation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DateCréation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateRéception", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DateRéception", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EmetteurLot", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "EmetteurLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumDestinataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "NumDestinataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@RefLot", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "RefLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateLot", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "DateLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@TypeCodeTraitementLot", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "TypeCodeTraitementLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeTraitementLot", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeTraitementLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LibelléTraitementLot", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "LibelléTraitementLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT MessageId, CodeErreurTraduireARL, Content_Type, To_, TypeNumEmetteurLot FR"& _ 
                "OM ARL WHERE (FichierPieceJointe = @FichierPieceJointe)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@FichierPieceJointe", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "FichierPieceJointe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT MAX(FichierPieceJointe) FROM ARL"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.ARLDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.ARLDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.ARLDataTable = New PharmaDataSet.ARLDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.ARLDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "ARL")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal MessageId As String,  _
                    ByVal InReplyTo As String,  _
                    ByVal Subject As String,  _
                    ByVal From_ As String,  _
                    ByVal FichierPieceJointe As Global.System.Nullable(Of Decimal),  _
                    ByVal Content_Description As String,  _
                    ByVal Numéro As String,  _
                    ByVal DateCréation As String,  _
                    ByVal DateRéception As String,  _
                    ByVal EmetteurLot As String,  _
                    ByVal NumDestinataire As String,  _
                    ByVal RefLot As String,  _
                    ByVal DateLot As String,  _
                    ByVal TypeCodeTraitementLot As String,  _
                    ByVal CodeTraitementLot As String,  _
                    ByVal LibelléTraitementLot As String,  _
                    ByVal CodeErreurTraduireARL As String,  _
                    ByVal Content_Type As String,  _
                    ByVal To_ As String,  _
                    ByVal TypeNumEmetteurLot As String) As Integer
            If (MessageId Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(MessageId,String)
            End If
            If (InReplyTo Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(InReplyTo,String)
            End If
            If (Subject Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Subject,String)
            End If
            If (From_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(From_,String)
            End If
            If (FichierPieceJointe.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(FichierPieceJointe.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Content_Description Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Content_Description,String)
            End If
            If (Numéro Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(Numéro,String)
            End If
            If (DateCréation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(DateCréation,String)
            End If
            If (DateRéception Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(DateRéception,String)
            End If
            If (EmetteurLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(EmetteurLot,String)
            End If
            If (NumDestinataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(NumDestinataire,String)
            End If
            If (RefLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(RefLot,String)
            End If
            If (DateLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(DateLot,String)
            End If
            If (TypeCodeTraitementLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(TypeCodeTraitementLot,String)
            End If
            If (CodeTraitementLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(CodeTraitementLot,String)
            End If
            If (LibelléTraitementLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(LibelléTraitementLot,String)
            End If
            If (CodeErreurTraduireARL Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(CodeErreurTraduireARL,String)
            End If
            If (Content_Type Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(Content_Type,String)
            End If
            If (To_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(To_,String)
            End If
            If (TypeNumEmetteurLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(TypeNumEmetteurLot,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1( _
                    ByVal MessageId As String,  _
                    ByVal InReplyTo As String,  _
                    ByVal Subject As String,  _
                    ByVal From_ As String,  _
                    ByVal FichierPieceJointe As Global.System.Nullable(Of Decimal),  _
                    ByVal Content_Description As String,  _
                    ByVal Numéro As String,  _
                    ByVal DateCréation As String,  _
                    ByVal DateRéception As String,  _
                    ByVal EmetteurLot As String,  _
                    ByVal NumDestinataire As String,  _
                    ByVal RefLot As String,  _
                    ByVal DateLot As String,  _
                    ByVal TypeCodeTraitementLot As String,  _
                    ByVal CodeTraitementLot As String,  _
                    ByVal LibelléTraitementLot As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (MessageId Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(MessageId,String)
            End If
            If (InReplyTo Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(InReplyTo,String)
            End If
            If (Subject Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Subject,String)
            End If
            If (From_ Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(From_,String)
            End If
            If (FichierPieceJointe.HasValue = true) Then
                command.Parameters(4).Value = CType(FichierPieceJointe.Value,Decimal)
            Else
                command.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Content_Description Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Content_Description,String)
            End If
            If (Numéro Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(Numéro,String)
            End If
            If (DateCréation Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(DateCréation,String)
            End If
            If (DateRéception Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(DateRéception,String)
            End If
            If (EmetteurLot Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(EmetteurLot,String)
            End If
            If (NumDestinataire Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(NumDestinataire,String)
            End If
            If (RefLot Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(RefLot,String)
            End If
            If (DateLot Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(DateLot,String)
            End If
            If (TypeCodeTraitementLot Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(TypeCodeTraitementLot,String)
            End If
            If (CodeTraitementLot Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(CodeTraitementLot,String)
            End If
            If (LibelléTraitementLot Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(LibelléTraitementLot,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectIdByFichier(ByVal FichierPieceJointe As Global.System.Nullable(Of Decimal)) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (FichierPieceJointe.HasValue = true) Then
                command.Parameters(0).Value = CType(FichierPieceJointe.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxFichierPieceJointe() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class AMOTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "AMO"
            tableMapping.ColumnMappings.Add("CodeRégime", "CodeRégime")
            tableMapping.ColumnMappings.Add("CaisseGestionnaire", "CaisseGestionnaire")
            tableMapping.ColumnMappings.Add("CentreGestionnaire", "CentreGestionnaire")
            tableMapping.ColumnMappings.Add("OrganismeDestinataire", "OrganismeDestinataire")
            tableMapping.ColumnMappings.Add("CentreInformatique", "CentreInformatique")
            tableMapping.ColumnMappings.Add("libellé", "libellé")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[AMO] ([CodeRégime], [CaisseGestionnaire], [CentreGestionnaire]"& _ 
                ", [OrganismeDestinataire], [CentreInformatique], [libellé]) VALUES (@CodeRégime,"& _ 
                " @CaisseGestionnaire, @CentreGestionnaire, @OrganismeDestinataire, @CentreInform"& _ 
                "atique, @libellé)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CaisseGestionnaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CaisseGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreGestionnaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@OrganismeDestinataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "OrganismeDestinataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreInformatique", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreInformatique", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(5) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CodeRégime, CaisseGestionnaire, CentreGestionnaire, OrganismeDestinataire,"& _ 
                " CentreInformatique, libellé FROM dbo.AMO"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT     CentreInformatique"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         AMO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (CodeRégime = @CodeRég"& _ 
                "ime) AND (CaisseGestionnaire = @CaisseGestionnaire) AND (CentreGestionnaire = @C"& _ 
                "entreGestionnaire)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CaisseGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CaisseGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT COUNT(*) FROM AMO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE (CodeRégime=@CodeRégime and CaisseGestionnaire=@C"& _ 
                "aisseGestionnaire and CentreGestionnaire=@CentreGestionnaire)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CaisseGestionnaire", Global.System.Data.SqlDbType.NVarChar, 3, Global.System.Data.ParameterDirection.Input, 0, 0, "CaisseGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreGestionnaire", Global.System.Data.SqlDbType.NVarChar, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT     libellé"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         AMO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (CodeRégime = @CodeRégime) AND (C"& _ 
                "aisseGestionnaire = @CaisseGestionnaire) AND (CentreGestionnaire = @CentreGestio"& _ 
                "nnaire)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CaisseGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CaisseGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT     OrganismeDestinataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         AMO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     (CodeRégime = @Code"& _ 
                "Régime) AND (CaisseGestionnaire = @CaisseGestionnaire) AND (CentreGestionnaire ="& _ 
                " @CentreGestionnaire)"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CaisseGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CaisseGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "UPDATE    AMO"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              CodeRégime =@CodeRégime , CaisseGestionnaire =@Ca"& _ 
                "isseGestionnaire , CentreGestionnaire =@CentreGestionnaire , OrganismeDestinatai"& _ 
                "re =@OrganismeDestinataire , CentreInformatique =@CentreInformatique , libellé ="& _ 
                "@libellé "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where ( CodeRégime =@CodeRégime and CaisseGestionnaire =@CaisseGestio"& _ 
                "nnaire and CentreGestionnaire =@CentreGestionnaire)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CaisseGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CaisseGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreGestionnaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreGestionnaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@OrganismeDestinataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "OrganismeDestinataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CentreInformatique", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CentreInformatique", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.AMODataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.AMODataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.AMODataTable = New PharmaDataSet.AMODataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.AMODataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "AMO")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String, ByVal OrganismeDestinataire As String, ByVal CentreInformatique As String, ByVal libellé As String) As Integer
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CaisseGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CaisseGestionnaire")
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CaisseGestionnaire,String)
            End If
            If (CentreGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreGestionnaire")
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(CentreGestionnaire,String)
            End If
            If (OrganismeDestinataire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("OrganismeDestinataire")
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(OrganismeDestinataire,String)
            End If
            If (CentreInformatique Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreInformatique")
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(CentreInformatique,String)
            End If
            If (libellé Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(libellé,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectCentreInformatique(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                command.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CaisseGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CaisseGestionnaire")
            Else
                command.Parameters(1).Value = CType(CaisseGestionnaire,String)
            End If
            If (CentreGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreGestionnaire")
            Else
                command.Parameters(2).Value = CType(CentreGestionnaire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectCount(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                command.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CaisseGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CaisseGestionnaire")
            Else
                command.Parameters(1).Value = CType(CaisseGestionnaire,String)
            End If
            If (CentreGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreGestionnaire")
            Else
                command.Parameters(2).Value = CType(CentreGestionnaire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectLibellé(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                command.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CaisseGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CaisseGestionnaire")
            Else
                command.Parameters(1).Value = CType(CaisseGestionnaire,String)
            End If
            If (CentreGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreGestionnaire")
            Else
                command.Parameters(2).Value = CType(CentreGestionnaire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectOrganismeDestinataire(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String) As String
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                command.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CaisseGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CaisseGestionnaire")
            Else
                command.Parameters(1).Value = CType(CaisseGestionnaire,String)
            End If
            If (CentreGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreGestionnaire")
            Else
                command.Parameters(2).Value = CType(CentreGestionnaire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,String)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function UpdateQuery(ByVal CodeRégime As String, ByVal CaisseGestionnaire As String, ByVal CentreGestionnaire As String, ByVal OrganismeDestinataire As String, ByVal CentreInformatique As String, ByVal libellé As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                command.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CaisseGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CaisseGestionnaire")
            Else
                command.Parameters(1).Value = CType(CaisseGestionnaire,String)
            End If
            If (CentreGestionnaire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreGestionnaire")
            Else
                command.Parameters(2).Value = CType(CentreGestionnaire,String)
            End If
            If (OrganismeDestinataire Is Nothing) Then
                Throw New Global.System.ArgumentNullException("OrganismeDestinataire")
            Else
                command.Parameters(3).Value = CType(OrganismeDestinataire,String)
            End If
            If (CentreInformatique Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CentreInformatique")
            Else
                command.Parameters(4).Value = CType(CentreInformatique,String)
            End If
            If (libellé Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(libellé,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Facture_VenteDirecteTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Facture_VenteDirecte"
            tableMapping.ColumnMappings.Add("Num", "Num")
            tableMapping.ColumnMappings.Add("Nir", "Nir")
            tableMapping.ColumnMappings.Add("Nom", "Nom")
            tableMapping.ColumnMappings.Add("Prénom", "Prénom")
            tableMapping.ColumnMappings.Add("Date_", "Date_")
            tableMapping.ColumnMappings.Add("Total", "Total")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.DeleteCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.DeleteCommand.Connection = Me.Connection
            Me._adapter.DeleteCommand.CommandText = "DELETE FROM [dbo].[Facture_VenteDirecte] WHERE (([Num] = @Original_Num) AND ((@Is"& _ 
                "Null_Nir = 1 AND [Nir] IS NULL) OR ([Nir] = @Original_Nir)) AND ((@IsNull_Nom = "& _ 
                "1 AND [Nom] IS NULL) OR ([Nom] = @Original_Nom)) AND ((@IsNull_Prénom = 1 AND [P"& _ 
                "rénom] IS NULL) OR ([Prénom] = @Original_Prénom)) AND ((@IsNull_Date_ = 1 AND [D"& _ 
                "ate_] IS NULL) OR ([Date_] = @Original_Date_)) AND ((@IsNull_Total = 1 AND [Tota"& _ 
                "l] IS NULL) OR ([Total] = @Original_Total)))"
            Me._adapter.DeleteCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Nir", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nir", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Nir", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nir", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Nom", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Nom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Prénom", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Prénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Date_", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Date_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Total", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Total", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.DeleteCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Total", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Total", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[Facture_VenteDirecte] ([Num], [Nir], [Nom], [Prénom], [Date_],"& _ 
                " [Total]) VALUES (@Num, @Nir, @Nom, @Prénom, @Date_, @Total);"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT Num, Nir, "& _ 
                "Nom, Prénom, Date_, Total FROM Facture_VenteDirecte WHERE (Num = @Num)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nir", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nir", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Total", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Total", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.UpdateCommand.Connection = Me.Connection
            Me._adapter.UpdateCommand.CommandText = "UPDATE [dbo].[Facture_VenteDirecte] SET [Num] = @Num, [Nir] = @Nir, [Nom] = @Nom,"& _ 
                " [Prénom] = @Prénom, [Date_] = @Date_, [Total] = @Total WHERE (([Num] = @Origina"& _ 
                "l_Num) AND ((@IsNull_Nir = 1 AND [Nir] IS NULL) OR ([Nir] = @Original_Nir)) AND "& _ 
                "((@IsNull_Nom = 1 AND [Nom] IS NULL) OR ([Nom] = @Original_Nom)) AND ((@IsNull_P"& _ 
                "rénom = 1 AND [Prénom] IS NULL) OR ([Prénom] = @Original_Prénom)) AND ((@IsNull_"& _ 
                "Date_ = 1 AND [Date_] IS NULL) OR ([Date_] = @Original_Date_)) AND ((@IsNull_Tot"& _ 
                "al = 1 AND [Total] IS NULL) OR ([Total] = @Original_Total)));"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SELECT Num, Nir, "& _ 
                "Nom, Prénom, Date_, Total FROM Facture_VenteDirecte WHERE (Num = @Num)"
            Me._adapter.UpdateCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nir", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nir", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Nom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Total", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Total", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Nir", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nir", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Nir", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nir", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Nom", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Nom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Nom", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Prénom", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Prénom", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Prénom", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Date_", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Date_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date_", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@IsNull_Total", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Total", Global.System.Data.DataRowVersion.Original, true, Nothing, "", "", ""))
            Me._adapter.UpdateCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Original_Total", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Total", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Num, Nir, Nom, Prénom, Date_, Total FROM dbo.Facture_VenteDirecte"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT MAX(Num) FROM Facture_VenteDirecte"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Facture_VenteDirecteDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Facture_VenteDirecteDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Facture_VenteDirecteDataTable = New PharmaDataSet.Facture_VenteDirecteDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Facture_VenteDirecteDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Facture_VenteDirecte")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, true)>  _
        Public Overloads Overridable Function Delete(ByVal Original_Num As Decimal, ByVal Original_Nir As String, ByVal Original_Nom As String, ByVal Original_Prénom As String, ByVal Original_Date_ As String, ByVal Original_Total As Global.System.Nullable(Of Decimal)) As Integer
            Me.Adapter.DeleteCommand.Parameters(0).Value = CType(Original_Num,Decimal)
            If (Original_Nir Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(1).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(2).Value = CType(Original_Nir,String)
            End If
            If (Original_Nom Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(3).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(4).Value = CType(Original_Nom,String)
            End If
            If (Original_Prénom Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(5).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(6).Value = CType(Original_Prénom,String)
            End If
            If (Original_Date_ Is Nothing) Then
                Me.Adapter.DeleteCommand.Parameters(7).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.DeleteCommand.Parameters(7).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(8).Value = CType(Original_Date_,String)
            End If
            If (Original_Total.HasValue = true) Then
                Me.Adapter.DeleteCommand.Parameters(9).Value = CType(0,Object)
                Me.Adapter.DeleteCommand.Parameters(10).Value = CType(Original_Total.Value,Decimal)
            Else
                Me.Adapter.DeleteCommand.Parameters(9).Value = CType(1,Object)
                Me.Adapter.DeleteCommand.Parameters(10).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.DeleteCommand.Connection.State
            If ((Me.Adapter.DeleteCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.DeleteCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.DeleteCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.DeleteCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Num As Decimal, ByVal Nir As String, ByVal Nom As String, ByVal Prénom As String, ByVal Date_ As String, ByVal Total As Global.System.Nullable(Of Decimal)) As Integer
            Me.Adapter.InsertCommand.Parameters(0).Value = CType(Num,Decimal)
            If (Nir Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Nir,String)
            End If
            If (Nom Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Nom,String)
            End If
            If (Prénom Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Prénom,String)
            End If
            If (Date_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(Date_,String)
            End If
            If (Total.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Total.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update(ByVal Num As Decimal, ByVal Nir As String, ByVal Nom As String, ByVal Prénom As String, ByVal Date_ As String, ByVal Total As Global.System.Nullable(Of Decimal), ByVal Original_Num As Decimal, ByVal Original_Nir As String, ByVal Original_Nom As String, ByVal Original_Prénom As String, ByVal Original_Date_ As String, ByVal Original_Total As Global.System.Nullable(Of Decimal)) As Integer
            Me.Adapter.UpdateCommand.Parameters(0).Value = CType(Num,Decimal)
            If (Nir Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(1).Value = CType(Nir,String)
            End If
            If (Nom Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(2).Value = CType(Nom,String)
            End If
            If (Prénom Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(3).Value = CType(Prénom,String)
            End If
            If (Date_ Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(4).Value = CType(Date_,String)
            End If
            If (Total.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(5).Value = CType(Total.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            Me.Adapter.UpdateCommand.Parameters(6).Value = CType(Original_Num,Decimal)
            If (Original_Nir Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(7).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(8).Value = CType(Original_Nir,String)
            End If
            If (Original_Nom Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(9).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(9).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(10).Value = CType(Original_Nom,String)
            End If
            If (Original_Prénom Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(11).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(11).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(12).Value = CType(Original_Prénom,String)
            End If
            If (Original_Date_ Is Nothing) Then
                Me.Adapter.UpdateCommand.Parameters(13).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.UpdateCommand.Parameters(13).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(14).Value = CType(Original_Date_,String)
            End If
            If (Original_Total.HasValue = true) Then
                Me.Adapter.UpdateCommand.Parameters(15).Value = CType(0,Object)
                Me.Adapter.UpdateCommand.Parameters(16).Value = CType(Original_Total.Value,Decimal)
            Else
                Me.Adapter.UpdateCommand.Parameters(15).Value = CType(1,Object)
                Me.Adapter.UpdateCommand.Parameters(16).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.UpdateCommand.Connection.State
            If ((Me.Adapter.UpdateCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.UpdateCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.UpdateCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.UpdateCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, true)>  _
        Public Overloads Overridable Function Update(ByVal Nir As String, ByVal Nom As String, ByVal Prénom As String, ByVal Date_ As String, ByVal Total As Global.System.Nullable(Of Decimal), ByVal Original_Num As Decimal, ByVal Original_Nir As String, ByVal Original_Nom As String, ByVal Original_Prénom As String, ByVal Original_Date_ As String, ByVal Original_Total As Global.System.Nullable(Of Decimal)) As Integer
            Return Me.Update(Original_Num, Nir, Nom, Prénom, Date_, Total, Original_Num, Original_Nir, Original_Nom, Original_Prénom, Original_Date_, Original_Total)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxNum() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Pop_Allowed_ListTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Pop_Allowed_List"
            tableMapping.ColumnMappings.Add("Adresse", "Adresse")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[Pop_Allowed_List] ([Adresse]) VALUES (@Adresse)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Adresse FROM dbo.Pop_Allowed_List"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "INSERT INTO [dbo].[Pop_Allowed_List] ([Adresse]) VALUES (@Adresse)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT COUNT(*) FROM Pop_Allowed_List"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Where Adresse=@Adresse"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Adresse", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Adresse", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Pop_Allowed_ListDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Pop_Allowed_ListDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Pop_Allowed_ListDataTable = New PharmaDataSet.Pop_Allowed_ListDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Pop_Allowed_ListDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Pop_Allowed_List")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Adresse As String) As Integer
            If (Adresse Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Adresse,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function InsertQuery(ByVal Adresse As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Adresse Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Adresse,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Count_By_Adresse(ByVal Adresse As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (Adresse Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Adresse,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Convention_Table_correspondanceTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Convention_Table_correspondance"
            tableMapping.ColumnMappings.Add("Num_org_complémentaire", "Num_org_complémentaire")
            tableMapping.ColumnMappings.Add("MUTNUM", "MUTNUM")
            tableMapping.ColumnMappings.Add("code_organisme_obligatoire_associé", "code_organisme_obligatoire_associé")
            tableMapping.ColumnMappings.Add("libellé_organisme_complémentaire", "libellé_organisme_complémentaire")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[Convention_Table_correspondance] ([Num_org_complémentaire], [M"& _ 
                "UTNUM], [code_organisme_obligatoire_associé], [libellé_organisme_complémentaire]"& _ 
                ") VALUES (@Num_org_complémentaire, @MUTNUM, @code_organisme_obligatoire_associé,"& _ 
                " @libellé_organisme_complémentaire)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_org_complémentaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_org_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MUTNUM", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MUTNUM", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@code_organisme_obligatoire_associé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "code_organisme_obligatoire_associé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_organisme_complémentaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_organisme_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Num_org_complémentaire, MUTNUM, code_organisme_obligatoire_associé, libell"& _ 
                "é_organisme_complémentaire FROM dbo.Convention_Table_correspondance"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Num_org_complémentaire, MUTNUM, code_organisme_obligatoire_associé, libell"& _ 
                "é_organisme_complémentaire FROM dbo.Convention_Table_correspondance"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where MUTNU"& _ 
                "M=@MUTNUM"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MUTNUM", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "MUTNUM", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Convention_Table_correspondanceDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Convention_Table_correspondanceDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Convention_Table_correspondanceDataTable = New PharmaDataSet.Convention_Table_correspondanceDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_MUTNUM(ByVal MUTNUM As String) As PharmaDataSet.Convention_Table_correspondanceDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (MUTNUM Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(MUTNUM,String)
            End If
            Dim dataTable As PharmaDataSet.Convention_Table_correspondanceDataTable = New PharmaDataSet.Convention_Table_correspondanceDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Convention_Table_correspondanceDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Convention_Table_correspondance")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Num_org_complémentaire As String, ByVal MUTNUM As String, ByVal code_organisme_obligatoire_associé As String, ByVal libellé_organisme_complémentaire As String) As Integer
            If (Num_org_complémentaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Num_org_complémentaire,String)
            End If
            If (MUTNUM Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(MUTNUM,String)
            End If
            If (code_organisme_obligatoire_associé Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(code_organisme_obligatoire_associé,String)
            End If
            If (libellé_organisme_complémentaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(libellé_organisme_complémentaire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Convention_Table_ConventionsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Convention_Table_Conventions"
            tableMapping.ColumnMappings.Add("Code_action", "Code_action")
            tableMapping.ColumnMappings.Add("Code_catégorie", "Code_catégorie")
            tableMapping.ColumnMappings.Add("Spécialité", "Spécialité")
            tableMapping.ColumnMappings.Add("Référence_de_convention", "Référence_de_convention")
            tableMapping.ColumnMappings.Add("Message", "Message")
            tableMapping.ColumnMappings.Add("Identifiant_org_signataire", "Identifiant_org_signataire")
            tableMapping.ColumnMappings.Add("Libellé_org_signataire", "Libellé_org_signataire")
            tableMapping.ColumnMappings.Add("indicateur_convention_groupée", "indicateur_convention_groupée")
            tableMapping.ColumnMappings.Add("type_Identifiant_org_signataire", "type_Identifiant_org_signataire")
            tableMapping.ColumnMappings.Add("critère_secondaire", "critère_secondaire")
            tableMapping.ColumnMappings.Add("type_Accord", "type_Accord")
            tableMapping.ColumnMappings.Add("Num_AMC", "Num_AMC")
            tableMapping.ColumnMappings.Add("libellé_Org_complémentaire", "libellé_Org_complémentaire")
            tableMapping.ColumnMappings.Add("indic_desactivation_STS", "indic_desactivation_STS")
            tableMapping.ColumnMappings.Add("Code_aiguillage_STS", "Code_aiguillage_STS")
            tableMapping.ColumnMappings.Add("usage_attestation_papier", "usage_attestation_papier")
            tableMapping.ColumnMappings.Add("Accepatation_DRE_Annulation", "Accepatation_DRE_Annulation")
            tableMapping.ColumnMappings.Add("Acceptation_DRE_Rectification", "Acceptation_DRE_Rectification")
            tableMapping.ColumnMappings.Add("Identifiant_Opérateur_règlement", "Identifiant_Opérateur_règlement")
            tableMapping.ColumnMappings.Add("Code_routage", "Code_routage")
            tableMapping.ColumnMappings.Add("identifiant_hôte", "identifiant_hôte")
            tableMapping.ColumnMappings.Add("nom_domaine", "nom_domaine")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[Convention_Table_Conventions] ([Code_action], [Code_catégorie]"& _ 
                ", [Spécialité], [Référence_de_convention], [Message], [Identifiant_org_signatair"& _ 
                "e], [Libellé_org_signataire], [indicateur_convention_groupée], [type_Identifiant"& _ 
                "_org_signataire], [critère_secondaire], [type_Accord], [Num_AMC], [libellé_Org_c"& _ 
                "omplémentaire], [indic_desactivation_STS], [Code_aiguillage_STS], [usage_attesta"& _ 
                "tion_papier], [Accepatation_DRE_Annulation], [Acceptation_DRE_Rectification], [I"& _ 
                "dentifiant_Opérateur_règlement], [Code_routage], [identifiant_hôte], [nom_domain"& _ 
                "e]) VALUES (@Code_action, @Code_catégorie, @Spécialité, @Référence_de_convention"& _ 
                ", @Message, @Identifiant_org_signataire, @Libellé_org_signataire, @indicateur_co"& _ 
                "nvention_groupée, @type_Identifiant_org_signataire, @critère_secondaire, @type_A"& _ 
                "ccord, @Num_AMC, @libellé_Org_complémentaire, @indic_desactivation_STS, @Code_ai"& _ 
                "guillage_STS, @usage_attestation_papier, @Accepatation_DRE_Annulation, @Acceptat"& _ 
                "ion_DRE_Rectification, @Identifiant_Opérateur_règlement, @Code_routage, @identif"& _ 
                "iant_hôte, @nom_domaine)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_action", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_action", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_catégorie", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_catégorie", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_de_convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_de_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Message", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Message", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indicateur_convention_groupée", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "indicateur_convention_groupée", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Org_complémentaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Org_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indic_desactivation_STS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "indic_desactivation_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@usage_attestation_papier", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "usage_attestation_papier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Accepatation_DRE_Annulation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Accepatation_DRE_Annulation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acceptation_DRE_Rectification", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Acceptation_DRE_Rectification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_Opérateur_règlement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_Opérateur_règlement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_routage", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_routage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@identifiant_hôte", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "identifiant_hôte", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@nom_domaine", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "nom_domaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(12) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE  [dbo].[Convention_Table_Conventions]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Identifiant_org_signataire=@"& _ 
                "Identifiant_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and type_Identifiant_org_signataire=@type_Identifian"& _ 
                "t_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and critère_secondaire=@critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and type_Accord=@t"& _ 
                "ype_Accord"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Num_AMC=@Num_AMC"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "DELETE  [dbo].[Convention_Table_Conventions]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where("&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Code_action=@Code_action an"& _ 
                "d"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Code_catégorie=@Code_catégorie  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Spécialité=@Spécialité  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Référence_d"& _ 
                "e_convention=@Référence_de_convention  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Message=@Message  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Identifiant_o"& _ 
                "rg_signataire=@Identifiant_org_signataire  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Libellé_org_signataire=@Libellé_"& _ 
                "org_signataire  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"indicateur_convention_groupée=@indicateur_convention_groupé"& _ 
                "e  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"type_Identifiant_org_signataire=@type_Identifiant_org_signataire  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"c"& _ 
                "ritère_secondaire=@critère_secondaire  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"type_Accord=@type_Accord  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Num_A"& _ 
                "MC=@Num_AMC  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"libellé_Org_complémentaire=@libellé_Org_complémentaire  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"i"& _ 
                "ndic_desactivation_STS=@indic_desactivation_STS  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Code_aiguillage_STS=@Code_"& _ 
                "aiguillage_STS  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"usage_attestation_papier=@usage_attestation_papier  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Ac"& _ 
                "cepatation_DRE_Annulation=@Accepatation_DRE_Annulation  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Acceptation_DRE_Rec"& _ 
                "tification=@Acceptation_DRE_Rectification  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Identifiant_Opérateur_règlement="& _ 
                "@Identifiant_Opérateur_règlement  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Code_routage=@Code_routage  and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"identifi"& _ 
                "ant_hôte=@identifiant_hôte and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"nom_domaine=@nom_domaine  )"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_action", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_action", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_catégorie", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_de_convention", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_de_convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Message", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Message", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indicateur_convention_groupée", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "indicateur_convention_groupée", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Org_complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Org_complémentaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indic_desactivation_STS", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "indic_desactivation_STS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_aiguillage_STS", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@usage_attestation_papier", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "usage_attestation_papier", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Accepatation_DRE_Annulation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Accepatation_DRE_Annulation", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acceptation_DRE_Rectification", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Acceptation_DRE_Rectification", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_Opérateur_règlement", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_Opérateur_règlement", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_routage", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_routage", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@identifiant_hôte", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "identifiant_hôte", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@nom_domaine", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "nom_domaine", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where Identifiant_org_signataire=@Identifiant"& _ 
                "_org_signataire or Num_AMC=@Identifiant_org_signataire"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Identifiant_org_signataire =@Identifia"& _ 
                "nt_org_signataire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"type_Identifiant_org_signataire =@type_Identifiant_org_si"& _ 
                "gnataire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"critère_secondaire =@critère_secondaire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Num_AMC =@Num_AMC and"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"type_Accord =@type_Accord"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "INSERT INTO [dbo].[Convention_Table_Conventions] ([Code_action], [Code_catégorie]"& _ 
                ", [Spécialité], [Référence_de_convention], [Message], [Identifiant_org_signatair"& _ 
                "e], [Libellé_org_signataire], [indicateur_convention_groupée], [type_Identifiant"& _ 
                "_org_signataire], [critère_secondaire], [type_Accord], [Num_AMC], [libellé_Org_c"& _ 
                "omplémentaire], [indic_desactivation_STS], [Code_aiguillage_STS], [usage_attesta"& _ 
                "tion_papier], [Accepatation_DRE_Annulation], [Acceptation_DRE_Rectification], [I"& _ 
                "dentifiant_Opérateur_règlement], [Code_routage], [identifiant_hôte], [nom_domain"& _ 
                "e]) VALUES (@Code_action, @Code_catégorie, @Spécialité, @Référence_de_convention"& _ 
                ", @Message, @Identifiant_org_signataire, @Libellé_org_signataire, @indicateur_co"& _ 
                "nvention_groupée, @type_Identifiant_org_signataire, @critère_secondaire, @type_A"& _ 
                "ccord, @Num_AMC, @libellé_Org_complémentaire, @indic_desactivation_STS, @Code_ai"& _ 
                "guillage_STS, @usage_attestation_papier, @Accepatation_DRE_Annulation, @Acceptat"& _ 
                "ion_DRE_Rectification, @Identifiant_Opérateur_règlement, @Code_routage, @identif"& _ 
                "iant_hôte, @nom_domaine)"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_action", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_action", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_catégorie", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_de_convention", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_de_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Message", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Message", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indicateur_convention_groupée", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "indicateur_convention_groupée", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Org_complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Org_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indic_desactivation_STS", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "indic_desactivation_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@usage_attestation_papier", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "usage_attestation_papier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Accepatation_DRE_Annulation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Accepatation_DRE_Annulation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acceptation_DRE_Rectification", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Acceptation_DRE_Rectification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_Opérateur_règlement", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_Opérateur_règlement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_routage", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_routage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@identifiant_hôte", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "identifiant_hôte", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@nom_domaine", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "nom_domaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where (type_Identifiant_org_signataire =@ty"& _ 
                "pe_Identifiant_org_signataire "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Identifiant_org_signataire=@Identifiant_org_"& _ 
                "signataire)"
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(7) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(7).Connection = Me.Connection
            Me._commandCollection(7).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where (Identifiant_org_signataire=@Identifi"& _ 
                "ant_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" and type_Identifiant_org_signataire <>'RO' )"
            Me._commandCollection(7).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(7).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(8) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(8).Connection = Me.Connection
            Me._commandCollection(8).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where (indicateur_convention_groupée='1'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"a"& _ 
                "nd type_Identifiant_org_signataire ='RO'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Identifiant_org_signataire=@Identi"& _ 
                "fiant_org_signataire)"
            Me._commandCollection(8).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(8).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(9) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(9).Connection = Me.Connection
            Me._commandCollection(9).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where indicateur_convention_groupée='0'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"an"& _ 
                "d type_Identifiant_org_signataire ='RO'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Num_AMC=@Num_AMC"
            Me._commandCollection(9).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(9).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(10) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(10).Connection = Me.Connection
            Me._commandCollection(10).CommandText = "SELECT Code_action, Code_catégorie, Spécialité, Référence_de_convention, Message,"& _ 
                " Identifiant_org_signataire, Libellé_org_signataire, indicateur_convention_group"& _ 
                "ée, type_Identifiant_org_signataire, critère_secondaire, type_Accord, Num_AMC, l"& _ 
                "ibellé_Org_complémentaire, indic_desactivation_STS, Code_aiguillage_STS, usage_a"& _ 
                "ttestation_papier, Accepatation_DRE_Annulation, Acceptation_DRE_Rectification, I"& _ 
                "dentifiant_Opérateur_règlement, Code_routage, identifiant_hôte, nom_domaine FROM"& _ 
                " dbo.Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where indicateur_convention_groupée='0'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"an"& _ 
                "d type_Identifiant_org_signataire ='RO'"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)
            Me._commandCollection(10).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(11) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(11).Connection = Me.Connection
            Me._commandCollection(11).CommandText = "SELECT COUNT(*) FROM Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Identifiant_org_signata"& _ 
                "ire=@Identifiant_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and type_Identifiant_org_signataire=@type_Ident"& _ 
                "ifiant_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and critère_secondaire=@critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and type_Acco"& _ 
                "rd=@type_Accord"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Num_AMC=@Num_AMC"
            Me._commandCollection(11).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(11).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(12).Connection = Me.Connection
            Me._commandCollection(12).CommandText = "SELECT COUNT(*) FROM Convention_Table_Conventions"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Code_action=@Code_actio"& _ 
                "n "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Code_catégorie=@Code_catégorie "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Spécialité=@Spécialité"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Référen"& _ 
                "ce_de_convention=@Référence_de_convention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Message=@Message"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Identifiant"& _ 
                "_org_signataire=@Identifiant_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Libellé_org_signataire=@Libellé"& _ 
                "_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and indicateur_convention_groupée=@indicateur_convention_groupé"& _ 
                "e"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and type_Identifiant_org_signataire=@type_Identifiant_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and cri"& _ 
                "tère_secondaire=@critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and type_Accord=@type_Accord"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Num_AMC=@"& _ 
                "Num_AMC"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and libellé_Org_complémentaire=@libellé_Org_complémentaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and indic_d"& _ 
                "esactivation_STS=@indic_desactivation_STS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Code_aiguillage_STS=@Code_aiguill"& _ 
                "age_STS"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and usage_attestation_papier=@usage_attestation_papier"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Accepatatio"& _ 
                "n_DRE_Annulation=@Accepatation_DRE_Annulation"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Acceptation_DRE_Rectification"& _ 
                "=@Acceptation_DRE_Rectification"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Identifiant_Opérateur_règlement=@Identifian"& _ 
                "t_Opérateur_règlement"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Code_routage=@Code_routage"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and identifiant_hôte=@ide"& _ 
                "ntifiant_hôte"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and nom_domaine=@nom_domaine"
            Me._commandCollection(12).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_action", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_action", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_catégorie", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Référence_de_convention", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Référence_de_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Message", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Message", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indicateur_convention_groupée", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "indicateur_convention_groupée", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Identifiant_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Identifiant_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@type_Accord", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "type_Accord", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_AMC", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_AMC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Org_complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Org_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@indic_desactivation_STS", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "indic_desactivation_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_aiguillage_STS", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_aiguillage_STS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@usage_attestation_papier", Global.System.Data.SqlDbType.NVarChar, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "usage_attestation_papier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Accepatation_DRE_Annulation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Accepatation_DRE_Annulation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acceptation_DRE_Rectification", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Acceptation_DRE_Rectification", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Identifiant_Opérateur_règlement", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Identifiant_Opérateur_règlement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_routage", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_routage", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@identifiant_hôte", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "identifiant_hôte", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(12).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@nom_domaine", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "nom_domaine", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Convention_Table_ConventionsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable = New PharmaDataSet.Convention_Table_ConventionsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function FillBy_Identifiant_org_signataire(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable, ByVal Identifiant_org_signataire As String) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(3)
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Identifiant_org_signataire(ByVal Identifiant_org_signataire As String) As PharmaDataSet.Convention_Table_ConventionsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(3)
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            Dim dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable = New PharmaDataSet.Convention_Table_ConventionsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Composite(ByVal Identifiant_org_signataire As String, ByVal type_Identifiant_org_signataire As String, ByVal critère_secondaire As String, ByVal Num_AMC As String, ByVal type_Accord As String) As PharmaDataSet.Convention_Table_ConventionsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(4)
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(2).Value = CType(critère_secondaire,String)
            End If
            If (Num_AMC Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(3).Value = CType(Num_AMC,String)
            End If
            If (type_Accord Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(4).Value = CType(type_Accord,String)
            End If
            Dim dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable = New PharmaDataSet.Convention_Table_ConventionsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function PasRO_AvecIDsignataire_fill_avecType(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable, ByVal type_Identifiant_org_signataire As String, ByVal Identifiant_org_signataire As String) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(6)
            If (type_Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function PasRO_AvecIDsignataire_SansType_fill(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable, ByVal Identifiant_org_signataire As String) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(7)
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function RO_AvecRegroup_AvecIDsignataire_fill(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable, ByVal Identifiant_org_signataire As String) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(8)
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function RO_SansRegroup_AvecNumAMC_fill(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable, ByVal Num_AMC As String) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(9)
            If (Num_AMC Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Num_AMC,String)
            End If
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, false)>  _
        Public Overloads Overridable Function RO_SansRegroup_SansNumAMC_fill(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(10)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Convention_Table_ConventionsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Convention_Table_Conventions")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal Code_action As String,  _
                    ByVal Code_catégorie As String,  _
                    ByVal Spécialité As String,  _
                    ByVal Référence_de_convention As String,  _
                    ByVal Message As String,  _
                    ByVal Identifiant_org_signataire As String,  _
                    ByVal Libellé_org_signataire As String,  _
                    ByVal indicateur_convention_groupée As String,  _
                    ByVal type_Identifiant_org_signataire As String,  _
                    ByVal critère_secondaire As String,  _
                    ByVal type_Accord As String,  _
                    ByVal Num_AMC As String,  _
                    ByVal libellé_Org_complémentaire As String,  _
                    ByVal indic_desactivation_STS As String,  _
                    ByVal Code_aiguillage_STS As String,  _
                    ByVal usage_attestation_papier As String,  _
                    ByVal Accepatation_DRE_Annulation As String,  _
                    ByVal Acceptation_DRE_Rectification As String,  _
                    ByVal Identifiant_Opérateur_règlement As String,  _
                    ByVal Code_routage As String,  _
                    ByVal identifiant_hôte As String,  _
                    ByVal nom_domaine As String) As Integer
            If (Code_action Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Code_action,String)
            End If
            If (Code_catégorie Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Code_catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Référence_de_convention Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Référence_de_convention,String)
            End If
            If (Message Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(Message,String)
            End If
            If (Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(Libellé_org_signataire,String)
            End If
            If (indicateur_convention_groupée Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(indicateur_convention_groupée,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(critère_secondaire,String)
            End If
            If (type_Accord Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(type_Accord,String)
            End If
            If (Num_AMC Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(Num_AMC,String)
            End If
            If (libellé_Org_complémentaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(libellé_Org_complémentaire,String)
            End If
            If (indic_desactivation_STS Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(indic_desactivation_STS,String)
            End If
            If (Code_aiguillage_STS Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(Code_aiguillage_STS,String)
            End If
            If (usage_attestation_papier Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(usage_attestation_papier,String)
            End If
            If (Accepatation_DRE_Annulation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(16).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(16).Value = CType(Accepatation_DRE_Annulation,String)
            End If
            If (Acceptation_DRE_Rectification Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(17).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(17).Value = CType(Acceptation_DRE_Rectification,String)
            End If
            If (Identifiant_Opérateur_règlement Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(18).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(18).Value = CType(Identifiant_Opérateur_règlement,String)
            End If
            If (Code_routage Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(19).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(19).Value = CType(Code_routage,String)
            End If
            If (identifiant_hôte Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(20).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(20).Value = CType(identifiant_hôte,String)
            End If
            If (nom_domaine Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(21).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(21).Value = CType(nom_domaine,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_By_Composite(ByVal Identifiant_org_signataire As String, ByVal type_Identifiant_org_signataire As String, ByVal critère_secondaire As String, ByVal type_Accord As String, ByVal Num_AMC As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Identifiant_org_signataire Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(critère_secondaire,String)
            End If
            If (type_Accord Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(type_Accord,String)
            End If
            If (Num_AMC Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(Num_AMC,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete1( _
                    ByVal Code_action As String,  _
                    ByVal Code_catégorie As String,  _
                    ByVal Spécialité As String,  _
                    ByVal Référence_de_convention As String,  _
                    ByVal Message As String,  _
                    ByVal Identifiant_org_signataire As String,  _
                    ByVal Libellé_org_signataire As String,  _
                    ByVal indicateur_convention_groupée As String,  _
                    ByVal type_Identifiant_org_signataire As String,  _
                    ByVal critère_secondaire As String,  _
                    ByVal type_Accord As String,  _
                    ByVal Num_AMC As String,  _
                    ByVal libellé_Org_complémentaire As String,  _
                    ByVal indic_desactivation_STS As String,  _
                    ByVal Code_aiguillage_STS As String,  _
                    ByVal usage_attestation_papier As String,  _
                    ByVal Accepatation_DRE_Annulation As String,  _
                    ByVal Acceptation_DRE_Rectification As String,  _
                    ByVal Identifiant_Opérateur_règlement As String,  _
                    ByVal Code_routage As String,  _
                    ByVal identifiant_hôte As String,  _
                    ByVal nom_domaine As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (Code_action Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Code_action,String)
            End If
            If (Code_catégorie Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Code_catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Référence_de_convention Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Référence_de_convention,String)
            End If
            If (Message Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(Message,String)
            End If
            If (Identifiant_org_signataire Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(Libellé_org_signataire,String)
            End If
            If (indicateur_convention_groupée Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(indicateur_convention_groupée,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(critère_secondaire,String)
            End If
            If (type_Accord Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(type_Accord,String)
            End If
            If (Num_AMC Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(Num_AMC,String)
            End If
            If (libellé_Org_complémentaire Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(libellé_Org_complémentaire,String)
            End If
            If (indic_desactivation_STS Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(indic_desactivation_STS,String)
            End If
            If (Code_aiguillage_STS Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(Code_aiguillage_STS,String)
            End If
            If (usage_attestation_papier Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(usage_attestation_papier,String)
            End If
            If (Accepatation_DRE_Annulation Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(Accepatation_DRE_Annulation,String)
            End If
            If (Acceptation_DRE_Rectification Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(Acceptation_DRE_Rectification,String)
            End If
            If (Identifiant_Opérateur_règlement Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(Identifiant_Opérateur_règlement,String)
            End If
            If (Code_routage Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(Code_routage,String)
            End If
            If (identifiant_hôte Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(identifiant_hôte,String)
            End If
            If (nom_domaine Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(nom_domaine,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1( _
                    ByVal Code_action As String,  _
                    ByVal Code_catégorie As String,  _
                    ByVal Spécialité As String,  _
                    ByVal Référence_de_convention As String,  _
                    ByVal Message As String,  _
                    ByVal Identifiant_org_signataire As String,  _
                    ByVal Libellé_org_signataire As String,  _
                    ByVal indicateur_convention_groupée As String,  _
                    ByVal type_Identifiant_org_signataire As String,  _
                    ByVal critère_secondaire As String,  _
                    ByVal type_Accord As String,  _
                    ByVal Num_AMC As String,  _
                    ByVal libellé_Org_complémentaire As String,  _
                    ByVal indic_desactivation_STS As String,  _
                    ByVal Code_aiguillage_STS As String,  _
                    ByVal usage_attestation_papier As String,  _
                    ByVal Accepatation_DRE_Annulation As String,  _
                    ByVal Acceptation_DRE_Rectification As String,  _
                    ByVal Identifiant_Opérateur_règlement As String,  _
                    ByVal Code_routage As String,  _
                    ByVal identifiant_hôte As String,  _
                    ByVal nom_domaine As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (Code_action Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Code_action,String)
            End If
            If (Code_catégorie Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Code_catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Référence_de_convention Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Référence_de_convention,String)
            End If
            If (Message Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(Message,String)
            End If
            If (Identifiant_org_signataire Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(Libellé_org_signataire,String)
            End If
            If (indicateur_convention_groupée Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(indicateur_convention_groupée,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(critère_secondaire,String)
            End If
            If (type_Accord Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(type_Accord,String)
            End If
            If (Num_AMC Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(Num_AMC,String)
            End If
            If (libellé_Org_complémentaire Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(libellé_Org_complémentaire,String)
            End If
            If (indic_desactivation_STS Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(indic_desactivation_STS,String)
            End If
            If (Code_aiguillage_STS Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(Code_aiguillage_STS,String)
            End If
            If (usage_attestation_papier Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(usage_attestation_papier,String)
            End If
            If (Accepatation_DRE_Annulation Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(Accepatation_DRE_Annulation,String)
            End If
            If (Acceptation_DRE_Rectification Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(Acceptation_DRE_Rectification,String)
            End If
            If (Identifiant_Opérateur_règlement Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(Identifiant_Opérateur_règlement,String)
            End If
            If (Code_routage Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(Code_routage,String)
            End If
            If (identifiant_hôte Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(identifiant_hôte,String)
            End If
            If (nom_domaine Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(nom_domaine,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Count_By_Composite(ByVal Identifiant_org_signataire As String, ByVal type_Identifiant_org_signataire As String, ByVal critère_secondaire As String, ByVal type_Accord As String, ByVal Num_AMC As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(11)
            If (Identifiant_org_signataire Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Identifiant_org_signataire,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(critère_secondaire,String)
            End If
            If (type_Accord Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(type_Accord,String)
            End If
            If (Num_AMC Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(Num_AMC,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectCount_by_all( _
                    ByVal Code_action As String,  _
                    ByVal Code_catégorie As String,  _
                    ByVal Spécialité As String,  _
                    ByVal Référence_de_convention As String,  _
                    ByVal Message As String,  _
                    ByVal Identifiant_org_signataire As String,  _
                    ByVal Libellé_org_signataire As String,  _
                    ByVal indicateur_convention_groupée As String,  _
                    ByVal type_Identifiant_org_signataire As String,  _
                    ByVal critère_secondaire As String,  _
                    ByVal type_Accord As String,  _
                    ByVal Num_AMC As String,  _
                    ByVal libellé_Org_complémentaire As String,  _
                    ByVal indic_desactivation_STS As String,  _
                    ByVal Code_aiguillage_STS As String,  _
                    ByVal usage_attestation_papier As String,  _
                    ByVal Accepatation_DRE_Annulation As String,  _
                    ByVal Acceptation_DRE_Rectification As String,  _
                    ByVal Identifiant_Opérateur_règlement As String,  _
                    ByVal Code_routage As String,  _
                    ByVal identifiant_hôte As String,  _
                    ByVal nom_domaine As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(12)
            If (Code_action Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Code_action,String)
            End If
            If (Code_catégorie Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Code_catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Référence_de_convention Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Référence_de_convention,String)
            End If
            If (Message Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(Message,String)
            End If
            If (Identifiant_org_signataire Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Identifiant_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(Libellé_org_signataire,String)
            End If
            If (indicateur_convention_groupée Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(indicateur_convention_groupée,String)
            End If
            If (type_Identifiant_org_signataire Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(type_Identifiant_org_signataire,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(critère_secondaire,String)
            End If
            If (type_Accord Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(type_Accord,String)
            End If
            If (Num_AMC Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(Num_AMC,String)
            End If
            If (libellé_Org_complémentaire Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(libellé_Org_complémentaire,String)
            End If
            If (indic_desactivation_STS Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(indic_desactivation_STS,String)
            End If
            If (Code_aiguillage_STS Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(Code_aiguillage_STS,String)
            End If
            If (usage_attestation_papier Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(usage_attestation_papier,String)
            End If
            If (Accepatation_DRE_Annulation Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(Accepatation_DRE_Annulation,String)
            End If
            If (Acceptation_DRE_Rectification Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(Acceptation_DRE_Rectification,String)
            End If
            If (Identifiant_Opérateur_règlement Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(Identifiant_Opérateur_règlement,String)
            End If
            If (Code_routage Is Nothing) Then
                command.Parameters(19).Value = Global.System.DBNull.Value
            Else
                command.Parameters(19).Value = CType(Code_routage,String)
            End If
            If (identifiant_hôte Is Nothing) Then
                command.Parameters(20).Value = Global.System.DBNull.Value
            Else
                command.Parameters(20).Value = CType(identifiant_hôte,String)
            End If
            If (nom_domaine Is Nothing) Then
                command.Parameters(21).Value = Global.System.DBNull.Value
            Else
                command.Parameters(21).Value = CType(nom_domaine,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Convention_Table_RegroupementsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Convention_Table_Regroupements"
            tableMapping.ColumnMappings.Add("Action", "Action")
            tableMapping.ColumnMappings.Add("catégorie", "catégorie")
            tableMapping.ColumnMappings.Add("Spécialité", "Spécialité")
            tableMapping.ColumnMappings.Add("Num_Org_Complémentaire", "Num_Org_Complémentaire")
            tableMapping.ColumnMappings.Add("libellé_organisme_complémentaire", "libellé_organisme_complémentaire")
            tableMapping.ColumnMappings.Add("Type_convention", "Type_convention")
            tableMapping.ColumnMappings.Add("libellé_Type_convention", "libellé_Type_convention")
            tableMapping.ColumnMappings.Add("critère_secondaire", "critère_secondaire")
            tableMapping.ColumnMappings.Add("Id_org_signataire", "Id_org_signataire")
            tableMapping.ColumnMappings.Add("Libellé_org_signataire", "Libellé_org_signataire")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[Convention_Table_Regroupements] ([Action], [catégorie], [Spéci"& _ 
                "alité], [Num_Org_Complémentaire], [libellé_organisme_complémentaire], [Type_conv"& _ 
                "ention], [libellé_Type_convention], [critère_secondaire], [Id_org_signataire], ["& _ 
                "Libellé_org_signataire]) VALUES (@Action, @catégorie, @Spécialité, @Num_Org_Comp"& _ 
                "lémentaire, @libellé_organisme_complémentaire, @Type_convention, @libellé_Type_c"& _ 
                "onvention, @critère_secondaire, @Id_org_signataire, @Libellé_org_signataire)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Action", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Action", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@catégorie", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "catégorie", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_organisme_complémentaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_organisme_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type_convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Type_convention", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(6) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Action, catégorie, Spécialité, Num_Org_Complémentaire, libellé_organisme_c"& _ 
                "omplémentaire, Type_convention, libellé_Type_convention, critère_secondaire, Id_"& _ 
                "org_signataire, Libellé_org_signataire FROM dbo.Convention_Table_Regroupements"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE   [dbo].[Convention_Table_Regroupements]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Num_Org_Complémentaire=@N"& _ 
                "um_Org_Complémentaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Type_convention=@Type_convention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and critère_seconda"& _ 
                "ire=@critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Id_org_signataire=@Id_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type_convention", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "DELETE   [dbo].[Convention_Table_Regroupements]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Action=@Action and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"catég"& _ 
                "orie =@catégorie and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Spécialité =@Spécialité and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Num_Org_Complémentaire =@Nu"& _ 
                "m_Org_Complémentaire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" libellé_organisme_complémentaire =@libellé_organisme_"& _ 
                "complémentaire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Type_convention =@Type_convention and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" libellé_Type_conven"& _ 
                "tion =@libellé_Type_convention and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" critère_secondaire =@critère_secondaire and"& _ 
                ""&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Id_org_signataire =@Id_org_signataire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Libellé_org_signataire =@Libellé_"& _ 
                "org_signataire "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Action", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Action", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "catégorie", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_organisme_complémentaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_organisme_complémentaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type_convention", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Type_convention", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Type_convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT Action, catégorie, Spécialité, Num_Org_Complémentaire, libellé_organisme_c"& _ 
                "omplémentaire, Type_convention, libellé_Type_convention, critère_secondaire, Id_"& _ 
                "org_signataire, Libellé_org_signataire FROM dbo.Convention_Table_Regroupements"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                "where Num_Org_Complémentaire=@Num_Org_Complémentaire"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(4).Connection = Me.Connection
            Me._commandCollection(4).CommandText = "SELECT COUNT(*) FROM Convention_Table_Regroupements"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Num_Org_Complémentair"& _ 
                "e=@Num_Org_Complémentaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Type_convention=@Type_convention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and critère_sec"& _ 
                "ondaire=@critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Id_org_signataire=@Id_org_signataire"
            Me._commandCollection(4).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type_convention", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(4).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(5).Connection = Me.Connection
            Me._commandCollection(5).CommandText = "SELECT COUNT(*) FROM Convention_Table_Regroupements"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Action=@Action"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and c"& _ 
                "atégorie=@catégorie"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Spécialité=@Spécialité"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Num_Org_Complémentaire=@Num"& _ 
                "_Org_Complémentaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and libellé_organisme_complémentaire=@libellé_organisme_com"& _ 
                "plémentaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Type_convention=@Type_convention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and libellé_Type_convention=@"& _ 
                "libellé_Type_convention"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and critère_secondaire=@critère_secondaire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Id_org_"& _ 
                "signataire=@Id_org_signataire"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"and Libellé_org_signataire=@Libellé_org_signatair"& _ 
                "e"
            Me._commandCollection(5).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Action", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Action", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "catégorie", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_organisme_complémentaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_organisme_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type_convention", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Type_convention", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(5).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(6).Connection = Me.Connection
            Me._commandCollection(6).CommandText = "UPDATE    Convention_Table_Regroupements"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"SET              Action =@in_Action,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" "& _ 
                "catégorie =@in_catégorie ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Spécialité =@in_Spécialité ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Num_Org_Complémentai"& _ 
                "re =@in_Num_Org_Complémentaire ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" libellé_organisme_complémentaire =@in_libellé"& _ 
                "_organisme_complémentaire ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Type_convention =@in_Type_convention ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" libellé_T"& _ 
                "ype_convention =@in_libellé_Type_convention ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" critère_secondaire =@in_critère_"& _ 
                "secondaire ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Id_org_signataire =@in_Id_org_signataire ,"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Libellé_org_signatai"& _ 
                "re =@in_Libellé_org_signataire "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"catégorie =@catégorie and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Spécialité ="& _ 
                "@Spécialité and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Num_Org_Complémentaire =@Num_Org_Complémentaire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" libellé_"& _ 
                "organisme_complémentaire =@libellé_organisme_complémentaire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Type_conventio"& _ 
                "n =@Type_convention and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" libellé_Type_convention =@libellé_Type_convention and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" critère_secondaire =@critère_secondaire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Id_org_signataire =@Id_org_signa"& _ 
                "taire and"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Libellé_org_signataire =@Libellé_org_signataire "
            Me._commandCollection(6).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_Action", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Action", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "catégorie", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_libellé_organisme_complémentaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_organisme_complémentaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_Type_convention", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_libellé_Type_convention", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Type_convention", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@in_Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@catégorie", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "catégorie", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Spécialité", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Spécialité", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Org_Complémentaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Org_Complémentaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_organisme_complémentaire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_organisme_complémentaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Type_convention", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "Type_convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@libellé_Type_convention", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "libellé_Type_convention", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@critère_secondaire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "critère_secondaire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Id_org_signataire", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Id_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
            Me._commandCollection(6).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_org_signataire", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_org_signataire", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.Convention_Table_RegroupementsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.Convention_Table_RegroupementsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.Convention_Table_RegroupementsDataTable = New PharmaDataSet.Convention_Table_RegroupementsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Num_Org_Complémentaire(ByVal Num_Org_Complémentaire As String) As PharmaDataSet.Convention_Table_RegroupementsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(3)
            If (Num_Org_Complémentaire Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Num_Org_Complémentaire,String)
            End If
            Dim dataTable As PharmaDataSet.Convention_Table_RegroupementsDataTable = New PharmaDataSet.Convention_Table_RegroupementsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.Convention_Table_RegroupementsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Convention_Table_Regroupements")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Action As String, ByVal catégorie As String, ByVal Spécialité As String, ByVal Num_Org_Complémentaire As String, ByVal libellé_organisme_complémentaire As String, ByVal Type_convention As String, ByVal libellé_Type_convention As String, ByVal critère_secondaire As String, ByVal Id_org_signataire As String, ByVal Libellé_org_signataire As String) As Integer
            If (Action Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Action,String)
            End If
            If (catégorie Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Num_Org_Complémentaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Num_Org_Complémentaire,String)
            End If
            If (libellé_organisme_complémentaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(libellé_organisme_complémentaire,String)
            End If
            If (Type_convention Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Type_convention,String)
            End If
            If (libellé_Type_convention Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(libellé_Type_convention,String)
            End If
            If (critère_secondaire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(critère_secondaire,String)
            End If
            If (Id_org_signataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(Id_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(Libellé_org_signataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_by_Composite(ByVal Num_Org_Complémentaire As String, ByVal Type_convention As String, ByVal critère_secondaire As String, ByVal Id_org_signataire As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Num_Org_Complémentaire Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Org_Complémentaire,String)
            End If
            If (Type_convention Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Type_convention,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(critère_secondaire,String)
            End If
            If (Id_org_signataire Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Id_org_signataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function Delete_ligne(ByVal Action As String, ByVal catégorie As String, ByVal Spécialité As String, ByVal Num_Org_Complémentaire As String, ByVal libellé_organisme_complémentaire As String, ByVal Type_convention As String, ByVal libellé_Type_convention As String, ByVal critère_secondaire As String, ByVal Id_org_signataire As String, ByVal Libellé_org_signataire As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (Action Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Action,String)
            End If
            If (catégorie Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Num_Org_Complémentaire Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Num_Org_Complémentaire,String)
            End If
            If (libellé_organisme_complémentaire Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(libellé_organisme_complémentaire,String)
            End If
            If (Type_convention Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Type_convention,String)
            End If
            If (libellé_Type_convention Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(libellé_Type_convention,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(critère_secondaire,String)
            End If
            If (Id_org_signataire Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(Id_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(Libellé_org_signataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Count_By_Composite(ByVal Num_Org_Complémentaire As String, ByVal Type_convention As String, ByVal critère_secondaire As String, ByVal Id_org_signataire As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(4)
            If (Num_Org_Complémentaire Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Num_Org_Complémentaire,String)
            End If
            If (Type_convention Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(Type_convention,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(critère_secondaire,String)
            End If
            If (Id_org_signataire Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Id_org_signataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function selectcount_by_all(ByVal Action As String, ByVal catégorie As String, ByVal Spécialité As String, ByVal Num_Org_Complémentaire As String, ByVal libellé_organisme_complémentaire As String, ByVal Type_convention As String, ByVal libellé_Type_convention As String, ByVal critère_secondaire As String, ByVal Id_org_signataire As String, ByVal Libellé_org_signataire As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(5)
            If (Action Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Action,String)
            End If
            If (catégorie Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(Spécialité,String)
            End If
            If (Num_Org_Complémentaire Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Num_Org_Complémentaire,String)
            End If
            If (libellé_organisme_complémentaire Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(libellé_organisme_complémentaire,String)
            End If
            If (Type_convention Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(Type_convention,String)
            End If
            If (libellé_Type_convention Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(libellé_Type_convention,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(critère_secondaire,String)
            End If
            If (Id_org_signataire Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(Id_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(Libellé_org_signataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_ligne( _
                    ByVal in_Action As String,  _
                    ByVal in_catégorie As String,  _
                    ByVal in_Spécialité As String,  _
                    ByVal in_Num_Org_Complémentaire As String,  _
                    ByVal in_libellé_organisme_complémentaire As String,  _
                    ByVal in_Type_convention As String,  _
                    ByVal in_libellé_Type_convention As String,  _
                    ByVal in_critère_secondaire As String,  _
                    ByVal in_Id_org_signataire As String,  _
                    ByVal in_Libellé_org_signataire As String,  _
                    ByVal catégorie As String,  _
                    ByVal Spécialité As String,  _
                    ByVal Num_Org_Complémentaire As String,  _
                    ByVal libellé_organisme_complémentaire As String,  _
                    ByVal Type_convention As String,  _
                    ByVal libellé_Type_convention As String,  _
                    ByVal critère_secondaire As String,  _
                    ByVal Id_org_signataire As String,  _
                    ByVal Libellé_org_signataire As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(6)
            If (in_Action Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(in_Action,String)
            End If
            If (in_catégorie Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(in_catégorie,String)
            End If
            If (in_Spécialité Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(in_Spécialité,String)
            End If
            If (in_Num_Org_Complémentaire Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(in_Num_Org_Complémentaire,String)
            End If
            If (in_libellé_organisme_complémentaire Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(in_libellé_organisme_complémentaire,String)
            End If
            If (in_Type_convention Is Nothing) Then
                command.Parameters(5).Value = Global.System.DBNull.Value
            Else
                command.Parameters(5).Value = CType(in_Type_convention,String)
            End If
            If (in_libellé_Type_convention Is Nothing) Then
                command.Parameters(6).Value = Global.System.DBNull.Value
            Else
                command.Parameters(6).Value = CType(in_libellé_Type_convention,String)
            End If
            If (in_critère_secondaire Is Nothing) Then
                command.Parameters(7).Value = Global.System.DBNull.Value
            Else
                command.Parameters(7).Value = CType(in_critère_secondaire,String)
            End If
            If (in_Id_org_signataire Is Nothing) Then
                command.Parameters(8).Value = Global.System.DBNull.Value
            Else
                command.Parameters(8).Value = CType(in_Id_org_signataire,String)
            End If
            If (in_Libellé_org_signataire Is Nothing) Then
                command.Parameters(9).Value = Global.System.DBNull.Value
            Else
                command.Parameters(9).Value = CType(in_Libellé_org_signataire,String)
            End If
            If (catégorie Is Nothing) Then
                command.Parameters(10).Value = Global.System.DBNull.Value
            Else
                command.Parameters(10).Value = CType(catégorie,String)
            End If
            If (Spécialité Is Nothing) Then
                command.Parameters(11).Value = Global.System.DBNull.Value
            Else
                command.Parameters(11).Value = CType(Spécialité,String)
            End If
            If (Num_Org_Complémentaire Is Nothing) Then
                command.Parameters(12).Value = Global.System.DBNull.Value
            Else
                command.Parameters(12).Value = CType(Num_Org_Complémentaire,String)
            End If
            If (libellé_organisme_complémentaire Is Nothing) Then
                command.Parameters(13).Value = Global.System.DBNull.Value
            Else
                command.Parameters(13).Value = CType(libellé_organisme_complémentaire,String)
            End If
            If (Type_convention Is Nothing) Then
                command.Parameters(14).Value = Global.System.DBNull.Value
            Else
                command.Parameters(14).Value = CType(Type_convention,String)
            End If
            If (libellé_Type_convention Is Nothing) Then
                command.Parameters(15).Value = Global.System.DBNull.Value
            Else
                command.Parameters(15).Value = CType(libellé_Type_convention,String)
            End If
            If (critère_secondaire Is Nothing) Then
                command.Parameters(16).Value = Global.System.DBNull.Value
            Else
                command.Parameters(16).Value = CType(critère_secondaire,String)
            End If
            If (Id_org_signataire Is Nothing) Then
                command.Parameters(17).Value = Global.System.DBNull.Value
            Else
                command.Parameters(17).Value = CType(Id_org_signataire,String)
            End If
            If (Libellé_org_signataire Is Nothing) Then
                command.Parameters(18).Value = Global.System.DBNull.Value
            Else
                command.Parameters(18).Value = CType(Libellé_org_signataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Taux_CodeRégimeTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Taux/CodeRégime"
            tableMapping.ColumnMappings.Add("CodeRégime", "CodeRégime")
            tableMapping.ColumnMappings.Add("CodeActe", "CodeActe")
            tableMapping.ColumnMappings.Add("Taux", "Taux")
            tableMapping.ColumnMappings.Add("DateMin", "DateMin")
            tableMapping.ColumnMappings.Add("DateMax", "DateMax")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Taux/CodeRégime] ([CodeRégime], [CodeActe], [Taux], [DateMax], [Date"& _ 
                "Min]) VALUES (@CodeRégime, @CodeActe, @Taux, @DateMax, @DateMin)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Taux", Global.System.Data.SqlDbType.Float, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Taux", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMax", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMax", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CodeRégime, CodeActe, Taux, DateMax, DateMin FROM [Taux/CodeRégime]"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Taux, DateMax, DateMin FROM [Taux/CodeRégime] WHERE (CodeRégime = @CodeRég"& _ 
                "ime) AND (CodeActe = @CodeActe)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (CAST(DateMax AS int) >= @Date) "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (CAST"& _ 
                "(DateMin AS int) <= @Date)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeRégime", Global.System.Data.SqlDbType.NVarChar, 2, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeRégime", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet._Taux_CodeRégimeDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet._Taux_CodeRégimeDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet._Taux_CodeRégimeDataTable = New PharmaDataSet._Taux_CodeRégimeDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet._Taux_CodeRégimeDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Taux/CodeRégime")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CodeRégime As String, ByVal CodeActe As String, ByVal Taux As Double, ByVal DateMax As String, ByVal DateMin As String) As Integer
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CodeActe Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeActe")
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CodeActe,String)
            End If
            Me.Adapter.InsertCommand.Parameters(2).Value = CType(Taux,Double)
            If (DateMax Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(DateMax,String)
            End If
            If (DateMin Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(DateMin,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Taux(ByVal CodeRégime As String, ByVal CodeActe As String, ByVal _Date As Integer) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (CodeRégime Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeRégime")
            Else
                command.Parameters(0).Value = CType(CodeRégime,String)
            End If
            If (CodeActe Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeActe")
            Else
                command.Parameters(1).Value = CType(CodeActe,String)
            End If
            command.Parameters(2).Value = CType(_Date,Integer)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Taux_CodeSituationTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Taux/CodeSituation"
            tableMapping.ColumnMappings.Add("CodeSituation", "CodeSituation")
            tableMapping.ColumnMappings.Add("CodeActe", "CodeActe")
            tableMapping.ColumnMappings.Add("Taux", "Taux")
            tableMapping.ColumnMappings.Add("DateMin", "DateMin")
            tableMapping.ColumnMappings.Add("DateMax", "DateMax")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Taux/CodeSituation] ([CodeSituation], [CodeActe], [Taux], [DateMax],"& _ 
                " [DateMin]) VALUES (@CodeSituation, @CodeActe, @Taux, @DateMax, @DateMin)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeSituation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSituation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Taux", Global.System.Data.SqlDbType.Float, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Taux", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMax", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMax", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DateMin", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DateMin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CodeSituation, CodeActe, Taux, DateMax, DateMin FROM [Taux/CodeSituation]"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Taux, DateMax, DateMin FROM [Taux/CodeSituation] WHERE (CodeSituation = @C"& _ 
                "odeSituation) AND (CodeActe = @CodeActe)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"AND (CAST(DateMax AS int) >= @Date) "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)& _ 
                "AND (CAST(DateMin AS int) <= @Date)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeSituation", Global.System.Data.SqlDbType.NVarChar, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeSituation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodeActe", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "CodeActe", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet._Taux_CodeSituationDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet._Taux_CodeSituationDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet._Taux_CodeSituationDataTable = New PharmaDataSet._Taux_CodeSituationDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet._Taux_CodeSituationDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Taux/CodeSituation")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CodeSituation As String, ByVal CodeActe As String, ByVal Taux As Double, ByVal DateMax As String, ByVal DateMin As String) As Integer
            If (CodeSituation Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeSituation")
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CodeSituation,String)
            End If
            If (CodeActe Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeActe")
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CodeActe,String)
            End If
            Me.Adapter.InsertCommand.Parameters(2).Value = CType(Taux,Double)
            If (DateMax Is Nothing) Then
                Throw New Global.System.ArgumentNullException("DateMax")
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(DateMax,String)
            End If
            If (DateMin Is Nothing) Then
                Throw New Global.System.ArgumentNullException("DateMin")
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(DateMin,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Taux(ByVal CodeSituation As String, ByVal CodeActe As String, ByVal _Date As Integer) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (CodeSituation Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeSituation")
            Else
                command.Parameters(0).Value = CType(CodeSituation,String)
            End If
            If (CodeActe Is Nothing) Then
                Throw New Global.System.ArgumentNullException("CodeActe")
            Else
                command.Parameters(1).Value = CType(CodeActe,String)
            End If
            command.Parameters(2).Value = CType(_Date,Integer)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class AR_PTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "AR_P"
            tableMapping.ColumnMappings.Add("Num", "Num")
            tableMapping.ColumnMappings.Add("From_", "From_")
            tableMapping.ColumnMappings.Add("To_", "To_")
            tableMapping.ColumnMappings.Add("Subject", "Subject")
            tableMapping.ColumnMappings.Add("In_Reply_To", "In_Reply_To")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[AR_P] ([Num], [From_], [To_], [Subject], [In_Reply_To]) VALUES"& _ 
                " (@Num, @From_, @To_, @Subject, @In_Reply_To)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@To_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "To_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@In_Reply_To", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "In_Reply_To", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Num, From_, To_, Subject, In_Reply_To FROM dbo.AR_P"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "INSERT INTO [dbo].[AR_P] ([Num], [From_], [To_], [Subject], [In_Reply_To]) VALUES"& _ 
                " (@Num, @From_, @To_, @Subject, @In_Reply_To)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@To_", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "To_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@In_Reply_To", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "In_Reply_To", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT MAX(Num) FROM AR_P"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.AR_PDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.AR_PDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.AR_PDataTable = New PharmaDataSet.AR_PDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.AR_PDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "AR_P")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Num As Global.System.Nullable(Of Decimal), ByVal From_ As String, ByVal To_ As String, ByVal Subject As String, ByVal In_Reply_To As String) As Integer
            If (Num.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Num.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (From_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(From_,String)
            End If
            If (To_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(To_,String)
            End If
            If (Subject Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Subject,String)
            End If
            If (In_Reply_To Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(In_Reply_To,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function Insert1(ByVal Num As Global.System.Nullable(Of Decimal), ByVal From_ As String, ByVal To_ As String, ByVal Subject As String, ByVal In_Reply_To As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (Num.HasValue = true) Then
                command.Parameters(0).Value = CType(Num.Value,Decimal)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (From_ Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(From_,String)
            End If
            If (To_ Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(To_,String)
            End If
            If (Subject Is Nothing) Then
                command.Parameters(3).Value = Global.System.DBNull.Value
            Else
                command.Parameters(3).Value = CType(Subject,String)
            End If
            If (In_Reply_To Is Nothing) Then
                command.Parameters(4).Value = Global.System.DBNull.Value
            Else
                command.Parameters(4).Value = CType(In_Reply_To,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Max_Num() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class Service_RejetTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "Service/Rejet"
            tableMapping.ColumnMappings.Add("Fichier", "Fichier")
            tableMapping.ColumnMappings.Add("From_", "From_")
            tableMapping.ColumnMappings.Add("To_", "To_")
            tableMapping.ColumnMappings.Add("Subject", "Subject")
            tableMapping.ColumnMappings.Add("In_Reply_To", "In_Reply_To")
            tableMapping.ColumnMappings.Add("Content_Description", "Content_Description")
            tableMapping.ColumnMappings.Add("Num", "Num")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [Service/Rejet] ([Fichier], [From_], [To_], [Subject], [In_Reply_To],"& _ 
                " [Content_Description], [Num]) VALUES (@Fichier, @From_, @To_, @Subject, @In_Rep"& _ 
                "ly_To, @Content_Description, @Num)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Fichier", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Fichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@From_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "From_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@To_", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "To_", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@In_Reply_To", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "In_Reply_To", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Content_Description", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Content_Description", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Fichier, From_, To_, Subject, In_Reply_To, Content_Description, Num FROM ["& _ 
                "Service/Rejet]"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Fichier, From_, To_, Subject, In_Reply_To, Content_Description, Num FROM ["& _ 
                "Service/Rejet]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Where In_Reply_To=@In_Reply_To"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@In_Reply_To", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "In_Reply_To", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Fichier, From_, To_, Subject, In_Reply_To, Content_Description, Num FROM ["& _ 
                "Service/Rejet]"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Where Num=@Num"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT     MAX(Num) AS Expr1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         [Service/Rejet]"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet._Service_RejetDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet._Service_RejetDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet._Service_RejetDataTable = New PharmaDataSet._Service_RejetDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_In_Reply_To(ByVal In_Reply_To As String) As PharmaDataSet._Service_RejetDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (In_Reply_To Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(In_Reply_To,String)
            End If
            Dim dataTable As PharmaDataSet._Service_RejetDataTable = New PharmaDataSet._Service_RejetDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Num(ByVal Num As Global.System.Nullable(Of Decimal)) As PharmaDataSet._Service_RejetDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (Num.HasValue = true) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Num.Value,Decimal)
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            Dim dataTable As PharmaDataSet._Service_RejetDataTable = New PharmaDataSet._Service_RejetDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet._Service_RejetDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "Service/Rejet")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Fichier As String, ByVal From_ As String, ByVal To_ As String, ByVal Subject As String, ByVal In_Reply_To As String, ByVal Content_Description As String, ByVal Num As Global.System.Nullable(Of Decimal)) As Integer
            If (Fichier Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Fichier,String)
            End If
            If (From_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(From_,String)
            End If
            If (To_ Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(To_,String)
            End If
            If (Subject Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Subject,String)
            End If
            If (In_Reply_To Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(In_Reply_To,String)
            End If
            If (Content_Description Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Content_Description,String)
            End If
            If (Num.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(Num.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function SelectMaxNum() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class RSP_LIGNE_REJETTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "RSP_LIGNE_REJET"
            tableMapping.ColumnMappings.Add("Num", "Num")
            tableMapping.ColumnMappings.Add("NumFacture", "NumFacture")
            tableMapping.ColumnMappings.Add("NumLot", "NumLot")
            tableMapping.ColumnMappings.Add("CODIFICATION", "CODIFICATION")
            tableMapping.ColumnMappings.Add("LIBELLE", "LIBELLE")
            tableMapping.ColumnMappings.Add("NIVEAU", "NIVEAU")
            tableMapping.ColumnMappings.Add("PART CONCERNE", "PART CONCERNE")
            tableMapping.ColumnMappings.Add("NATURE DE PRESTATION", "NATURE DE PRESTATION")
            tableMapping.ColumnMappings.Add("DATE DES SOINS", "DATE DES SOINS")
            tableMapping.ColumnMappings.Add("N° EXECUTANT", "N° EXECUTANT")
            tableMapping.ColumnMappings.Add("N° DE LIGNE", "N° DE LIGNE")
            tableMapping.ColumnMappings.Add("RANG DU REJET", "RANG DU REJET")
            tableMapping.ColumnMappings.Add("INFORMATION COMPLEMENTAIRE", "INFORMATION COMPLEMENTAIRE")
            tableMapping.ColumnMappings.Add("Acquitement", "Acquitement")
            tableMapping.ColumnMappings.Add("Org_emetteur", "Org_emetteur")
            tableMapping.ColumnMappings.Add("num_destinataire", "num_destinataire")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [RSP_LIGNE_REJET] ([Num], [NumFacture], [NumLot], [CODIFICATION], [LI"& _ 
                "BELLE], [NIVEAU], [PART CONCERNE], [NATURE DE PRESTATION], [DATE DES SOINS], [N°"& _ 
                " EXECUTANT], [N° DE LIGNE], [RANG DU REJET], [INFORMATION COMPLEMENTAIRE], [Acqu"& _ 
                "itement], [Org_emetteur], [num_destinataire]) VALUES (@Num, @NumFacture, @NumLot"& _ 
                ", @CODIFICATION, @LIBELLE, @NIVEAU, @PART_CONCERNE, @NATURE_DE_PRESTATION, @DATE"& _ 
                "_DES_SOINS, @p1, @p4, @RANG_DU_REJET, @INFORMATION_COMPLEMENTAIRE, @Acquitement,"& _ 
                " @Org_emetteur, @num_destinataire)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Num", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CODIFICATION", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CODIFICATION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@LIBELLE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "LIBELLE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NIVEAU", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NIVEAU", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@PART_CONCERNE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "PART CONCERNE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NATURE_DE_PRESTATION", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NATURE DE PRESTATION", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@DATE_DES_SOINS", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "DATE DES SOINS", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@p1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "N° EXECUTANT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@p4", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "N° DE LIGNE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@RANG_DU_REJET", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "RANG DU REJET", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@INFORMATION_COMPLEMENTAIRE", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "INFORMATION COMPLEMENTAIRE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acquitement", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Acquitement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Org_emetteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Org_emetteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@num_destinataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "num_destinataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Num, NumFacture, NumLot, CODIFICATION, LIBELLE, NIVEAU, [PART CONCERNE], ["& _ 
                "NATURE DE PRESTATION], [DATE DES SOINS], [N° EXECUTANT], [N° DE LIGNE], [RANG DU"& _ 
                " REJET], [INFORMATION COMPLEMENTAIRE], Acquitement, Org_emetteur, num_destinatai"& _ 
                "re FROM RSP_LIGNE_REJET"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Num, NumFacture, NumLot, CODIFICATION, LIBELLE, NIVEAU, [PART CONCERNE], ["& _ 
                "NATURE DE PRESTATION], [DATE DES SOINS], [N° EXECUTANT], [N° DE LIGNE], [RANG DU"& _ 
                " REJET], [INFORMATION COMPLEMENTAIRE], Acquitement, Org_emetteur, num_destinatai"& _ 
                "re FROM RSP_LIGNE_REJET WHERE (Acquitement = @Acquitement) AND (CAST([DATE DES S"& _ 
                "OINS] AS float) >= @date_soins_mini)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acquitement", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Acquitement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date_soins_mini", Global.System.Data.SqlDbType.Real, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT MAX(num) FROM RSP_LIGNE_REJET"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "UPDATE RSP_LIGNE_REJET"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"set Acquitement=@Acquitement"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"Where NumFacture =@NumFactu"& _ 
                "re"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Acquitement", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Acquitement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 9, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacture", Global.System.Data.DataRowVersion.Original, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.RSP_LIGNE_REJETDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.RSP_LIGNE_REJETDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.RSP_LIGNE_REJETDataTable = New PharmaDataSet.RSP_LIGNE_REJETDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Acquitement(ByVal Acquitement As Global.System.Nullable(Of Boolean), ByVal date_soins_mini As Single) As PharmaDataSet.RSP_LIGNE_REJETDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (Acquitement.HasValue = true) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Acquitement.Value,Boolean)
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            Me.Adapter.SelectCommand.Parameters(1).Value = CType(date_soins_mini,Single)
            Dim dataTable As PharmaDataSet.RSP_LIGNE_REJETDataTable = New PharmaDataSet.RSP_LIGNE_REJETDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.RSP_LIGNE_REJETDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "RSP_LIGNE_REJET")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert( _
                    ByVal Num As Global.System.Nullable(Of Decimal),  _
                    ByVal NumFacture As String,  _
                    ByVal NumLot As String,  _
                    ByVal CODIFICATION As String,  _
                    ByVal LIBELLE As String,  _
                    ByVal NIVEAU As String,  _
                    ByVal PART_CONCERNE As String,  _
                    ByVal NATURE_DE_PRESTATION As String,  _
                    ByVal DATE_DES_SOINS As String,  _
                    ByVal p1 As String,  _
                    ByVal p4 As String,  _
                    ByVal RANG_DU_REJET As String,  _
                    ByVal INFORMATION_COMPLEMENTAIRE As String,  _
                    ByVal Acquitement As Global.System.Nullable(Of Boolean),  _
                    ByVal Org_emetteur As String,  _
                    ByVal num_destinataire As String) As Integer
            If (Num.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Num.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (NumFacture Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(NumFacture,String)
            End If
            If (NumLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(NumLot,String)
            End If
            If (CODIFICATION Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(CODIFICATION,String)
            End If
            If (LIBELLE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(LIBELLE,String)
            End If
            If (NIVEAU Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(NIVEAU,String)
            End If
            If (PART_CONCERNE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(PART_CONCERNE,String)
            End If
            If (NATURE_DE_PRESTATION Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(NATURE_DE_PRESTATION,String)
            End If
            If (DATE_DES_SOINS Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(DATE_DES_SOINS,String)
            End If
            If (p1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(p1,String)
            End If
            If (p4 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(p4,String)
            End If
            If (RANG_DU_REJET Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(RANG_DU_REJET,String)
            End If
            If (INFORMATION_COMPLEMENTAIRE Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(INFORMATION_COMPLEMENTAIRE,String)
            End If
            If (Acquitement.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(Acquitement.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            End If
            If (Org_emetteur Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(14).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(14).Value = CType(Org_emetteur,String)
            End If
            If (num_destinataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(15).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(15).Value = CType(num_destinataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Max_num() As Global.System.Nullable(Of Decimal)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Decimal)
            Else
                Return New Global.System.Nullable(Of Decimal)(CType(returnValue,Decimal))
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Update, false)>  _
        Public Overloads Overridable Function Update_Acquitement(ByVal Acquitement As Global.System.Nullable(Of Boolean), ByVal NumFacture As String) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (Acquitement.HasValue = true) Then
                command.Parameters(0).Value = CType(Acquitement.Value,Boolean)
            Else
                command.Parameters(0).Value = Global.System.DBNull.Value
            End If
            If (NumFacture Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(NumFacture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class RSP_PaiementsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "RSP_Paiements"
            tableMapping.ColumnMappings.Add("Date", "Date")
            tableMapping.ColumnMappings.Add("Libellé_Ligne_1", "Libellé_Ligne_1")
            tableMapping.ColumnMappings.Add("Libellé_Ligne_2", "Libellé_Ligne_2")
            tableMapping.ColumnMappings.Add("Org_Payeur", "Org_Payeur")
            tableMapping.ColumnMappings.Add("Part", "Part")
            tableMapping.ColumnMappings.Add("Montant_Demandé", "Montant_Demandé")
            tableMapping.ColumnMappings.Add("Etat_Paiement", "Etat_Paiement")
            tableMapping.ColumnMappings.Add("Montant_Payé", "Montant_Payé")
            tableMapping.ColumnMappings.Add("NumFacture", "NumFacture")
            tableMapping.ColumnMappings.Add("NumLot", "NumLot")
            tableMapping.ColumnMappings.Add("Fichier", "Fichier")
            tableMapping.ColumnMappings.Add("Org_emetteur", "Org_emetteur")
            tableMapping.ColumnMappings.Add("num_destinataire", "num_destinataire")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [RSP_Paiements] ([Date], [Libellé_Ligne_1], [Libellé_Ligne_2], [Org_P"& _ 
                "ayeur], [Part], [Montant_Demandé], [Etat_Paiement], [Montant_Payé], [NumFacture]"& _ 
                ", [NumLot], [Fichier], [Org_emetteur], [num_destinataire]) VALUES (@Date, @Libel"& _ 
                "lé_Ligne_1, @Libellé_Ligne_2, @Org_Payeur, @Part, @Montant_Demandé, @Etat_Paieme"& _ 
                "nt, @Montant_Payé, @NumFacture, @NumLot, @Fichier, @Org_emetteur, @num_destinata"& _ 
                "ire)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_Ligne_1", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_Ligne_1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_Ligne_2", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_Ligne_2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Org_Payeur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Org_Payeur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Part", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Part", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Montant_Demandé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Montant_Demandé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Etat_Paiement", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Etat_Paiement", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Montant_Payé", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Montant_Payé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Fichier", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Fichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Org_emetteur", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Org_emetteur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@num_destinataire", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "num_destinataire", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Date, Libellé_Ligne_1, Libellé_Ligne_2, Org_Payeur, Part, Montant_Demandé,"& _ 
                " Etat_Paiement, Montant_Payé, NumFacture, NumLot, Fichier, Org_emetteur, num_des"& _ 
                "tinataire FROM RSP_Paiements"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT Date, Libellé_Ligne_1, Libellé_Ligne_2, Org_Payeur, Part, Montant_Demandé,"& _ 
                " Etat_Paiement, Montant_Payé, NumFacture, NumLot, Fichier, Org_emetteur, num_des"& _ 
                "tinataire FROM RSP_Paiements WHERE (Date = @date) AND (Libellé_Ligne_1 = @Libell"& _ 
                "é_Ligne_1) AND (Libellé_Ligne_2 = @Libellé_Ligne_2) AND (Org_Payeur = @Org_Payeu"& _ 
                "r)"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date", Global.System.Data.SqlDbType.NVarChar, 6, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_Ligne_1", Global.System.Data.SqlDbType.NVarChar, 32, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_Ligne_1", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Libellé_Ligne_2", Global.System.Data.SqlDbType.NVarChar, 32, Global.System.Data.ParameterDirection.Input, 0, 0, "Libellé_Ligne_2", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Org_Payeur", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Org_Payeur", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT     Date, Libellé_Ligne_1, Libellé_Ligne_2, Org_Payeur, SUM(CAST(Montant_P"& _ 
                "ayé AS float)) AS Montant, Org_emetteur"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM         RSP_Paiements"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"WHERE     ("& _ 
                "Etat_Paiement = 'P') AND (CAST(SUBSTRING(Date, 5, 2) + SUBSTRING(Date, 3, 2) + S"& _ 
                "UBSTRING(Date, 1, 2) AS float) >= @datemini)"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"GROUP BY Date, Libellé_Ligne_1, Li"& _ 
                "bellé_Ligne_2, Org_Payeur, Org_emetteur"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@datemini", Global.System.Data.SqlDbType.Real, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "SELECT Date, Libellé_Ligne_1, Libellé_Ligne_2, Org_Payeur, Part, Montant_Demandé,"& _ 
                " Etat_Paiement, Montant_Payé, NumFacture, NumLot, Fichier, Org_emetteur, num_des"& _ 
                "tinataire FROM RSP_Paiements WHERE (NumFacture = @NumFacture)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumFacture", Global.System.Data.SqlDbType.NVarChar, 9, Global.System.Data.ParameterDirection.Input, 0, 0, "NumFacture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.RSP_PaiementsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.RSP_PaiementsDataTable = New PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetData_détail_recap_paiements(ByVal _date As String, ByVal Libellé_Ligne_1 As String, ByVal Libellé_Ligne_2 As String, ByVal Org_Payeur As String) As PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (_date Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(_date,String)
            End If
            If (Libellé_Ligne_1 Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(Libellé_Ligne_1,String)
            End If
            If (Libellé_Ligne_2 Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(2).Value = CType(Libellé_Ligne_2,String)
            End If
            If (Org_Payeur Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(3).Value = CType(Org_Payeur,String)
            End If
            Dim dataTable As PharmaDataSet.RSP_PaiementsDataTable = New PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetData_Paiements(ByVal datemini As Single) As PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            Me.Adapter.SelectCommand.Parameters(0).Value = CType(datemini,Single)
            Dim dataTable As PharmaDataSet.RSP_PaiementsDataTable = New PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_NumFacture(ByVal NumFacture As String) As PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(3)
            If (NumFacture Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(NumFacture,String)
            End If
            Dim dataTable As PharmaDataSet.RSP_PaiementsDataTable = New PharmaDataSet.RSP_PaiementsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.RSP_PaiementsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "RSP_Paiements")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal _Date As String, ByVal Libellé_Ligne_1 As String, ByVal Libellé_Ligne_2 As String, ByVal Org_Payeur As String, ByVal Part As String, ByVal Montant_Demandé As String, ByVal Etat_Paiement As String, ByVal Montant_Payé As String, ByVal NumFacture As String, ByVal NumLot As String, ByVal Fichier As String, ByVal Org_emetteur As String, ByVal num_destinataire As String) As Integer
            If (_Date Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(_Date,String)
            End If
            If (Libellé_Ligne_1 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Libellé_Ligne_1,String)
            End If
            If (Libellé_Ligne_2 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Libellé_Ligne_2,String)
            End If
            If (Org_Payeur Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Org_Payeur,String)
            End If
            If (Part Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(Part,String)
            End If
            If (Montant_Demandé Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Montant_Demandé,String)
            End If
            If (Etat_Paiement Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(Etat_Paiement,String)
            End If
            If (Montant_Payé Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(Montant_Payé,String)
            End If
            If (NumFacture Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(NumFacture,String)
            End If
            If (NumLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(NumLot,String)
            End If
            If (Fichier Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(Fichier,String)
            End If
            If (Org_emetteur Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(Org_emetteur,String)
            End If
            If (num_destinataire Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(num_destinataire,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class LOI_DemandeTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "LOI_Demande"
            tableMapping.ColumnMappings.Add("date", "date")
            tableMapping.ColumnMappings.Add("heure", "heure")
            tableMapping.ColumnMappings.Add("ref_loi", "ref_loi")
            tableMapping.ColumnMappings.Add("code_resultat_incr_prec", "code_resultat_incr_prec")
            tableMapping.ColumnMappings.Add("Subject", "Subject")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[LOI_Demande] ([date], [heure], [ref_loi], [code_resultat_incr_"& _ 
                "prec], [Subject]) VALUES (@date, @heure, @ref_loi, @code_resultat_incr_prec, @Su"& _ 
                "bject)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@heure", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "heure", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ref_loi", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ref_loi", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@code_resultat_incr_prec", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "code_resultat_incr_prec", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT date, heure, ref_loi, code_resultat_incr_prec, Subject FROM dbo.LOI_Demand"& _ 
                "e"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT COUNT(*) FROM LOI_Demande"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where date=@the_date"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@the_date", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT COUNT(*) FROM LOI_Demande"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where Subject=@Subject"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Subject", Global.System.Data.SqlDbType.NVarChar, 2147483647, Global.System.Data.ParameterDirection.Input, 0, 0, "Subject", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.LOI_DemandeDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.LOI_DemandeDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.LOI_DemandeDataTable = New PharmaDataSet.LOI_DemandeDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.LOI_DemandeDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "LOI_Demande")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal _date As String, ByVal heure As String, ByVal ref_loi As String, ByVal code_resultat_incr_prec As String, ByVal Subject As String) As Integer
            If (_date Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(_date,String)
            End If
            If (heure Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(heure,String)
            End If
            If (ref_loi Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(ref_loi,String)
            End If
            If (code_resultat_incr_prec Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(code_resultat_incr_prec,String)
            End If
            If (Subject Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(Subject,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Count_By_Date(ByVal the_date As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            If (the_date Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(the_date,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_Count_By_Subject(ByVal Subject As String) As Global.System.Nullable(Of Integer)
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (Subject Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Subject,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return New Global.System.Nullable(Of Integer)
            Else
                Return New Global.System.Nullable(Of Integer)(CType(returnValue,Integer))
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class SCOR_PJTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "SCOR_PJ"
            tableMapping.ColumnMappings.Add("Fichier", "Fichier")
            tableMapping.ColumnMappings.Add("ID", "ID")
            tableMapping.ColumnMappings.Add("Statut_Transmission", "Statut_Transmission")
            tableMapping.ColumnMappings.Add("Num_Facture", "Num_Facture")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [SCOR_PJ] ([Fichier], [ID], [Statut_Transmission], [Num_Facture]) VAL"& _ 
                "UES (@Fichier, @ID, @Statut_Transmission, @Num_Facture)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Fichier", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Fichier", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ID", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ID", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Statut_Transmission", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Statut_Transmission", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Num_Facture", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Num_Facture", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Fichier, ID, Statut_Transmission, Num_Facture FROM SCOR_PJ"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.SCOR_PJDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.SCOR_PJDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.SCOR_PJDataTable = New PharmaDataSet.SCOR_PJDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.SCOR_PJDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "SCOR_PJ")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Fichier As String, ByVal ID As String, ByVal Statut_Transmission As String, ByVal Num_Facture As String) As Integer
            If (Fichier Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Fichier,String)
            End If
            If (ID Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(ID,String)
            End If
            If (Statut_Transmission Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Statut_Transmission,String)
            End If
            If (Num_Facture Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Num_Facture,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class SCOR_lotsTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "SCOR_lots"
            tableMapping.ColumnMappings.Add("EnTete", "EnTete")
            tableMapping.ColumnMappings.Add("NumLot", "NumLot")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[SCOR_lots] ([EnTete], [NumLot]) VALUES (@EnTete, @NumLot)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@EnTete", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "EnTete", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@NumLot", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "NumLot", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(0) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT EnTete, NumLot FROM dbo.SCOR_lots"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.SCOR_lotsDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.SCOR_lotsDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.SCOR_lotsDataTable = New PharmaDataSet.SCOR_lotsDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.SCOR_lotsDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "SCOR_lots")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal EnTete As String, ByVal NumLot As String) As Integer
            If (EnTete Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(EnTete,String)
            End If
            If (NumLot Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(NumLot,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "compatibilités_ codes_prestation_ qualité_bénéficiaire"
            tableMapping.ColumnMappings.Add("Code_Prestation", "Code_Prestation")
            tableMapping.ColumnMappings.Add("Assuré", "Assuré")
            tableMapping.ColumnMappings.Add("Ascendant", "Ascendant")
            tableMapping.ColumnMappings.Add("Conjoint", "Conjoint")
            tableMapping.ColumnMappings.Add("Conjoint_Divorcé", "Conjoint_Divorcé")
            tableMapping.ColumnMappings.Add("Concubin", "Concubin")
            tableMapping.ColumnMappings.Add("ConjointSéparé", "ConjointSéparé")
            tableMapping.ColumnMappings.Add("Enfant", "Enfant")
            tableMapping.ColumnMappings.Add("ConjointVeuf", "ConjointVeuf")
            tableMapping.ColumnMappings.Add("AgeMinMois", "AgeMinMois")
            tableMapping.ColumnMappings.Add("AgeMinAnnées", "AgeMinAnnées")
            tableMapping.ColumnMappings.Add("AgeMaxMois", "AgeMaxMois")
            tableMapping.ColumnMappings.Add("AgeMaxAnnées", "AgeMaxAnnées")
            tableMapping.ColumnMappings.Add("Autre_ayant_droit", "Autre_ayant_droit")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [compatibilités_ codes_prestation_ qualité_bénéficiaire] ([Code_Prest"& _ 
                "ation], [Assuré], [Ascendant], [Conjoint], [Conjoint_Divorcé], [Concubin], [Conj"& _ 
                "ointSéparé], [Enfant], [ConjointVeuf], [AgeMinMois], [AgeMinAnnées], [AgeMaxMois"& _ 
                "], [AgeMaxAnnées], [Autre_ayant_droit]) VALUES (@Code_Prestation, @Assuré, @Asce"& _ 
                "ndant, @Conjoint, @Conjoint_Divorcé, @Concubin, @ConjointSéparé, @Enfant, @Conjo"& _ 
                "intVeuf, @AgeMinMois, @AgeMinAnnées, @AgeMaxMois, @AgeMaxAnnées, @Autre_ayant_dr"& _ 
                "oit)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_Prestation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_Prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Ascendant", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Ascendant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Conjoint", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Conjoint", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Conjoint_Divorcé", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Conjoint_Divorcé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Concubin", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Concubin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ConjointSéparé", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ConjointSéparé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Enfant", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Enfant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ConjointVeuf", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ConjointVeuf", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMinMois", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMinMois", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMinAnnées", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMinAnnées", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMaxMois", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMaxMois", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMaxAnnées", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMaxAnnées", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Autre_ayant_droit", Global.System.Data.SqlDbType.Bit, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Autre_ayant_droit", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT Code_Prestation, Assuré, Ascendant, Conjoint, Conjoint_Divorcé, Concubin, "& _ 
                "ConjointSéparé, Enfant, ConjointVeuf, AgeMinMois, AgeMinAnnées, AgeMaxMois, AgeM"& _ 
                "axAnnées, Autre_ayant_droit FROM [compatibilités_ codes_prestation_ qualité_béné"& _ 
                "ficiaire]"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE FROM [compatibilités_ codes_prestation_ qualité_bénéficiaire]"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT Code_Prestation, Assuré, Ascendant, Conjoint, Conjoint_Divorcé, Concubin, "& _ 
                "ConjointSéparé, Enfant, ConjointVeuf, AgeMinMois, AgeMinAnnées, AgeMaxMois, AgeM"& _ 
                "axAnnées, Autre_ayant_droit FROM [compatibilités_ codes_prestation_ qualité_béné"& _ 
                "ficiaire] WHERE (Code_Prestation = @Code_Prestation)"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_Prestation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_Prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "INSERT INTO [dbo].[compatibilités_ codes_prestation_ qualité_bénéficiaire] ([Code"& _ 
                "_Prestation], [Assuré], [Ascendant], [Conjoint], [Conjoint_Divorcé], [Concubin],"& _ 
                " [ConjointSéparé], [Enfant], [ConjointVeuf],"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"[Autre_ayant_droit], [AgeMinMois],"& _ 
                " [AgeMinAnnées], [AgeMaxMois], [AgeMaxAnnées]) VALUES (@Code_Prestation, @Assuré"& _ 
                ", @Ascendant, @Conjoint, @Conjoint_Divorcé, @Concubin, @ConjointSéparé, @Enfant,"& _ 
                " @ConjointVeuf, @Autre_ayant_droit, @AgeMinMois, @AgeMinAnnées, @AgeMaxMois, @Ag"& _ 
                "eMaxAnnées)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Code_Prestation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "Code_Prestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Assuré", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Assuré", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Ascendant", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Ascendant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Conjoint", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Conjoint", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Conjoint_Divorcé", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Conjoint_Divorcé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Concubin", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Concubin", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ConjointSéparé", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ConjointSéparé", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Enfant", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Enfant", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ConjointVeuf", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "ConjointVeuf", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Autre_ayant_droit", Global.System.Data.SqlDbType.Bit, 1, Global.System.Data.ParameterDirection.Input, 0, 0, "Autre_ayant_droit", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMinMois", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMinMois", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMinAnnées", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMinAnnées", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMaxMois", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMaxMois", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@AgeMaxAnnées", Global.System.Data.SqlDbType.[Decimal], 9, Global.System.Data.ParameterDirection.Input, 18, 0, "AgeMaxAnnées", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable = New PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_Code_Prestation(ByVal Code_Prestation As String) As PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (Code_Prestation Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(Code_Prestation,String)
            End If
            Dim dataTable As PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable = New PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.compatibilités__codes_prestation__qualité_bénéficiaireDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "compatibilités_ codes_prestation_ qualité_bénéficiaire")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal Code_Prestation As String, ByVal Assuré As Global.System.Nullable(Of Boolean), ByVal Ascendant As Global.System.Nullable(Of Boolean), ByVal Conjoint As Global.System.Nullable(Of Boolean), ByVal Conjoint_Divorcé As Global.System.Nullable(Of Boolean), ByVal Concubin As Global.System.Nullable(Of Boolean), ByVal ConjointSéparé As Global.System.Nullable(Of Boolean), ByVal Enfant As Global.System.Nullable(Of Boolean), ByVal ConjointVeuf As Global.System.Nullable(Of Boolean), ByVal AgeMinMois As Global.System.Nullable(Of Decimal), ByVal AgeMinAnnées As Global.System.Nullable(Of Decimal), ByVal AgeMaxMois As Global.System.Nullable(Of Decimal), ByVal AgeMaxAnnées As Global.System.Nullable(Of Decimal), ByVal Autre_ayant_droit As Global.System.Nullable(Of Boolean)) As Integer
            If (Code_Prestation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(Code_Prestation,String)
            End If
            If (Assuré.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(Assuré.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Ascendant.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Ascendant.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (Conjoint.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Conjoint.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (Conjoint_Divorcé.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(Conjoint_Divorcé.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Concubin.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(5).Value = CType(Concubin.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (ConjointSéparé.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(6).Value = CType(ConjointSéparé.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (Enfant.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(7).Value = CType(Enfant.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(7).Value = Global.System.DBNull.Value
            End If
            If (ConjointVeuf.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(8).Value = CType(ConjointVeuf.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(8).Value = Global.System.DBNull.Value
            End If
            If (AgeMinMois.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(9).Value = CType(AgeMinMois.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(9).Value = Global.System.DBNull.Value
            End If
            If (AgeMinAnnées.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(10).Value = CType(AgeMinAnnées.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(10).Value = Global.System.DBNull.Value
            End If
            If (AgeMaxMois.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(11).Value = CType(AgeMaxMois.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (AgeMaxAnnées.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(12).Value = CType(AgeMaxAnnées.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (Autre_ayant_droit.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(13).Value = CType(Autre_ayant_droit.Value,Boolean)
            Else
                Me.Adapter.InsertCommand.Parameters(13).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function DeleteAll() As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function InsertQuery(ByVal Code_Prestation As String, ByVal Assuré As Global.System.Nullable(Of Boolean), ByVal Ascendant As Global.System.Nullable(Of Boolean), ByVal Conjoint As Global.System.Nullable(Of Boolean), ByVal Conjoint_Divorcé As Global.System.Nullable(Of Boolean), ByVal Concubin As Global.System.Nullable(Of Boolean), ByVal ConjointSéparé As Global.System.Nullable(Of Boolean), ByVal Enfant As Global.System.Nullable(Of Boolean), ByVal ConjointVeuf As Global.System.Nullable(Of Boolean), ByVal Autre_ayant_droit As Global.System.Nullable(Of Boolean), ByVal AgeMinMois As Global.System.Nullable(Of Decimal), ByVal AgeMinAnnées As Global.System.Nullable(Of Decimal), ByVal AgeMaxMois As Global.System.Nullable(Of Decimal), ByVal AgeMaxAnnées As Global.System.Nullable(Of Decimal)) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (Code_Prestation Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(Code_Prestation,String)
            End If
            If (Assuré.HasValue = true) Then
                command.Parameters(1).Value = CType(Assuré.Value,Boolean)
            Else
                command.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (Ascendant.HasValue = true) Then
                command.Parameters(2).Value = CType(Ascendant.Value,Boolean)
            Else
                command.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (Conjoint.HasValue = true) Then
                command.Parameters(3).Value = CType(Conjoint.Value,Boolean)
            Else
                command.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (Conjoint_Divorcé.HasValue = true) Then
                command.Parameters(4).Value = CType(Conjoint_Divorcé.Value,Boolean)
            Else
                command.Parameters(4).Value = Global.System.DBNull.Value
            End If
            If (Concubin.HasValue = true) Then
                command.Parameters(5).Value = CType(Concubin.Value,Boolean)
            Else
                command.Parameters(5).Value = Global.System.DBNull.Value
            End If
            If (ConjointSéparé.HasValue = true) Then
                command.Parameters(6).Value = CType(ConjointSéparé.Value,Boolean)
            Else
                command.Parameters(6).Value = Global.System.DBNull.Value
            End If
            If (Enfant.HasValue = true) Then
                command.Parameters(7).Value = CType(Enfant.Value,Boolean)
            Else
                command.Parameters(7).Value = Global.System.DBNull.Value
            End If
            If (ConjointVeuf.HasValue = true) Then
                command.Parameters(8).Value = CType(ConjointVeuf.Value,Boolean)
            Else
                command.Parameters(8).Value = Global.System.DBNull.Value
            End If
            If (Autre_ayant_droit.HasValue = true) Then
                command.Parameters(9).Value = CType(Autre_ayant_droit.Value,Boolean)
            Else
                command.Parameters(9).Value = Global.System.DBNull.Value
            End If
            If (AgeMinMois.HasValue = true) Then
                command.Parameters(10).Value = CType(AgeMinMois.Value,Decimal)
            Else
                command.Parameters(10).Value = Global.System.DBNull.Value
            End If
            If (AgeMinAnnées.HasValue = true) Then
                command.Parameters(11).Value = CType(AgeMinAnnées.Value,Decimal)
            Else
                command.Parameters(11).Value = Global.System.DBNull.Value
            End If
            If (AgeMaxMois.HasValue = true) Then
                command.Parameters(12).Value = CType(AgeMaxMois.Value,Decimal)
            Else
                command.Parameters(12).Value = Global.System.DBNull.Value
            End If
            If (AgeMaxAnnées.HasValue = true) Then
                command.Parameters(13).Value = CType(AgeMaxAnnées.Value,Decimal)
            Else
                command.Parameters(13).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class compatibilités_codes_prestation_nature_assuranceTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "compatibilités_codes_prestation_nature_assurance"
            tableMapping.ColumnMappings.Add("CodePrestation", "CodePrestation")
            tableMapping.ColumnMappings.Add("MALADIE", "MALADIE")
            tableMapping.ColumnMappings.Add("MATERNITE", "MATERNITE")
            tableMapping.ColumnMappings.Add("ACCIDENTDUTRAVAIL", "ACCIDENTDUTRAVAIL")
            tableMapping.ColumnMappings.Add("SMG", "SMG")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[compatibilités_codes_prestation_nature_assurance] ([CodePresta"& _ 
                "tion], [MALADIE], [MATERNITE], [ACCIDENTDUTRAVAIL], [SMG]) VALUES (@CodePrestati"& _ 
                "on, @MALADIE, @MATERNITE, @ACCIDENTDUTRAVAIL, @SMG)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodePrestation", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CodePrestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MALADIE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MALADIE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MATERNITE", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "MATERNITE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACCIDENTDUTRAVAIL", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "ACCIDENTDUTRAVAIL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SMG", Global.System.Data.SqlDbType.Int, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "SMG", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(3) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CodePrestation, MALADIE, MATERNITE, ACCIDENTDUTRAVAIL, SMG FROM dbo.compat"& _ 
                "ibilités_codes_prestation_nature_assurance"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE FROM compatibilités_codes_prestation_nature_assurance"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT CodePrestation, MALADIE, MATERNITE, ACCIDENTDUTRAVAIL, SMG FROM dbo.compat"& _ 
                "ibilités_codes_prestation_nature_assurance"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where CodePrestation=@CodePrestation"& _ 
                ""
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodePrestation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CodePrestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(3).Connection = Me.Connection
            Me._commandCollection(3).CommandText = "INSERT INTO [dbo].[compatibilités_codes_prestation_nature_assurance] ([CodePresta"& _ 
                "tion], [MALADIE], [MATERNITE], [ACCIDENTDUTRAVAIL], [SMG]) VALUES (@CodePrestati"& _ 
                "on, @MALADIE, @MATERNITE, @ACCIDENTDUTRAVAIL, @SMG)"
            Me._commandCollection(3).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CodePrestation", Global.System.Data.SqlDbType.NVarChar, 50, Global.System.Data.ParameterDirection.Input, 0, 0, "CodePrestation", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MALADIE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "MALADIE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@MATERNITE", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "MATERNITE", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@ACCIDENTDUTRAVAIL", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "ACCIDENTDUTRAVAIL", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(3).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@SMG", Global.System.Data.SqlDbType.Int, 4, Global.System.Data.ParameterDirection.Input, 0, 0, "SMG", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable = New PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_CodePrestation(ByVal CodePrestation As String) As PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(2)
            If (CodePrestation Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(CodePrestation,String)
            End If
            Dim dataTable As PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable = New PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.compatibilités_codes_prestation_nature_assuranceDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "compatibilités_codes_prestation_nature_assurance")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CodePrestation As String, ByVal MALADIE As Global.System.Nullable(Of Integer), ByVal MATERNITE As Global.System.Nullable(Of Integer), ByVal ACCIDENTDUTRAVAIL As Global.System.Nullable(Of Integer), ByVal SMG As Global.System.Nullable(Of Integer)) As Integer
            If (CodePrestation Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CodePrestation,String)
            End If
            If (MALADIE.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(MALADIE.Value,Integer)
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (MATERNITE.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(MATERNITE.Value,Integer)
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (ACCIDENTDUTRAVAIL.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(ACCIDENTDUTRAVAIL.Value,Integer)
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (SMG.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(SMG.Value,Integer)
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function DeleteAll() As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, false)>  _
        Public Overloads Overridable Function InsertQuery(ByVal CodePrestation As String, ByVal MALADIE As Global.System.Nullable(Of Integer), ByVal MATERNITE As Global.System.Nullable(Of Integer), ByVal ACCIDENTDUTRAVAIL As Global.System.Nullable(Of Integer), ByVal SMG As Global.System.Nullable(Of Integer)) As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(3)
            If (CodePrestation Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CodePrestation,String)
            End If
            If (MALADIE.HasValue = true) Then
                command.Parameters(1).Value = CType(MALADIE.Value,Integer)
            Else
                command.Parameters(1).Value = Global.System.DBNull.Value
            End If
            If (MATERNITE.HasValue = true) Then
                command.Parameters(2).Value = CType(MATERNITE.Value,Integer)
            Else
                command.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (ACCIDENTDUTRAVAIL.HasValue = true) Then
                command.Parameters(3).Value = CType(ACCIDENTDUTRAVAIL.Value,Integer)
            Else
                command.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (SMG.HasValue = true) Then
                command.Parameters(4).Value = CType(SMG.Value,Integer)
            Else
                command.Parameters(4).Value = Global.System.DBNull.Value
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class BDM_PrixTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "BDM_Prix"
            tableMapping.ColumnMappings.Add("CIP13", "CIP13")
            tableMapping.ColumnMappings.Add("CIP7", "CIP7")
            tableMapping.ColumnMappings.Add("Prix_Public_TTC", "Prix_Public_TTC")
            tableMapping.ColumnMappings.Add("Prix_Fabricant_HT", "Prix_Fabricant_HT")
            tableMapping.ColumnMappings.Add("Date", "Date")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[BDM_Prix] ([CIP13], [CIP7], [Prix_Public_TTC], [Prix_Fabricant"& _ 
                "_HT], [Date]) VALUES (@CIP13, @CIP7, @Prix_Public_TTC, @Prix_Fabricant_HT, @Date"& _ 
                ")"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prix_Public_TTC", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Prix_Public_TTC", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Prix_Fabricant_HT", Global.System.Data.SqlDbType.[Decimal], 0, Global.System.Data.ParameterDirection.Input, 18, 0, "Prix_Fabricant_HT", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@Date", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(2) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CIP13, CIP7, Prix_Public_TTC, Prix_Fabricant_HT, Date FROM dbo.BDM_Prix"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "DELETE from BDM_Prix"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(2).Connection = Me.Connection
            Me._commandCollection(2).CommandText = "SELECT   top 1  Prix_Public_TTC"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"FROM    (SELECT     CIP13, CIP7, Prix_Public_TTC"& _ 
                ", Prix_Fabricant_HT,Date"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"                       FROM   BDM_Prix "&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" Where (CIP13"& _ 
                "=@CIP13 or CIP7=@CIP7)  and date<= @date  )"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&" AS derivedtbl_1"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"order by date des"& _ 
                "c"
            Me._commandCollection(2).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP13", Global.System.Data.SqlDbType.NVarChar, 13, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP7", Global.System.Data.SqlDbType.NVarChar, 7, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(2).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@date", Global.System.Data.SqlDbType.NVarChar, 8, Global.System.Data.ParameterDirection.Input, 0, 0, "Date", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.BDM_PrixDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.BDM_PrixDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.BDM_PrixDataTable = New PharmaDataSet.BDM_PrixDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.BDM_PrixDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "BDM_Prix")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CIP13 As String, ByVal CIP7 As String, ByVal Prix_Public_TTC As Global.System.Nullable(Of Decimal), ByVal Prix_Fabricant_HT As Global.System.Nullable(Of Decimal), ByVal _Date As String) As Integer
            If (CIP13 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CIP13,String)
            End If
            If (CIP7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CIP7,String)
            End If
            If (Prix_Public_TTC.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(2).Value = CType(Prix_Public_TTC.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(2).Value = Global.System.DBNull.Value
            End If
            If (Prix_Fabricant_HT.HasValue = true) Then
                Me.Adapter.InsertCommand.Parameters(3).Value = CType(Prix_Fabricant_HT.Value,Decimal)
            Else
                Me.Adapter.InsertCommand.Parameters(3).Value = Global.System.DBNull.Value
            End If
            If (_Date Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(4).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(4).Value = CType(_Date,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Delete, false)>  _
        Public Overloads Overridable Function DeleteAll() As Integer
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(1)
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Integer
            Try 
                returnValue = command.ExecuteNonQuery
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Select_TFR(ByVal CIP13 As String, ByVal CIP7 As String, ByVal _date As String) As Object
            Dim command As Global.System.Data.SqlClient.SqlCommand = Me.CommandCollection(2)
            If (CIP13 Is Nothing) Then
                command.Parameters(0).Value = Global.System.DBNull.Value
            Else
                command.Parameters(0).Value = CType(CIP13,String)
            End If
            If (CIP7 Is Nothing) Then
                command.Parameters(1).Value = Global.System.DBNull.Value
            Else
                command.Parameters(1).Value = CType(CIP7,String)
            End If
            If (_date Is Nothing) Then
                command.Parameters(2).Value = Global.System.DBNull.Value
            Else
                command.Parameters(2).Value = CType(_date,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = command.Connection.State
            If ((command.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                command.Connection.Open
            End If
            Dim returnValue As Object
            Try 
                returnValue = command.ExecuteScalar
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    command.Connection.Close
                End If
            End Try
            If ((returnValue Is Nothing)  _
                        OrElse (returnValue.GetType Is GetType(Global.System.DBNull))) Then
                Return Nothing
            Else
                Return CType(returnValue,Object)
            End If
        End Function
    End Class
    
    '''<summary>
    '''Represents the connection and commands used to retrieve and save data.
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DataObjectAttribute(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterDesigner, Microsoft.VSDesigner"& _ 
        ", Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
    Partial Public Class BDM_médicaments_detournablesTableAdapter
        Inherits Global.System.ComponentModel.Component
        
        Private WithEvents _adapter As Global.System.Data.SqlClient.SqlDataAdapter
        
        Private _connection As Global.System.Data.SqlClient.SqlConnection
        
        Private _transaction As Global.System.Data.SqlClient.SqlTransaction
        
        Private _commandCollection() As Global.System.Data.SqlClient.SqlCommand
        
        Private _clearBeforeFill As Boolean
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Sub New()
            MyBase.New
            Me.ClearBeforeFill = true
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Friend ReadOnly Property Adapter() As Global.System.Data.SqlClient.SqlDataAdapter
            Get
                If (Me._adapter Is Nothing) Then
                    Me.InitAdapter
                End If
                Return Me._adapter
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Connection() As Global.System.Data.SqlClient.SqlConnection
            Get
                If (Me._connection Is Nothing) Then
                    Me.InitConnection
                End If
                Return Me._connection
            End Get
            Set
                Me._connection = value
                If (Not (Me.Adapter.InsertCommand) Is Nothing) Then
                    Me.Adapter.InsertCommand.Connection = value
                End If
                If (Not (Me.Adapter.DeleteCommand) Is Nothing) Then
                    Me.Adapter.DeleteCommand.Connection = value
                End If
                If (Not (Me.Adapter.UpdateCommand) Is Nothing) Then
                    Me.Adapter.UpdateCommand.Connection = value
                End If
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    If (Not (Me.CommandCollection(i)) Is Nothing) Then
                        CType(Me.CommandCollection(i),Global.System.Data.SqlClient.SqlCommand).Connection = value
                    End If
                    i = (i + 1)
                Loop
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Friend Property Transaction() As Global.System.Data.SqlClient.SqlTransaction
            Get
                Return Me._transaction
            End Get
            Set
                Me._transaction = value
                Dim i As Integer = 0
                Do While (i < Me.CommandCollection.Length)
                    Me.CommandCollection(i).Transaction = Me._transaction
                    i = (i + 1)
                Loop
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.DeleteCommand) Is Nothing)) Then
                    Me.Adapter.DeleteCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.InsertCommand) Is Nothing)) Then
                    Me.Adapter.InsertCommand.Transaction = Me._transaction
                End If
                If ((Not (Me.Adapter) Is Nothing)  _
                            AndAlso (Not (Me.Adapter.UpdateCommand) Is Nothing)) Then
                    Me.Adapter.UpdateCommand.Transaction = Me._transaction
                End If
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected ReadOnly Property CommandCollection() As Global.System.Data.SqlClient.SqlCommand()
            Get
                If (Me._commandCollection Is Nothing) Then
                    Me.InitCommandCollection
                End If
                Return Me._commandCollection
            End Get
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property ClearBeforeFill() As Boolean
            Get
                Return Me._clearBeforeFill
            End Get
            Set
                Me._clearBeforeFill = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitAdapter()
            Me._adapter = New Global.System.Data.SqlClient.SqlDataAdapter
            Dim tableMapping As Global.System.Data.Common.DataTableMapping = New Global.System.Data.Common.DataTableMapping
            tableMapping.SourceTable = "Table"
            tableMapping.DataSetTable = "BDM_médicaments_detournables"
            tableMapping.ColumnMappings.Add("CIP13", "CIP13")
            tableMapping.ColumnMappings.Add("CIP7", "CIP7")
            Me._adapter.TableMappings.Add(tableMapping)
            Me._adapter.InsertCommand = New Global.System.Data.SqlClient.SqlCommand
            Me._adapter.InsertCommand.Connection = Me.Connection
            Me._adapter.InsertCommand.CommandText = "INSERT INTO [dbo].[BDM_médicaments_detournables] ([CIP13], [CIP7]) VALUES (@CIP13"& _ 
                ", @CIP7)"
            Me._adapter.InsertCommand.CommandType = Global.System.Data.CommandType.Text
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP13", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._adapter.InsertCommand.Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@CIP7", Global.System.Data.SqlDbType.NVarChar, 0, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitConnection()
            Me._connection = New Global.System.Data.SqlClient.SqlConnection
            Me._connection.ConnectionString = Global.pharma_gestion.My.MySettings.Default.PharmaConnectionString
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Sub InitCommandCollection()
            Me._commandCollection = New Global.System.Data.SqlClient.SqlCommand(1) {}
            Me._commandCollection(0) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(0).Connection = Me.Connection
            Me._commandCollection(0).CommandText = "SELECT CIP13, CIP7 FROM dbo.BDM_médicaments_detournables"
            Me._commandCollection(0).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1) = New Global.System.Data.SqlClient.SqlCommand
            Me._commandCollection(1).Connection = Me.Connection
            Me._commandCollection(1).CommandText = "SELECT CIP13, CIP7 FROM dbo.BDM_médicaments_detournables"&Global.Microsoft.VisualBasic.ChrW(13)&Global.Microsoft.VisualBasic.ChrW(10)&"where cip13=@cip13 or c"& _ 
                "ip7=@cip7"
            Me._commandCollection(1).CommandType = Global.System.Data.CommandType.Text
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cip13", Global.System.Data.SqlDbType.NVarChar, 13, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP13", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
            Me._commandCollection(1).Parameters.Add(New Global.System.Data.SqlClient.SqlParameter("@cip7", Global.System.Data.SqlDbType.NVarChar, 7, Global.System.Data.ParameterDirection.Input, 0, 0, "CIP7", Global.System.Data.DataRowVersion.Current, false, Nothing, "", "", ""))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Fill, true)>  _
        Public Overloads Overridable Function Fill(ByVal dataTable As PharmaDataSet.BDM_médicaments_detournablesDataTable) As Integer
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            If (Me.ClearBeforeFill = true) Then
                dataTable.Clear
            End If
            Dim returnValue As Integer = Me.Adapter.Fill(dataTable)
            Return returnValue
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], true)>  _
        Public Overloads Overridable Function GetData() As PharmaDataSet.BDM_médicaments_detournablesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(0)
            Dim dataTable As PharmaDataSet.BDM_médicaments_detournablesDataTable = New PharmaDataSet.BDM_médicaments_detournablesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.[Select], false)>  _
        Public Overloads Overridable Function GetDataBy_CIP(ByVal cip13 As String, ByVal cip7 As String) As PharmaDataSet.BDM_médicaments_detournablesDataTable
            Me.Adapter.SelectCommand = Me.CommandCollection(1)
            If (cip13 Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(0).Value = CType(cip13,String)
            End If
            If (cip7 Is Nothing) Then
                Me.Adapter.SelectCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.SelectCommand.Parameters(1).Value = CType(cip7,String)
            End If
            Dim dataTable As PharmaDataSet.BDM_médicaments_detournablesDataTable = New PharmaDataSet.BDM_médicaments_detournablesDataTable
            Me.Adapter.Fill(dataTable)
            Return dataTable
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataTable As PharmaDataSet.BDM_médicaments_detournablesDataTable) As Integer
            Return Me.Adapter.Update(dataTable)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataSet As PharmaDataSet) As Integer
            Return Me.Adapter.Update(dataSet, "BDM_médicaments_detournables")
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRow As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(New Global.System.Data.DataRow() {dataRow})
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter")>  _
        Public Overloads Overridable Function Update(ByVal dataRows() As Global.System.Data.DataRow) As Integer
            Return Me.Adapter.Update(dataRows)
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapter"),  _
         Global.System.ComponentModel.DataObjectMethodAttribute(Global.System.ComponentModel.DataObjectMethodType.Insert, true)>  _
        Public Overloads Overridable Function Insert(ByVal CIP13 As String, ByVal CIP7 As String) As Integer
            If (CIP13 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(0).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(0).Value = CType(CIP13,String)
            End If
            If (CIP7 Is Nothing) Then
                Me.Adapter.InsertCommand.Parameters(1).Value = Global.System.DBNull.Value
            Else
                Me.Adapter.InsertCommand.Parameters(1).Value = CType(CIP7,String)
            End If
            Dim previousConnectionState As Global.System.Data.ConnectionState = Me.Adapter.InsertCommand.Connection.State
            If ((Me.Adapter.InsertCommand.Connection.State And Global.System.Data.ConnectionState.Open)  _
                        <> Global.System.Data.ConnectionState.Open) Then
                Me.Adapter.InsertCommand.Connection.Open
            End If
            Try 
                Dim returnValue As Integer = Me.Adapter.InsertCommand.ExecuteNonQuery
                Return returnValue
            Finally
                If (previousConnectionState = Global.System.Data.ConnectionState.Closed) Then
                    Me.Adapter.InsertCommand.Connection.Close
                End If
            End Try
        End Function
    End Class
    
    '''<summary>
    '''TableAdapterManager is used to coordinate TableAdapters in the dataset to enable Hierarchical Update scenarios
    '''</summary>
    <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0"),  _
     Global.System.ComponentModel.DesignerCategoryAttribute("code"),  _
     Global.System.ComponentModel.ToolboxItem(true),  _
     Global.System.ComponentModel.DesignerAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerDesigner, Microsoft.VSD"& _ 
        "esigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"),  _
     Global.System.ComponentModel.Design.HelpKeywordAttribute("vs.data.TableAdapterManager")>  _
    Partial Public Class TableAdapterManager
        Inherits Global.System.ComponentModel.Component
        
        Private _updateOrder As UpdateOrderOption
        
        Private _produitsTableAdapter As ProduitsTableAdapter
        
        Private _prescripteursTableAdapter As PrescripteursTableAdapter
        
        Private _vitaleTableAdapter As VitaleTableAdapter
        
        Private _lPPTableAdapter As LPPTableAdapter
        
        Private _facturesTableAdapter As FacturesTableAdapter
        
        Private _fichiersSVTableAdapter As FichiersSVTableAdapter
        
        Private _actesTableAdapter As ActesTableAdapter
        
        Private _sMTPTableAdapter As SMTPTableAdapter
        
        Private _lotsTableAdapter As LotsTableAdapter
        
        Private _facture_DétailCodeCIPTableAdapter As Facture_DétailCodeCIPTableAdapter
        
        Private _facture_DétailLppTableAdapter As Facture_DétailLppTableAdapter
        
        Private _facture_LigneFactureTableAdapter As Facture_LigneFactureTableAdapter
        
        Private _aMC__Organismes_Contrat_Type_TableAdapter As AMC__Organismes_Contrat_Type_TableAdapter
        
        Private _aMC_Contrat_TypeTableAdapter As AMC_Contrat_TypeTableAdapter
        
        Private _aMC_OrganismesTableAdapter As AMC_OrganismesTableAdapter
        
        Private _codePrestationsTableAdapter As CodePrestationsTableAdapter
        
        Private _aRLTableAdapter As ARLTableAdapter
        
        Private _aMOTableAdapter As AMOTableAdapter
        
        Private _facture_VenteDirecteTableAdapter As Facture_VenteDirecteTableAdapter
        
        Private _pop_Allowed_ListTableAdapter As Pop_Allowed_ListTableAdapter
        
        Private _convention_Table_correspondanceTableAdapter As Convention_Table_correspondanceTableAdapter
        
        Private _convention_Table_ConventionsTableAdapter As Convention_Table_ConventionsTableAdapter
        
        Private _convention_Table_RegroupementsTableAdapter As Convention_Table_RegroupementsTableAdapter
        
        Private _taux_CodeRégimeTableAdapter As Taux_CodeRégimeTableAdapter
        
        Private _taux_CodeSituationTableAdapter As Taux_CodeSituationTableAdapter
        
        Private _aR_PTableAdapter As AR_PTableAdapter
        
        Private _service_RejetTableAdapter As Service_RejetTableAdapter
        
        Private _rSP_LIGNE_REJETTableAdapter As RSP_LIGNE_REJETTableAdapter
        
        Private _rSP_PaiementsTableAdapter As RSP_PaiementsTableAdapter
        
        Private _lOI_DemandeTableAdapter As LOI_DemandeTableAdapter
        
        Private _sCOR_PJTableAdapter As SCOR_PJTableAdapter
        
        Private _sCOR_lotsTableAdapter As SCOR_lotsTableAdapter
        
        Private _compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter As compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter
        
        Private _compatibilités_codes_prestation_nature_assuranceTableAdapter As compatibilités_codes_prestation_nature_assuranceTableAdapter
        
        Private _bDM_PrixTableAdapter As BDM_PrixTableAdapter
        
        Private _bDM_médicaments_detournablesTableAdapter As BDM_médicaments_detournablesTableAdapter
        
        Private _backupDataSetBeforeUpdate As Boolean
        
        Private _connection As Global.System.Data.IDbConnection
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property UpdateOrder() As UpdateOrderOption
            Get
                Return Me._updateOrder
            End Get
            Set
                Me._updateOrder = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property ProduitsTableAdapter() As ProduitsTableAdapter
            Get
                Return Me._produitsTableAdapter
            End Get
            Set
                Me._produitsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property PrescripteursTableAdapter() As PrescripteursTableAdapter
            Get
                Return Me._prescripteursTableAdapter
            End Get
            Set
                Me._prescripteursTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property VitaleTableAdapter() As VitaleTableAdapter
            Get
                Return Me._vitaleTableAdapter
            End Get
            Set
                Me._vitaleTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property LPPTableAdapter() As LPPTableAdapter
            Get
                Return Me._lPPTableAdapter
            End Get
            Set
                Me._lPPTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property FacturesTableAdapter() As FacturesTableAdapter
            Get
                Return Me._facturesTableAdapter
            End Get
            Set
                Me._facturesTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property FichiersSVTableAdapter() As FichiersSVTableAdapter
            Get
                Return Me._fichiersSVTableAdapter
            End Get
            Set
                Me._fichiersSVTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property ActesTableAdapter() As ActesTableAdapter
            Get
                Return Me._actesTableAdapter
            End Get
            Set
                Me._actesTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property SMTPTableAdapter() As SMTPTableAdapter
            Get
                Return Me._sMTPTableAdapter
            End Get
            Set
                Me._sMTPTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property LotsTableAdapter() As LotsTableAdapter
            Get
                Return Me._lotsTableAdapter
            End Get
            Set
                Me._lotsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Facture_DétailCodeCIPTableAdapter() As Facture_DétailCodeCIPTableAdapter
            Get
                Return Me._facture_DétailCodeCIPTableAdapter
            End Get
            Set
                Me._facture_DétailCodeCIPTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Facture_DétailLppTableAdapter() As Facture_DétailLppTableAdapter
            Get
                Return Me._facture_DétailLppTableAdapter
            End Get
            Set
                Me._facture_DétailLppTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Facture_LigneFactureTableAdapter() As Facture_LigneFactureTableAdapter
            Get
                Return Me._facture_LigneFactureTableAdapter
            End Get
            Set
                Me._facture_LigneFactureTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property AMC__Organismes_Contrat_Type_TableAdapter() As AMC__Organismes_Contrat_Type_TableAdapter
            Get
                Return Me._aMC__Organismes_Contrat_Type_TableAdapter
            End Get
            Set
                Me._aMC__Organismes_Contrat_Type_TableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property AMC_Contrat_TypeTableAdapter() As AMC_Contrat_TypeTableAdapter
            Get
                Return Me._aMC_Contrat_TypeTableAdapter
            End Get
            Set
                Me._aMC_Contrat_TypeTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property AMC_OrganismesTableAdapter() As AMC_OrganismesTableAdapter
            Get
                Return Me._aMC_OrganismesTableAdapter
            End Get
            Set
                Me._aMC_OrganismesTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property CodePrestationsTableAdapter() As CodePrestationsTableAdapter
            Get
                Return Me._codePrestationsTableAdapter
            End Get
            Set
                Me._codePrestationsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property ARLTableAdapter() As ARLTableAdapter
            Get
                Return Me._aRLTableAdapter
            End Get
            Set
                Me._aRLTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property AMOTableAdapter() As AMOTableAdapter
            Get
                Return Me._aMOTableAdapter
            End Get
            Set
                Me._aMOTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Facture_VenteDirecteTableAdapter() As Facture_VenteDirecteTableAdapter
            Get
                Return Me._facture_VenteDirecteTableAdapter
            End Get
            Set
                Me._facture_VenteDirecteTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Pop_Allowed_ListTableAdapter() As Pop_Allowed_ListTableAdapter
            Get
                Return Me._pop_Allowed_ListTableAdapter
            End Get
            Set
                Me._pop_Allowed_ListTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Convention_Table_correspondanceTableAdapter() As Convention_Table_correspondanceTableAdapter
            Get
                Return Me._convention_Table_correspondanceTableAdapter
            End Get
            Set
                Me._convention_Table_correspondanceTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Convention_Table_ConventionsTableAdapter() As Convention_Table_ConventionsTableAdapter
            Get
                Return Me._convention_Table_ConventionsTableAdapter
            End Get
            Set
                Me._convention_Table_ConventionsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Convention_Table_RegroupementsTableAdapter() As Convention_Table_RegroupementsTableAdapter
            Get
                Return Me._convention_Table_RegroupementsTableAdapter
            End Get
            Set
                Me._convention_Table_RegroupementsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Taux_CodeRégimeTableAdapter() As Taux_CodeRégimeTableAdapter
            Get
                Return Me._taux_CodeRégimeTableAdapter
            End Get
            Set
                Me._taux_CodeRégimeTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Taux_CodeSituationTableAdapter() As Taux_CodeSituationTableAdapter
            Get
                Return Me._taux_CodeSituationTableAdapter
            End Get
            Set
                Me._taux_CodeSituationTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property AR_PTableAdapter() As AR_PTableAdapter
            Get
                Return Me._aR_PTableAdapter
            End Get
            Set
                Me._aR_PTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property Service_RejetTableAdapter() As Service_RejetTableAdapter
            Get
                Return Me._service_RejetTableAdapter
            End Get
            Set
                Me._service_RejetTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property RSP_LIGNE_REJETTableAdapter() As RSP_LIGNE_REJETTableAdapter
            Get
                Return Me._rSP_LIGNE_REJETTableAdapter
            End Get
            Set
                Me._rSP_LIGNE_REJETTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property RSP_PaiementsTableAdapter() As RSP_PaiementsTableAdapter
            Get
                Return Me._rSP_PaiementsTableAdapter
            End Get
            Set
                Me._rSP_PaiementsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property LOI_DemandeTableAdapter() As LOI_DemandeTableAdapter
            Get
                Return Me._lOI_DemandeTableAdapter
            End Get
            Set
                Me._lOI_DemandeTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property SCOR_PJTableAdapter() As SCOR_PJTableAdapter
            Get
                Return Me._sCOR_PJTableAdapter
            End Get
            Set
                Me._sCOR_PJTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property SCOR_lotsTableAdapter() As SCOR_lotsTableAdapter
            Get
                Return Me._sCOR_lotsTableAdapter
            End Get
            Set
                Me._sCOR_lotsTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter() As compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter
            Get
                Return Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter
            End Get
            Set
                Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property compatibilités_codes_prestation_nature_assuranceTableAdapter() As compatibilités_codes_prestation_nature_assuranceTableAdapter
            Get
                Return Me._compatibilités_codes_prestation_nature_assuranceTableAdapter
            End Get
            Set
                Me._compatibilités_codes_prestation_nature_assuranceTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property BDM_PrixTableAdapter() As BDM_PrixTableAdapter
            Get
                Return Me._bDM_PrixTableAdapter
            End Get
            Set
                Me._bDM_PrixTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.EditorAttribute("Microsoft.VSDesigner.DataSource.Design.TableAdapterManagerPropertyEditor, Microso"& _ 
            "ft.VSDesigner, Version=8.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a"& _ 
            "", "System.Drawing.Design.UITypeEditor")>  _
        Public Property BDM_médicaments_detournablesTableAdapter() As BDM_médicaments_detournablesTableAdapter
            Get
                Return Me._bDM_médicaments_detournablesTableAdapter
            End Get
            Set
                Me._bDM_médicaments_detournablesTableAdapter = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Property BackupDataSetBeforeUpdate() As Boolean
            Get
                Return Me._backupDataSetBeforeUpdate
            End Get
            Set
                Me._backupDataSetBeforeUpdate = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public Property Connection() As Global.System.Data.IDbConnection
            Get
                If (Not (Me._connection) Is Nothing) Then
                    Return Me._connection
                End If
                If ((Not (Me._produitsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._produitsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._produitsTableAdapter.Connection
                End If
                If ((Not (Me._prescripteursTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._prescripteursTableAdapter.Connection) Is Nothing)) Then
                    Return Me._prescripteursTableAdapter.Connection
                End If
                If ((Not (Me._vitaleTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._vitaleTableAdapter.Connection) Is Nothing)) Then
                    Return Me._vitaleTableAdapter.Connection
                End If
                If ((Not (Me._lPPTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._lPPTableAdapter.Connection) Is Nothing)) Then
                    Return Me._lPPTableAdapter.Connection
                End If
                If ((Not (Me._facturesTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._facturesTableAdapter.Connection) Is Nothing)) Then
                    Return Me._facturesTableAdapter.Connection
                End If
                If ((Not (Me._fichiersSVTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._fichiersSVTableAdapter.Connection) Is Nothing)) Then
                    Return Me._fichiersSVTableAdapter.Connection
                End If
                If ((Not (Me._actesTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._actesTableAdapter.Connection) Is Nothing)) Then
                    Return Me._actesTableAdapter.Connection
                End If
                If ((Not (Me._sMTPTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._sMTPTableAdapter.Connection) Is Nothing)) Then
                    Return Me._sMTPTableAdapter.Connection
                End If
                If ((Not (Me._lotsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._lotsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._lotsTableAdapter.Connection
                End If
                If ((Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._facture_DétailCodeCIPTableAdapter.Connection) Is Nothing)) Then
                    Return Me._facture_DétailCodeCIPTableAdapter.Connection
                End If
                If ((Not (Me._facture_DétailLppTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._facture_DétailLppTableAdapter.Connection) Is Nothing)) Then
                    Return Me._facture_DétailLppTableAdapter.Connection
                End If
                If ((Not (Me._facture_LigneFactureTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._facture_LigneFactureTableAdapter.Connection) Is Nothing)) Then
                    Return Me._facture_LigneFactureTableAdapter.Connection
                End If
                If ((Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter.Connection) Is Nothing)) Then
                    Return Me._aMC__Organismes_Contrat_Type_TableAdapter.Connection
                End If
                If ((Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._aMC_Contrat_TypeTableAdapter.Connection) Is Nothing)) Then
                    Return Me._aMC_Contrat_TypeTableAdapter.Connection
                End If
                If ((Not (Me._aMC_OrganismesTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._aMC_OrganismesTableAdapter.Connection) Is Nothing)) Then
                    Return Me._aMC_OrganismesTableAdapter.Connection
                End If
                If ((Not (Me._codePrestationsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._codePrestationsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._codePrestationsTableAdapter.Connection
                End If
                If ((Not (Me._aRLTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._aRLTableAdapter.Connection) Is Nothing)) Then
                    Return Me._aRLTableAdapter.Connection
                End If
                If ((Not (Me._aMOTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._aMOTableAdapter.Connection) Is Nothing)) Then
                    Return Me._aMOTableAdapter.Connection
                End If
                If ((Not (Me._facture_VenteDirecteTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._facture_VenteDirecteTableAdapter.Connection) Is Nothing)) Then
                    Return Me._facture_VenteDirecteTableAdapter.Connection
                End If
                If ((Not (Me._pop_Allowed_ListTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._pop_Allowed_ListTableAdapter.Connection) Is Nothing)) Then
                    Return Me._pop_Allowed_ListTableAdapter.Connection
                End If
                If ((Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._convention_Table_correspondanceTableAdapter.Connection) Is Nothing)) Then
                    Return Me._convention_Table_correspondanceTableAdapter.Connection
                End If
                If ((Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._convention_Table_ConventionsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._convention_Table_ConventionsTableAdapter.Connection
                End If
                If ((Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._convention_Table_RegroupementsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._convention_Table_RegroupementsTableAdapter.Connection
                End If
                If ((Not (Me._taux_CodeRégimeTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._taux_CodeRégimeTableAdapter.Connection) Is Nothing)) Then
                    Return Me._taux_CodeRégimeTableAdapter.Connection
                End If
                If ((Not (Me._taux_CodeSituationTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._taux_CodeSituationTableAdapter.Connection) Is Nothing)) Then
                    Return Me._taux_CodeSituationTableAdapter.Connection
                End If
                If ((Not (Me._aR_PTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._aR_PTableAdapter.Connection) Is Nothing)) Then
                    Return Me._aR_PTableAdapter.Connection
                End If
                If ((Not (Me._service_RejetTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._service_RejetTableAdapter.Connection) Is Nothing)) Then
                    Return Me._service_RejetTableAdapter.Connection
                End If
                If ((Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._rSP_LIGNE_REJETTableAdapter.Connection) Is Nothing)) Then
                    Return Me._rSP_LIGNE_REJETTableAdapter.Connection
                End If
                If ((Not (Me._rSP_PaiementsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._rSP_PaiementsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._rSP_PaiementsTableAdapter.Connection
                End If
                If ((Not (Me._lOI_DemandeTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._lOI_DemandeTableAdapter.Connection) Is Nothing)) Then
                    Return Me._lOI_DemandeTableAdapter.Connection
                End If
                If ((Not (Me._sCOR_PJTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._sCOR_PJTableAdapter.Connection) Is Nothing)) Then
                    Return Me._sCOR_PJTableAdapter.Connection
                End If
                If ((Not (Me._sCOR_lotsTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._sCOR_lotsTableAdapter.Connection) Is Nothing)) Then
                    Return Me._sCOR_lotsTableAdapter.Connection
                End If
                If ((Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Connection) Is Nothing)) Then
                    Return Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Connection
                End If
                If ((Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Connection) Is Nothing)) Then
                    Return Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Connection
                End If
                If ((Not (Me._bDM_PrixTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._bDM_PrixTableAdapter.Connection) Is Nothing)) Then
                    Return Me._bDM_PrixTableAdapter.Connection
                End If
                If ((Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing)  _
                            AndAlso (Not (Me._bDM_médicaments_detournablesTableAdapter.Connection) Is Nothing)) Then
                    Return Me._bDM_médicaments_detournablesTableAdapter.Connection
                End If
                Return Nothing
            End Get
            Set
                Me._connection = value
            End Set
        End Property
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute(),  _
         Global.System.ComponentModel.Browsable(false)>  _
        Public ReadOnly Property TableAdapterInstanceCount() As Integer
            Get
                Dim count As Integer = 0
                If (Not (Me._produitsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._prescripteursTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._vitaleTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._lPPTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._facturesTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._fichiersSVTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._actesTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._sMTPTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._lotsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._facture_DétailLppTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._facture_LigneFactureTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._aMC_OrganismesTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._codePrestationsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._aRLTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._aMOTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._facture_VenteDirecteTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._pop_Allowed_ListTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._taux_CodeRégimeTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._taux_CodeSituationTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._aR_PTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._service_RejetTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._rSP_PaiementsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._lOI_DemandeTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._sCOR_PJTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._sCOR_lotsTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._bDM_PrixTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                If (Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing) Then
                    count = (count + 1)
                End If
                Return count
            End Get
        End Property
        
        '''<summary>
        '''Update rows in top-down order.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function UpdateUpdatedRows(ByVal dataSet As PharmaDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow), ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
            Dim result As Integer = 0
            If (Not (Me._taux_CodeSituationTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet._Taux_CodeSituation.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._taux_CodeSituationTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._taux_CodeRégimeTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet._Taux_CodeRégime.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._taux_CodeRégimeTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._service_RejetTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet._Service_Rejet.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._service_RejetTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._aR_PTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.AR_P.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._aR_PTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_Regroupements.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._convention_Table_RegroupementsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._pop_Allowed_ListTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Pop_Allowed_List.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._pop_Allowed_ListTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._facture_VenteDirecteTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Facture_VenteDirecte.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._facture_VenteDirecteTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_Conventions.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._convention_Table_ConventionsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_correspondance.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._convention_Table_correspondanceTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.compatibilités_codes_prestation_nature_assurance.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.compatibilités__codes_prestation__qualité_bénéficiaire.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.BDM_médicaments_detournables.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._bDM_médicaments_detournablesTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._bDM_PrixTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.BDM_Prix.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._bDM_PrixTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._sCOR_lotsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.SCOR_lots.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._sCOR_lotsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._rSP_PaiementsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.RSP_Paiements.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._rSP_PaiementsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.RSP_LIGNE_REJET.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._rSP_LIGNE_REJETTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._sCOR_PJTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.SCOR_PJ.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._sCOR_PJTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._lOI_DemandeTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.LOI_Demande.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._lOI_DemandeTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._sMTPTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.SMTP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._sMTPTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._actesTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Actes.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._actesTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Facture_DétailCodeCIP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._facture_DétailCodeCIPTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._lotsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Lots.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._lotsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._fichiersSVTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.FichiersSV.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._fichiersSVTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._vitaleTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Vitale.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._vitaleTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._produitsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Produits.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._produitsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._facturesTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Factures.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._facturesTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._lPPTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.LPP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._lPPTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._prescripteursTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Prescripteurs.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._prescripteursTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._codePrestationsTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.CodePrestations.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._codePrestationsTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._aMOTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.AMO.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._aMOTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._aRLTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.ARL.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._aRLTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._aMC_OrganismesTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.AMC_Organismes.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._aMC_OrganismesTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._facture_LigneFactureTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Facture_LigneFacture.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._facture_LigneFactureTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._facture_DétailLppTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.Facture_DétailLpp.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._facture_DétailLppTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet.AMC_Contrat_Type.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._aMC_Contrat_TypeTableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            If (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing) Then
                Dim updatedRows() As Global.System.Data.DataRow = dataSet._AMC__Organismes_Contrat_Type_.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.ModifiedCurrent)
                updatedRows = Me.GetRealUpdatedRows(updatedRows, allAddedRows)
                If ((Not (updatedRows) Is Nothing)  _
                            AndAlso (0 < updatedRows.Length)) Then
                    result = (result + Me._aMC__Organismes_Contrat_Type_TableAdapter.Update(updatedRows))
                    allChangedRows.AddRange(updatedRows)
                End If
            End If
            Return result
        End Function
        
        '''<summary>
        '''Insert rows in top-down order.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function UpdateInsertedRows(ByVal dataSet As PharmaDataSet, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
            Dim result As Integer = 0
            If (Not (Me._taux_CodeSituationTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet._Taux_CodeSituation.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._taux_CodeSituationTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._taux_CodeRégimeTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet._Taux_CodeRégime.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._taux_CodeRégimeTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._service_RejetTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet._Service_Rejet.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._service_RejetTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._aR_PTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.AR_P.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._aR_PTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_Regroupements.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._convention_Table_RegroupementsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._pop_Allowed_ListTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Pop_Allowed_List.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._pop_Allowed_ListTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._facture_VenteDirecteTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Facture_VenteDirecte.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._facture_VenteDirecteTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_Conventions.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._convention_Table_ConventionsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_correspondance.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._convention_Table_correspondanceTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.compatibilités_codes_prestation_nature_assurance.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.compatibilités__codes_prestation__qualité_bénéficiaire.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.BDM_médicaments_detournables.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._bDM_médicaments_detournablesTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._bDM_PrixTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.BDM_Prix.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._bDM_PrixTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._sCOR_lotsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.SCOR_lots.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._sCOR_lotsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._rSP_PaiementsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.RSP_Paiements.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._rSP_PaiementsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.RSP_LIGNE_REJET.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._rSP_LIGNE_REJETTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._sCOR_PJTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.SCOR_PJ.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._sCOR_PJTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._lOI_DemandeTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.LOI_Demande.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._lOI_DemandeTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._sMTPTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.SMTP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._sMTPTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._actesTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Actes.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._actesTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Facture_DétailCodeCIP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._facture_DétailCodeCIPTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._lotsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Lots.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._lotsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._fichiersSVTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.FichiersSV.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._fichiersSVTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._vitaleTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Vitale.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._vitaleTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._produitsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Produits.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._produitsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._facturesTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Factures.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._facturesTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._lPPTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.LPP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._lPPTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._prescripteursTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Prescripteurs.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._prescripteursTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._codePrestationsTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.CodePrestations.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._codePrestationsTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._aMOTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.AMO.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._aMOTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._aRLTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.ARL.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._aRLTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._aMC_OrganismesTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.AMC_Organismes.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._aMC_OrganismesTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._facture_LigneFactureTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Facture_LigneFacture.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._facture_LigneFactureTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._facture_DétailLppTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.Facture_DétailLpp.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._facture_DétailLppTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet.AMC_Contrat_Type.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._aMC_Contrat_TypeTableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            If (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing) Then
                Dim addedRows() As Global.System.Data.DataRow = dataSet._AMC__Organismes_Contrat_Type_.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Added)
                If ((Not (addedRows) Is Nothing)  _
                            AndAlso (0 < addedRows.Length)) Then
                    result = (result + Me._aMC__Organismes_Contrat_Type_TableAdapter.Update(addedRows))
                    allAddedRows.AddRange(addedRows)
                End If
            End If
            Return result
        End Function
        
        '''<summary>
        '''Delete rows in bottom-up order.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function UpdateDeletedRows(ByVal dataSet As PharmaDataSet, ByVal allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Integer
            Dim result As Integer = 0
            If (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet._AMC__Organismes_Contrat_Type_.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._aMC__Organismes_Contrat_Type_TableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.AMC_Contrat_Type.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._aMC_Contrat_TypeTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._facture_DétailLppTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Facture_DétailLpp.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._facture_DétailLppTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._facture_LigneFactureTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Facture_LigneFacture.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._facture_LigneFactureTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._aMC_OrganismesTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.AMC_Organismes.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._aMC_OrganismesTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._aRLTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.ARL.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._aRLTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._aMOTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.AMO.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._aMOTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._codePrestationsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.CodePrestations.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._codePrestationsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._prescripteursTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Prescripteurs.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._prescripteursTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._lPPTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.LPP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._lPPTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._facturesTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Factures.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._facturesTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._produitsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Produits.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._produitsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._vitaleTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Vitale.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._vitaleTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._fichiersSVTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.FichiersSV.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._fichiersSVTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._lotsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Lots.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._lotsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Facture_DétailCodeCIP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._facture_DétailCodeCIPTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._actesTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Actes.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._actesTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._sMTPTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.SMTP.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._sMTPTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._lOI_DemandeTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.LOI_Demande.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._lOI_DemandeTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._sCOR_PJTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.SCOR_PJ.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._sCOR_PJTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.RSP_LIGNE_REJET.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._rSP_LIGNE_REJETTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._rSP_PaiementsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.RSP_Paiements.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._rSP_PaiementsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._sCOR_lotsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.SCOR_lots.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._sCOR_lotsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._bDM_PrixTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.BDM_Prix.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._bDM_PrixTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.BDM_médicaments_detournables.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._bDM_médicaments_detournablesTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.compatibilités__codes_prestation__qualité_bénéficiaire.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.compatibilités_codes_prestation_nature_assurance.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_correspondance.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._convention_Table_correspondanceTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_Conventions.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._convention_Table_ConventionsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._facture_VenteDirecteTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Facture_VenteDirecte.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._facture_VenteDirecteTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._pop_Allowed_ListTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Pop_Allowed_List.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._pop_Allowed_ListTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.Convention_Table_Regroupements.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._convention_Table_RegroupementsTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._aR_PTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet.AR_P.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._aR_PTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._service_RejetTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet._Service_Rejet.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._service_RejetTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._taux_CodeRégimeTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet._Taux_CodeRégime.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._taux_CodeRégimeTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            If (Not (Me._taux_CodeSituationTableAdapter) Is Nothing) Then
                Dim deletedRows() As Global.System.Data.DataRow = dataSet._Taux_CodeSituation.Select(Nothing, Nothing, Global.System.Data.DataViewRowState.Deleted)
                If ((Not (deletedRows) Is Nothing)  _
                            AndAlso (0 < deletedRows.Length)) Then
                    result = (result + Me._taux_CodeSituationTableAdapter.Update(deletedRows))
                    allChangedRows.AddRange(deletedRows)
                End If
            End If
            Return result
        End Function
        
        '''<summary>
        '''Remove inserted rows that become updated rows after calling TableAdapter.Update(inserted rows) first
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Private Function GetRealUpdatedRows(ByVal updatedRows() As Global.System.Data.DataRow, ByVal allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)) As Global.System.Data.DataRow()
            If ((updatedRows Is Nothing)  _
                        OrElse (updatedRows.Length < 1)) Then
                Return updatedRows
            End If
            If ((allAddedRows Is Nothing)  _
                        OrElse (allAddedRows.Count < 1)) Then
                Return updatedRows
            End If
            Dim realUpdatedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow) = New Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)
            Dim i As Integer = 0
            Do While (i < updatedRows.Length)
                Dim row As Global.System.Data.DataRow = updatedRows(i)
                If (allAddedRows.Contains(row) = false) Then
                    realUpdatedRows.Add(row)
                End If
                i = (i + 1)
            Loop
            Return realUpdatedRows.ToArray
        End Function
        
        '''<summary>
        '''Update all changes to the dataset.
        '''</summary>
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Public Overridable Function UpdateAll(ByVal dataSet As PharmaDataSet) As Integer
            If (dataSet Is Nothing) Then
                Throw New Global.System.ArgumentNullException("dataSet")
            End If
            If (dataSet.HasChanges = false) Then
                Return 0
            End If
            If ((Not (Me._produitsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._produitsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._prescripteursTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._prescripteursTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._vitaleTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._vitaleTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._lPPTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._lPPTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._facturesTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._facturesTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._fichiersSVTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._fichiersSVTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._actesTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._actesTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._sMTPTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._sMTPTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._lotsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._lotsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._facture_DétailCodeCIPTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._facture_DétailLppTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._facture_DétailLppTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._facture_LigneFactureTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._facture_LigneFactureTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._aMC__Organismes_Contrat_Type_TableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._aMC_Contrat_TypeTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._aMC_OrganismesTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._aMC_OrganismesTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._codePrestationsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._codePrestationsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._aRLTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._aRLTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._aMOTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._aMOTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._facture_VenteDirecteTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._facture_VenteDirecteTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._pop_Allowed_ListTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._pop_Allowed_ListTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._convention_Table_correspondanceTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._convention_Table_ConventionsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._convention_Table_RegroupementsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._taux_CodeRégimeTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._taux_CodeRégimeTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._taux_CodeSituationTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._taux_CodeSituationTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._aR_PTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._aR_PTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._service_RejetTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._service_RejetTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._rSP_LIGNE_REJETTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._rSP_PaiementsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._rSP_PaiementsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._lOI_DemandeTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._lOI_DemandeTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._sCOR_PJTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._sCOR_PJTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._sCOR_lotsTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._sCOR_lotsTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._bDM_PrixTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._bDM_PrixTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            If ((Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing)  _
                        AndAlso (Me.MatchTableAdapterConnection(Me._bDM_médicaments_detournablesTableAdapter.Connection) = false)) Then
                Throw New Global.System.ArgumentException("Tous les TableAdapters managés par un TableAdapterManager doivent utiliser la mêm"& _ 
                        "e chaîne de connexion.")
            End If
            Dim workConnection As Global.System.Data.IDbConnection = Me.Connection
            If (workConnection Is Nothing) Then
                Throw New Global.System.ApplicationException("TableAdapterManager ne contient pas d'informations de connexion. Définissez chaqu"& _ 
                        "e propriété TableAdapterManager TableAdapter à une instance valide de TableAdapt"& _ 
                        "er.")
            End If
            Dim workConnOpened As Boolean = false
            If ((workConnection.State And Global.System.Data.ConnectionState.Broken)  _
                        = Global.System.Data.ConnectionState.Broken) Then
                workConnection.Close
            End If
            If (workConnection.State = Global.System.Data.ConnectionState.Closed) Then
                workConnection.Open
                workConnOpened = true
            End If
            Dim workTransaction As Global.System.Data.IDbTransaction = workConnection.BeginTransaction
            If (workTransaction Is Nothing) Then
                Throw New Global.System.ApplicationException("La transaction ne peut pas commencer. La connexion de données actuelle ne prend p"& _ 
                        "as en charge les transactions ou l'état actuel n'autorise pas le début de la tra"& _ 
                        "nsaction.")
            End If
            Dim allChangedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow) = New Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)
            Dim allAddedRows As Global.System.Collections.Generic.List(Of Global.System.Data.DataRow) = New Global.System.Collections.Generic.List(Of Global.System.Data.DataRow)
            Dim adaptersWithAcceptChangesDuringUpdate As Global.System.Collections.Generic.List(Of Global.System.Data.Common.DataAdapter) = New Global.System.Collections.Generic.List(Of Global.System.Data.Common.DataAdapter)
            Dim revertConnections As Global.System.Collections.Generic.Dictionary(Of Object, Global.System.Data.IDbConnection) = New Global.System.Collections.Generic.Dictionary(Of Object, Global.System.Data.IDbConnection)
            Dim result As Integer = 0
            Dim backupDataSet As Global.System.Data.DataSet = Nothing
            If Me.BackupDataSetBeforeUpdate Then
                backupDataSet = New Global.System.Data.DataSet
                backupDataSet.Merge(dataSet)
            End If
            Try 
                '---- Prepare for update -----------
                '
                If (Not (Me._produitsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._produitsTableAdapter, Me._produitsTableAdapter.Connection)
                    Me._produitsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._produitsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._produitsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._produitsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._produitsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._prescripteursTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._prescripteursTableAdapter, Me._prescripteursTableAdapter.Connection)
                    Me._prescripteursTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._prescripteursTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._prescripteursTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._prescripteursTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._prescripteursTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._vitaleTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._vitaleTableAdapter, Me._vitaleTableAdapter.Connection)
                    Me._vitaleTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._vitaleTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._vitaleTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._vitaleTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._vitaleTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._lPPTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._lPPTableAdapter, Me._lPPTableAdapter.Connection)
                    Me._lPPTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._lPPTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._lPPTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._lPPTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._lPPTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._facturesTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._facturesTableAdapter, Me._facturesTableAdapter.Connection)
                    Me._facturesTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._facturesTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._facturesTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._facturesTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._facturesTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._fichiersSVTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._fichiersSVTableAdapter, Me._fichiersSVTableAdapter.Connection)
                    Me._fichiersSVTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._fichiersSVTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._fichiersSVTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._fichiersSVTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._fichiersSVTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._actesTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._actesTableAdapter, Me._actesTableAdapter.Connection)
                    Me._actesTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._actesTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._actesTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._actesTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._actesTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._sMTPTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._sMTPTableAdapter, Me._sMTPTableAdapter.Connection)
                    Me._sMTPTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._sMTPTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._sMTPTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._sMTPTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._sMTPTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._lotsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._lotsTableAdapter, Me._lotsTableAdapter.Connection)
                    Me._lotsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._lotsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._lotsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._lotsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._lotsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._facture_DétailCodeCIPTableAdapter, Me._facture_DétailCodeCIPTableAdapter.Connection)
                    Me._facture_DétailCodeCIPTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_DétailCodeCIPTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._facture_DétailCodeCIPTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._facture_DétailCodeCIPTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._facture_DétailCodeCIPTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._facture_DétailLppTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._facture_DétailLppTableAdapter, Me._facture_DétailLppTableAdapter.Connection)
                    Me._facture_DétailLppTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_DétailLppTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._facture_DétailLppTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._facture_DétailLppTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._facture_DétailLppTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._facture_LigneFactureTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._facture_LigneFactureTableAdapter, Me._facture_LigneFactureTableAdapter.Connection)
                    Me._facture_LigneFactureTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_LigneFactureTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._facture_LigneFactureTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._facture_LigneFactureTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._facture_LigneFactureTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._aMC__Organismes_Contrat_Type_TableAdapter, Me._aMC__Organismes_Contrat_Type_TableAdapter.Connection)
                    Me._aMC__Organismes_Contrat_Type_TableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._aMC__Organismes_Contrat_Type_TableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._aMC__Organismes_Contrat_Type_TableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._aMC__Organismes_Contrat_Type_TableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._aMC__Organismes_Contrat_Type_TableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._aMC_Contrat_TypeTableAdapter, Me._aMC_Contrat_TypeTableAdapter.Connection)
                    Me._aMC_Contrat_TypeTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._aMC_Contrat_TypeTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._aMC_Contrat_TypeTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._aMC_Contrat_TypeTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._aMC_Contrat_TypeTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._aMC_OrganismesTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._aMC_OrganismesTableAdapter, Me._aMC_OrganismesTableAdapter.Connection)
                    Me._aMC_OrganismesTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._aMC_OrganismesTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._aMC_OrganismesTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._aMC_OrganismesTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._aMC_OrganismesTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._codePrestationsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._codePrestationsTableAdapter, Me._codePrestationsTableAdapter.Connection)
                    Me._codePrestationsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._codePrestationsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._codePrestationsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._codePrestationsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._codePrestationsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._aRLTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._aRLTableAdapter, Me._aRLTableAdapter.Connection)
                    Me._aRLTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._aRLTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._aRLTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._aRLTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._aRLTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._aMOTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._aMOTableAdapter, Me._aMOTableAdapter.Connection)
                    Me._aMOTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._aMOTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._aMOTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._aMOTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._aMOTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._facture_VenteDirecteTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._facture_VenteDirecteTableAdapter, Me._facture_VenteDirecteTableAdapter.Connection)
                    Me._facture_VenteDirecteTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_VenteDirecteTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._facture_VenteDirecteTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._facture_VenteDirecteTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._facture_VenteDirecteTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._pop_Allowed_ListTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._pop_Allowed_ListTableAdapter, Me._pop_Allowed_ListTableAdapter.Connection)
                    Me._pop_Allowed_ListTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._pop_Allowed_ListTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._pop_Allowed_ListTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._pop_Allowed_ListTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._pop_Allowed_ListTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._convention_Table_correspondanceTableAdapter, Me._convention_Table_correspondanceTableAdapter.Connection)
                    Me._convention_Table_correspondanceTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._convention_Table_correspondanceTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._convention_Table_correspondanceTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._convention_Table_correspondanceTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._convention_Table_correspondanceTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._convention_Table_ConventionsTableAdapter, Me._convention_Table_ConventionsTableAdapter.Connection)
                    Me._convention_Table_ConventionsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._convention_Table_ConventionsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._convention_Table_ConventionsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._convention_Table_ConventionsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._convention_Table_ConventionsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._convention_Table_RegroupementsTableAdapter, Me._convention_Table_RegroupementsTableAdapter.Connection)
                    Me._convention_Table_RegroupementsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._convention_Table_RegroupementsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._convention_Table_RegroupementsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._convention_Table_RegroupementsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._convention_Table_RegroupementsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._taux_CodeRégimeTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._taux_CodeRégimeTableAdapter, Me._taux_CodeRégimeTableAdapter.Connection)
                    Me._taux_CodeRégimeTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._taux_CodeRégimeTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._taux_CodeRégimeTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._taux_CodeRégimeTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._taux_CodeRégimeTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._taux_CodeSituationTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._taux_CodeSituationTableAdapter, Me._taux_CodeSituationTableAdapter.Connection)
                    Me._taux_CodeSituationTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._taux_CodeSituationTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._taux_CodeSituationTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._taux_CodeSituationTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._taux_CodeSituationTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._aR_PTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._aR_PTableAdapter, Me._aR_PTableAdapter.Connection)
                    Me._aR_PTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._aR_PTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._aR_PTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._aR_PTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._aR_PTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._service_RejetTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._service_RejetTableAdapter, Me._service_RejetTableAdapter.Connection)
                    Me._service_RejetTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._service_RejetTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._service_RejetTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._service_RejetTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._service_RejetTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._rSP_LIGNE_REJETTableAdapter, Me._rSP_LIGNE_REJETTableAdapter.Connection)
                    Me._rSP_LIGNE_REJETTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._rSP_LIGNE_REJETTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._rSP_LIGNE_REJETTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._rSP_LIGNE_REJETTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._rSP_LIGNE_REJETTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._rSP_PaiementsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._rSP_PaiementsTableAdapter, Me._rSP_PaiementsTableAdapter.Connection)
                    Me._rSP_PaiementsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._rSP_PaiementsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._rSP_PaiementsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._rSP_PaiementsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._rSP_PaiementsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._lOI_DemandeTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._lOI_DemandeTableAdapter, Me._lOI_DemandeTableAdapter.Connection)
                    Me._lOI_DemandeTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._lOI_DemandeTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._lOI_DemandeTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._lOI_DemandeTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._lOI_DemandeTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._sCOR_PJTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._sCOR_PJTableAdapter, Me._sCOR_PJTableAdapter.Connection)
                    Me._sCOR_PJTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._sCOR_PJTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._sCOR_PJTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._sCOR_PJTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._sCOR_PJTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._sCOR_lotsTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._sCOR_lotsTableAdapter, Me._sCOR_lotsTableAdapter.Connection)
                    Me._sCOR_lotsTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._sCOR_lotsTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._sCOR_lotsTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._sCOR_lotsTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._sCOR_lotsTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter, Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Connection)
                    Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._compatibilités_codes_prestation_nature_assuranceTableAdapter, Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Connection)
                    Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._bDM_PrixTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._bDM_PrixTableAdapter, Me._bDM_PrixTableAdapter.Connection)
                    Me._bDM_PrixTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._bDM_PrixTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._bDM_PrixTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._bDM_PrixTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._bDM_PrixTableAdapter.Adapter)
                    End If
                End If
                If (Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing) Then
                    revertConnections.Add(Me._bDM_médicaments_detournablesTableAdapter, Me._bDM_médicaments_detournablesTableAdapter.Connection)
                    Me._bDM_médicaments_detournablesTableAdapter.Connection = CType(workConnection,Global.System.Data.SqlClient.SqlConnection)
                    Me._bDM_médicaments_detournablesTableAdapter.Transaction = CType(workTransaction,Global.System.Data.SqlClient.SqlTransaction)
                    If Me._bDM_médicaments_detournablesTableAdapter.Adapter.AcceptChangesDuringUpdate Then
                        Me._bDM_médicaments_detournablesTableAdapter.Adapter.AcceptChangesDuringUpdate = false
                        adaptersWithAcceptChangesDuringUpdate.Add(Me._bDM_médicaments_detournablesTableAdapter.Adapter)
                    End If
                End If
                '
                '---- Perform updates -----------
                '
                If (Me.UpdateOrder = UpdateOrderOption.UpdateInsertDelete) Then
                    result = (result + Me.UpdateUpdatedRows(dataSet, allChangedRows, allAddedRows))
                    result = (result + Me.UpdateInsertedRows(dataSet, allAddedRows))
                Else
                    result = (result + Me.UpdateInsertedRows(dataSet, allAddedRows))
                    result = (result + Me.UpdateUpdatedRows(dataSet, allChangedRows, allAddedRows))
                End If
                result = (result + Me.UpdateDeletedRows(dataSet, allChangedRows))
                '
                '---- Commit updates -----------
                '
                workTransaction.Commit
                If (0 < allAddedRows.Count) Then
                    Dim rows((allAddedRows.Count) - 1) As Global.System.Data.DataRow
                    allAddedRows.CopyTo(rows)
                    Dim i As Integer = 0
                    Do While (i < rows.Length)
                        Dim row As Global.System.Data.DataRow = rows(i)
                        row.AcceptChanges
                        i = (i + 1)
                    Loop
                End If
                If (0 < allChangedRows.Count) Then
                    Dim rows((allChangedRows.Count) - 1) As Global.System.Data.DataRow
                    allChangedRows.CopyTo(rows)
                    Dim i As Integer = 0
                    Do While (i < rows.Length)
                        Dim row As Global.System.Data.DataRow = rows(i)
                        row.AcceptChanges
                        i = (i + 1)
                    Loop
                End If
            Catch ex As Global.System.Exception
                workTransaction.Rollback
                '---- Restore the dataset -----------
                If Me.BackupDataSetBeforeUpdate Then
                    Global.System.Diagnostics.Debug.Assert((Not (backupDataSet) Is Nothing))
                    dataSet.Clear
                    dataSet.Merge(backupDataSet)
                Else
                    If (0 < allAddedRows.Count) Then
                        Dim rows((allAddedRows.Count) - 1) As Global.System.Data.DataRow
                        allAddedRows.CopyTo(rows)
                        Dim i As Integer = 0
                        Do While (i < rows.Length)
                            Dim row As Global.System.Data.DataRow = rows(i)
                            row.AcceptChanges
                            row.SetAdded
                            i = (i + 1)
                        Loop
                    End If
                End If
                Throw ex
            Finally
                If workConnOpened Then
                    workConnection.Close
                End If
                If (Not (Me._produitsTableAdapter) Is Nothing) Then
                    Me._produitsTableAdapter.Connection = CType(revertConnections(Me._produitsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._produitsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._prescripteursTableAdapter) Is Nothing) Then
                    Me._prescripteursTableAdapter.Connection = CType(revertConnections(Me._prescripteursTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._prescripteursTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._vitaleTableAdapter) Is Nothing) Then
                    Me._vitaleTableAdapter.Connection = CType(revertConnections(Me._vitaleTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._vitaleTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._lPPTableAdapter) Is Nothing) Then
                    Me._lPPTableAdapter.Connection = CType(revertConnections(Me._lPPTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._lPPTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._facturesTableAdapter) Is Nothing) Then
                    Me._facturesTableAdapter.Connection = CType(revertConnections(Me._facturesTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._facturesTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._fichiersSVTableAdapter) Is Nothing) Then
                    Me._fichiersSVTableAdapter.Connection = CType(revertConnections(Me._fichiersSVTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._fichiersSVTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._actesTableAdapter) Is Nothing) Then
                    Me._actesTableAdapter.Connection = CType(revertConnections(Me._actesTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._actesTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._sMTPTableAdapter) Is Nothing) Then
                    Me._sMTPTableAdapter.Connection = CType(revertConnections(Me._sMTPTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._sMTPTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._lotsTableAdapter) Is Nothing) Then
                    Me._lotsTableAdapter.Connection = CType(revertConnections(Me._lotsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._lotsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._facture_DétailCodeCIPTableAdapter) Is Nothing) Then
                    Me._facture_DétailCodeCIPTableAdapter.Connection = CType(revertConnections(Me._facture_DétailCodeCIPTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_DétailCodeCIPTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._facture_DétailLppTableAdapter) Is Nothing) Then
                    Me._facture_DétailLppTableAdapter.Connection = CType(revertConnections(Me._facture_DétailLppTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_DétailLppTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._facture_LigneFactureTableAdapter) Is Nothing) Then
                    Me._facture_LigneFactureTableAdapter.Connection = CType(revertConnections(Me._facture_LigneFactureTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_LigneFactureTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._aMC__Organismes_Contrat_Type_TableAdapter) Is Nothing) Then
                    Me._aMC__Organismes_Contrat_Type_TableAdapter.Connection = CType(revertConnections(Me._aMC__Organismes_Contrat_Type_TableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._aMC__Organismes_Contrat_Type_TableAdapter.Transaction = Nothing
                End If
                If (Not (Me._aMC_Contrat_TypeTableAdapter) Is Nothing) Then
                    Me._aMC_Contrat_TypeTableAdapter.Connection = CType(revertConnections(Me._aMC_Contrat_TypeTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._aMC_Contrat_TypeTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._aMC_OrganismesTableAdapter) Is Nothing) Then
                    Me._aMC_OrganismesTableAdapter.Connection = CType(revertConnections(Me._aMC_OrganismesTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._aMC_OrganismesTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._codePrestationsTableAdapter) Is Nothing) Then
                    Me._codePrestationsTableAdapter.Connection = CType(revertConnections(Me._codePrestationsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._codePrestationsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._aRLTableAdapter) Is Nothing) Then
                    Me._aRLTableAdapter.Connection = CType(revertConnections(Me._aRLTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._aRLTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._aMOTableAdapter) Is Nothing) Then
                    Me._aMOTableAdapter.Connection = CType(revertConnections(Me._aMOTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._aMOTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._facture_VenteDirecteTableAdapter) Is Nothing) Then
                    Me._facture_VenteDirecteTableAdapter.Connection = CType(revertConnections(Me._facture_VenteDirecteTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._facture_VenteDirecteTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._pop_Allowed_ListTableAdapter) Is Nothing) Then
                    Me._pop_Allowed_ListTableAdapter.Connection = CType(revertConnections(Me._pop_Allowed_ListTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._pop_Allowed_ListTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._convention_Table_correspondanceTableAdapter) Is Nothing) Then
                    Me._convention_Table_correspondanceTableAdapter.Connection = CType(revertConnections(Me._convention_Table_correspondanceTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._convention_Table_correspondanceTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._convention_Table_ConventionsTableAdapter) Is Nothing) Then
                    Me._convention_Table_ConventionsTableAdapter.Connection = CType(revertConnections(Me._convention_Table_ConventionsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._convention_Table_ConventionsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._convention_Table_RegroupementsTableAdapter) Is Nothing) Then
                    Me._convention_Table_RegroupementsTableAdapter.Connection = CType(revertConnections(Me._convention_Table_RegroupementsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._convention_Table_RegroupementsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._taux_CodeRégimeTableAdapter) Is Nothing) Then
                    Me._taux_CodeRégimeTableAdapter.Connection = CType(revertConnections(Me._taux_CodeRégimeTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._taux_CodeRégimeTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._taux_CodeSituationTableAdapter) Is Nothing) Then
                    Me._taux_CodeSituationTableAdapter.Connection = CType(revertConnections(Me._taux_CodeSituationTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._taux_CodeSituationTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._aR_PTableAdapter) Is Nothing) Then
                    Me._aR_PTableAdapter.Connection = CType(revertConnections(Me._aR_PTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._aR_PTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._service_RejetTableAdapter) Is Nothing) Then
                    Me._service_RejetTableAdapter.Connection = CType(revertConnections(Me._service_RejetTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._service_RejetTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._rSP_LIGNE_REJETTableAdapter) Is Nothing) Then
                    Me._rSP_LIGNE_REJETTableAdapter.Connection = CType(revertConnections(Me._rSP_LIGNE_REJETTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._rSP_LIGNE_REJETTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._rSP_PaiementsTableAdapter) Is Nothing) Then
                    Me._rSP_PaiementsTableAdapter.Connection = CType(revertConnections(Me._rSP_PaiementsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._rSP_PaiementsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._lOI_DemandeTableAdapter) Is Nothing) Then
                    Me._lOI_DemandeTableAdapter.Connection = CType(revertConnections(Me._lOI_DemandeTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._lOI_DemandeTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._sCOR_PJTableAdapter) Is Nothing) Then
                    Me._sCOR_PJTableAdapter.Connection = CType(revertConnections(Me._sCOR_PJTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._sCOR_PJTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._sCOR_lotsTableAdapter) Is Nothing) Then
                    Me._sCOR_lotsTableAdapter.Connection = CType(revertConnections(Me._sCOR_lotsTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._sCOR_lotsTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter) Is Nothing) Then
                    Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Connection = CType(revertConnections(Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._compatibilités__codes_prestation__qualité_bénéficiaireTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._compatibilités_codes_prestation_nature_assuranceTableAdapter) Is Nothing) Then
                    Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Connection = CType(revertConnections(Me._compatibilités_codes_prestation_nature_assuranceTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._compatibilités_codes_prestation_nature_assuranceTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._bDM_PrixTableAdapter) Is Nothing) Then
                    Me._bDM_PrixTableAdapter.Connection = CType(revertConnections(Me._bDM_PrixTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._bDM_PrixTableAdapter.Transaction = Nothing
                End If
                If (Not (Me._bDM_médicaments_detournablesTableAdapter) Is Nothing) Then
                    Me._bDM_médicaments_detournablesTableAdapter.Connection = CType(revertConnections(Me._bDM_médicaments_detournablesTableAdapter),Global.System.Data.SqlClient.SqlConnection)
                    Me._bDM_médicaments_detournablesTableAdapter.Transaction = Nothing
                End If
                If (0 < adaptersWithAcceptChangesDuringUpdate.Count) Then
                    Dim adapters((adaptersWithAcceptChangesDuringUpdate.Count) - 1) As Global.System.Data.Common.DataAdapter
                    adaptersWithAcceptChangesDuringUpdate.CopyTo(adapters)
                    Dim i As Integer = 0
                    Do While (i < adapters.Length)
                        Dim adapter As Global.System.Data.Common.DataAdapter = adapters(i)
                        adapter.AcceptChangesDuringUpdate = true
                        i = (i + 1)
                    Loop
                End If
            End Try
            Return result
        End Function
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overridable Sub SortSelfReferenceRows(ByVal rows() As Global.System.Data.DataRow, ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
            Global.System.Array.Sort(Of Global.System.Data.DataRow)(rows, New SelfReferenceComparer(relation, childFirst))
        End Sub
        
        <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
        Protected Overridable Function MatchTableAdapterConnection(ByVal inputConnection As Global.System.Data.IDbConnection) As Boolean
            If (Not (Me._connection) Is Nothing) Then
                Return true
            End If
            If ((Me.Connection Is Nothing)  _
                        OrElse (inputConnection Is Nothing)) Then
                Return true
            End If
            If String.Equals(Me.Connection.ConnectionString, inputConnection.ConnectionString, Global.System.StringComparison.Ordinal) Then
                Return true
            End If
            Return false
        End Function
        
        '''<summary>
        '''Update Order Option
        '''</summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
        Public Enum UpdateOrderOption
            
            InsertUpdateDelete = 0
            
            UpdateInsertDelete = 1
        End Enum
        
        '''<summary>
        '''Used to sort self-referenced table's rows
        '''</summary>
        <Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Data.Design.TypedDataSetGenerator", "2.0.0.0")>  _
        Private Class SelfReferenceComparer
            Inherits Object
            Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow)
            
            Private _relation As Global.System.Data.DataRelation
            
            Private _childFirst As Integer
            
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
            Friend Sub New(ByVal relation As Global.System.Data.DataRelation, ByVal childFirst As Boolean)
                MyBase.New
                Me._relation = relation
                If childFirst Then
                    Me._childFirst = -1
                Else
                    Me._childFirst = 1
                End If
            End Sub
            
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
            Private Function IsChildAndParent(ByVal child As Global.System.Data.DataRow, ByVal parent As Global.System.Data.DataRow) As Boolean
                Global.System.Diagnostics.Debug.Assert((Not (child) Is Nothing))
                Global.System.Diagnostics.Debug.Assert((Not (parent) Is Nothing))
                Dim newParent As Global.System.Data.DataRow = child.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.[Default])

                Do While ((Not (newParent) Is Nothing)  _
                            AndAlso ((Object.ReferenceEquals(newParent, child) = false)  _
                            AndAlso (Object.ReferenceEquals(newParent, parent) = false)))
                    newParent = newParent.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.[Default])

                Loop
                If (newParent Is Nothing) Then
                    newParent = child.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.Original)
                    Do While ((Not (newParent) Is Nothing)  _
                                AndAlso ((Object.ReferenceEquals(newParent, child) = false)  _
                                AndAlso (Object.ReferenceEquals(newParent, parent) = false)))
                        newParent = newParent.GetParentRow(Me._relation, Global.System.Data.DataRowVersion.Original)

                    Loop
                End If
                If Object.ReferenceEquals(newParent, parent) Then
                    Return true
                End If
                Return false
            End Function
            
            <Global.System.Diagnostics.DebuggerNonUserCodeAttribute()>  _
            Public Function Compare(ByVal row1 As Global.System.Data.DataRow, ByVal row2 As Global.System.Data.DataRow) As Integer Implements Global.System.Collections.Generic.IComparer(Of Global.System.Data.DataRow).Compare
                If Object.ReferenceEquals(row1, row2) Then
                    Return 0
                End If
                If (row1 Is Nothing) Then
                    Return -1
                End If
                If (row2 Is Nothing) Then
                    Return 1
                End If

                'Is row1 the child or grandchild of row2
                If Me.IsChildAndParent(row1, row2) Then
                    Return Me._childFirst
                End If

                'Is row2 the child or grandchild of row1
                If Me.IsChildAndParent(row2, row1) Then
                    Return (-1 * Me._childFirst)
                End If
                Return 0
            End Function
        End Class
    End Class
End Namespace
