P4pillon/pharma-gestion
4
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Initial commit

Browse Source
This commit is contained in:
Florian Briand
2025-06-12 16:27:32 +02:00
commit 5a62e97dfb
876 changed files with 831267 additions and 0 deletions
Download Patch File Download Diff File Expand all files Collapse all files

20
DP_Relay/DP_Relay.sln Normal file
View File

@ -0,0 +1,20 @@

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio Express 2012 for Windows Desktop
Project("{F184B08F-C81C-45F6-A57F-5ABD9991F28F}") = "DP_Relay", "DP_Relay\DP_Relay.vbproj", "{34E05A7B-887A-46C8-9A73-8D1A6AA3A8CE}"
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|Any CPU = Debug|Any CPU
Release|Any CPU = Release|Any CPU
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{34E05A7B-887A-46C8-9A73-8D1A6AA3A8CE}.Debug|Any CPU.ActiveCfg = Debug|Any CPU
{34E05A7B-887A-46C8-9A73-8D1A6AA3A8CE}.Debug|Any CPU.Build.0 = Debug|Any CPU
{34E05A7B-887A-46C8-9A73-8D1A6AA3A8CE}.Release|Any CPU.ActiveCfg = Release|Any CPU
{34E05A7B-887A-46C8-9A73-8D1A6AA3A8CE}.Release|Any CPU.Build.0 = Release|Any CPU
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
EndGlobal

69
DP_Relay/DP_Relay/App.config Normal file
View File

@ -0,0 +1,69 @@
<?xml version="1.0"?>
<!--
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/>.
-->
<configuration>
<configSections>
</configSections>
<connectionStrings>
<add name="DP_Relay.My.MySettings.PharmaConnectionString" connectionString="Data Source=JUJU_PORTABLE\SQLEXPRESS;Initial Catalog=Pharma;Persist Security Info=True;User ID=Test;Password=Test12345"
providerName="System.Data.SqlClient" />
</connectionStrings>
<startup>
<supportedRuntime version="v4.0" sku=".NETFramework,Version=v4.6.1"/>
</startup>
<system.diagnostics>
<sources>
<source name="System.Net">
<listeners>
<add name="System.Net"/>
</listeners>
</source>
<source name="System.Net.Cache">
<listeners>
<add name="System.Net"/>
</listeners>
</source>
<source name="System.Net.Http">
<listeners>
<add name="System.Net"/>
</listeners>
</source>
<source name="System.Net.Sockets">
<listeners>
<add name="System.Net"/>
</listeners>
</source>
<source name="System.Net.WebSockets">
<listeners>
<add name="System.Net"/>
</listeners>
</source>
</sources>
<switches>
<add name="System.Net" value="Verbose"/>
<add name="System.Net.Cache" value="Verbose"/>
<add name="System.Net.Http" value="Verbose"/>
<add name="System.Net.Sockets" value="Verbose"/>
<add name="System.Net.WebSockets" value="Verbose"/>
</switches>
<sharedListeners>
<add name="System.Net" type="System.Diagnostics.TextWriterTraceListener" initializeData="network.log"/>
</sharedListeners>
<trace autoflush="true"/>
</system.diagnostics>
</configuration>

14
DP_Relay/DP_Relay/ApplicationEvents.vb Normal file
View File

@ -0,0 +1,14 @@
' 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/>.

493
DP_Relay/DP_Relay/BDD.Designer.vb generated Normal file
View File

@ -0,0 +1,493 @@
' 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/>.
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class BDD
Inherits System.Windows.Forms.Form
'Form remplace la méthode Dispose pour nettoyer la liste des composants.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requise par le Concepteur Windows Form
Private components As System.ComponentModel.IContainer
'REMARQUE : la procédure suivante est requise par le Concepteur Windows Form
'Elle peut être modifiée à l'aide du Concepteur Windows Form.
'Ne la modifiez pas à l'aide de l'éditeur de code.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(BDD))
Me.PharmaDataSet1 = New DP_Relay.PharmaDataSet1()
Me.DP_ALERTE_PRODUITBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DP_ALERTE_PRODUITTableAdapter = New DP_Relay.PharmaDataSet1TableAdapters.DP_ALERTE_PRODUITTableAdapter()
Me.TableAdapterManager = New DP_Relay.PharmaDataSet1TableAdapters.TableAdapterManager()
Me.DP_ALERTE_PRODUITBindingNavigator = New System.Windows.Forms.BindingNavigator(Me.components)
Me.BindingNavigatorMoveFirstItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMovePreviousItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorPositionItem = New System.Windows.Forms.ToolStripTextBox()
Me.BindingNavigatorCountItem = New System.Windows.Forms.ToolStripLabel()
Me.BindingNavigatorSeparator1 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorMoveNextItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorMoveLastItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorSeparator2 = New System.Windows.Forms.ToolStripSeparator()
Me.BindingNavigatorAddNewItem = New System.Windows.Forms.ToolStripButton()
Me.BindingNavigatorDeleteItem = New System.Windows.Forms.ToolStripButton()
Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem = New System.Windows.Forms.ToolStripButton()
Me.DP_ALERTE_PRODUITDataGridView = New System.Windows.Forms.DataGridView()
Me.DataGridViewTextBoxColumn1 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn2 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn3 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewCheckBoxColumn1 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DP_MsgBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DP_MsgTableAdapter = New DP_Relay.PharmaDataSet1TableAdapters.DP_MsgTableAdapter()
Me.DP_MsgDataGridView = New System.Windows.Forms.DataGridView()
Me.DataGridViewTextBoxColumn4 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn5 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn6 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn7 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn8 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn9 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewCheckBoxColumn2 = New System.Windows.Forms.DataGridViewCheckBoxColumn()
Me.DataGridViewTextBoxColumn10 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn11 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn12 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn13 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn14 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DP_ReqBindingSource = New System.Windows.Forms.BindingSource(Me.components)
Me.DP_ReqTableAdapter = New DP_Relay.PharmaDataSet1TableAdapters.DP_ReqTableAdapter()
Me.DP_ReqDataGridView = New System.Windows.Forms.DataGridView()
Me.DataGridViewTextBoxColumn15 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn16 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn17 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn18 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn19 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn20 = New System.Windows.Forms.DataGridViewTextBoxColumn()
Me.DataGridViewTextBoxColumn21 = New System.Windows.Forms.DataGridViewTextBoxColumn()
CType(Me.PharmaDataSet1, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DP_ALERTE_PRODUITBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DP_ALERTE_PRODUITBindingNavigator, System.ComponentModel.ISupportInitialize).BeginInit()
Me.DP_ALERTE_PRODUITBindingNavigator.SuspendLayout()
CType(Me.DP_ALERTE_PRODUITDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DP_MsgBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DP_MsgDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DP_ReqBindingSource, System.ComponentModel.ISupportInitialize).BeginInit()
CType(Me.DP_ReqDataGridView, System.ComponentModel.ISupportInitialize).BeginInit()
Me.SuspendLayout()
'
'PharmaDataSet1
'
Me.PharmaDataSet1.DataSetName = "PharmaDataSet1"
Me.PharmaDataSet1.SchemaSerializationMode = System.Data.SchemaSerializationMode.IncludeSchema
'
'DP_ALERTE_PRODUITBindingSource
'
Me.DP_ALERTE_PRODUITBindingSource.DataMember = "DP_ALERTE_PRODUIT"
Me.DP_ALERTE_PRODUITBindingSource.DataSource = Me.PharmaDataSet1
'
'DP_ALERTE_PRODUITTableAdapter
'
Me.DP_ALERTE_PRODUITTableAdapter.ClearBeforeFill = True
'
'TableAdapterManager
'
Me.TableAdapterManager.BackupDataSetBeforeUpdate = False
Me.TableAdapterManager.DP_ALERTE_PRODUITTableAdapter = Me.DP_ALERTE_PRODUITTableAdapter
Me.TableAdapterManager.DP_MsgTableAdapter = Me.DP_MsgTableAdapter
Me.TableAdapterManager.DP_ReqTableAdapter = Me.DP_ReqTableAdapter
Me.TableAdapterManager.UpdateOrder = DP_Relay.PharmaDataSet1TableAdapters.TableAdapterManager.UpdateOrderOption.InsertUpdateDelete
'
'DP_ALERTE_PRODUITBindingNavigator
'
Me.DP_ALERTE_PRODUITBindingNavigator.AddNewItem = Me.BindingNavigatorAddNewItem
Me.DP_ALERTE_PRODUITBindingNavigator.BindingSource = Me.DP_ALERTE_PRODUITBindingSource
Me.DP_ALERTE_PRODUITBindingNavigator.CountItem = Me.BindingNavigatorCountItem
Me.DP_ALERTE_PRODUITBindingNavigator.DeleteItem = Me.BindingNavigatorDeleteItem
Me.DP_ALERTE_PRODUITBindingNavigator.Items.AddRange(New System.Windows.Forms.ToolStripItem() {Me.BindingNavigatorMoveFirstItem, Me.BindingNavigatorMovePreviousItem, Me.BindingNavigatorSeparator, Me.BindingNavigatorPositionItem, Me.BindingNavigatorCountItem, Me.BindingNavigatorSeparator1, Me.BindingNavigatorMoveNextItem, Me.BindingNavigatorMoveLastItem, Me.BindingNavigatorSeparator2, Me.BindingNavigatorAddNewItem, Me.BindingNavigatorDeleteItem, Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem})
Me.DP_ALERTE_PRODUITBindingNavigator.Location = New System.Drawing.Point(0, 0)
Me.DP_ALERTE_PRODUITBindingNavigator.MoveFirstItem = Me.BindingNavigatorMoveFirstItem
Me.DP_ALERTE_PRODUITBindingNavigator.MoveLastItem = Me.BindingNavigatorMoveLastItem
Me.DP_ALERTE_PRODUITBindingNavigator.MoveNextItem = Me.BindingNavigatorMoveNextItem
Me.DP_ALERTE_PRODUITBindingNavigator.MovePreviousItem = Me.BindingNavigatorMovePreviousItem
Me.DP_ALERTE_PRODUITBindingNavigator.Name = "DP_ALERTE_PRODUITBindingNavigator"
Me.DP_ALERTE_PRODUITBindingNavigator.PositionItem = Me.BindingNavigatorPositionItem
Me.DP_ALERTE_PRODUITBindingNavigator.Size = New System.Drawing.Size(691, 25)
Me.DP_ALERTE_PRODUITBindingNavigator.TabIndex = 0
Me.DP_ALERTE_PRODUITBindingNavigator.Text = "BindingNavigator1"
'
'BindingNavigatorMoveFirstItem
'
Me.BindingNavigatorMoveFirstItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveFirstItem.Image = CType(resources.GetObject("BindingNavigatorMoveFirstItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveFirstItem.Name = "BindingNavigatorMoveFirstItem"
Me.BindingNavigatorMoveFirstItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveFirstItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMoveFirstItem.Text = "Placer en premier"
'
'BindingNavigatorMovePreviousItem
'
Me.BindingNavigatorMovePreviousItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMovePreviousItem.Image = CType(resources.GetObject("BindingNavigatorMovePreviousItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMovePreviousItem.Name = "BindingNavigatorMovePreviousItem"
Me.BindingNavigatorMovePreviousItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMovePreviousItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorMovePreviousItem.Text = "Déplacer vers le haut"
'
'BindingNavigatorSeparator
'
Me.BindingNavigatorSeparator.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator.Size = New System.Drawing.Size(6, 25)
'
'BindingNavigatorPositionItem
'
Me.BindingNavigatorPositionItem.AccessibleName = "Position"
Me.BindingNavigatorPositionItem.AutoSize = False
Me.BindingNavigatorPositionItem.Name = "BindingNavigatorPositionItem"
Me.BindingNavigatorPositionItem.Size = New System.Drawing.Size(50, 23)
Me.BindingNavigatorPositionItem.Text = "0"
Me.BindingNavigatorPositionItem.ToolTipText = "Position actuelle"
'
'BindingNavigatorCountItem
'
Me.BindingNavigatorCountItem.Name = "BindingNavigatorCountItem"
Me.BindingNavigatorCountItem.Size = New System.Drawing.Size(37, 15)
Me.BindingNavigatorCountItem.Text = "de {0}"
Me.BindingNavigatorCountItem.ToolTipText = "Nombre total d'éléments"
'
'BindingNavigatorSeparator1
'
Me.BindingNavigatorSeparator1.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator1.Size = New System.Drawing.Size(6, 6)
'
'BindingNavigatorMoveNextItem
'
Me.BindingNavigatorMoveNextItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveNextItem.Image = CType(resources.GetObject("BindingNavigatorMoveNextItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveNextItem.Name = "BindingNavigatorMoveNextItem"
Me.BindingNavigatorMoveNextItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveNextItem.Size = New System.Drawing.Size(23, 20)
Me.BindingNavigatorMoveNextItem.Text = "Déplacer vers le bas"
'
'BindingNavigatorMoveLastItem
'
Me.BindingNavigatorMoveLastItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorMoveLastItem.Image = CType(resources.GetObject("BindingNavigatorMoveLastItem.Image"), System.Drawing.Image)
Me.BindingNavigatorMoveLastItem.Name = "BindingNavigatorMoveLastItem"
Me.BindingNavigatorMoveLastItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorMoveLastItem.Size = New System.Drawing.Size(23, 20)
Me.BindingNavigatorMoveLastItem.Text = "Placer en dernier"
'
'BindingNavigatorSeparator2
'
Me.BindingNavigatorSeparator2.Name = "BindingNavigatorSeparator"
Me.BindingNavigatorSeparator2.Size = New System.Drawing.Size(6, 6)
'
'BindingNavigatorAddNewItem
'
Me.BindingNavigatorAddNewItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorAddNewItem.Image = CType(resources.GetObject("BindingNavigatorAddNewItem.Image"), System.Drawing.Image)
Me.BindingNavigatorAddNewItem.Name = "BindingNavigatorAddNewItem"
Me.BindingNavigatorAddNewItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorAddNewItem.Size = New System.Drawing.Size(23, 22)
Me.BindingNavigatorAddNewItem.Text = "Ajouter nouveau"
'
'BindingNavigatorDeleteItem
'
Me.BindingNavigatorDeleteItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.BindingNavigatorDeleteItem.Image = CType(resources.GetObject("BindingNavigatorDeleteItem.Image"), System.Drawing.Image)
Me.BindingNavigatorDeleteItem.Name = "BindingNavigatorDeleteItem"
Me.BindingNavigatorDeleteItem.RightToLeftAutoMirrorImage = True
Me.BindingNavigatorDeleteItem.Size = New System.Drawing.Size(23, 20)
Me.BindingNavigatorDeleteItem.Text = "Supprimer"
'
'DP_ALERTE_PRODUITBindingNavigatorSaveItem
'
Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem.DisplayStyle = System.Windows.Forms.ToolStripItemDisplayStyle.Image
Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem.Image = CType(resources.GetObject("DP_ALERTE_PRODUITBindingNavigatorSaveItem.Image"), System.Drawing.Image)
Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem.Name = "DP_ALERTE_PRODUITBindingNavigatorSaveItem"
Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem.Size = New System.Drawing.Size(23, 23)
Me.DP_ALERTE_PRODUITBindingNavigatorSaveItem.Text = "Enregistrer les données"
'
'DP_ALERTE_PRODUITDataGridView
'
Me.DP_ALERTE_PRODUITDataGridView.AutoGenerateColumns = False
Me.DP_ALERTE_PRODUITDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.DP_ALERTE_PRODUITDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn1, Me.DataGridViewTextBoxColumn2, Me.DataGridViewTextBoxColumn3, Me.DataGridViewCheckBoxColumn1})
Me.DP_ALERTE_PRODUITDataGridView.DataSource = Me.DP_ALERTE_PRODUITBindingSource
Me.DP_ALERTE_PRODUITDataGridView.Location = New System.Drawing.Point(199, 115)
Me.DP_ALERTE_PRODUITDataGridView.Name = "DP_ALERTE_PRODUITDataGridView"
Me.DP_ALERTE_PRODUITDataGridView.Size = New System.Drawing.Size(300, 220)
Me.DP_ALERTE_PRODUITDataGridView.TabIndex = 1
'
'DataGridViewTextBoxColumn1
'
Me.DataGridViewTextBoxColumn1.DataPropertyName = "CIP"
Me.DataGridViewTextBoxColumn1.HeaderText = "CIP"
Me.DataGridViewTextBoxColumn1.Name = "DataGridViewTextBoxColumn1"
'
'DataGridViewTextBoxColumn2
'
Me.DataGridViewTextBoxColumn2.DataPropertyName = "MsgRef"
Me.DataGridViewTextBoxColumn2.HeaderText = "MsgRef"
Me.DataGridViewTextBoxColumn2.Name = "DataGridViewTextBoxColumn2"
'
'DataGridViewTextBoxColumn3
'
Me.DataGridViewTextBoxColumn3.DataPropertyName = "Lots"
Me.DataGridViewTextBoxColumn3.HeaderText = "Lots"
Me.DataGridViewTextBoxColumn3.Name = "DataGridViewTextBoxColumn3"
'
'DataGridViewCheckBoxColumn1
'
Me.DataGridViewCheckBoxColumn1.DataPropertyName = "Vue"
Me.DataGridViewCheckBoxColumn1.HeaderText = "Vue"
Me.DataGridViewCheckBoxColumn1.Name = "DataGridViewCheckBoxColumn1"
'
'DP_MsgBindingSource
'
Me.DP_MsgBindingSource.DataMember = "DP_Msg"
Me.DP_MsgBindingSource.DataSource = Me.PharmaDataSet1
'
'DP_MsgTableAdapter
'
Me.DP_MsgTableAdapter.ClearBeforeFill = True
'
'DP_MsgDataGridView
'
Me.DP_MsgDataGridView.AutoGenerateColumns = False
Me.DP_MsgDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.DP_MsgDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn4, Me.DataGridViewTextBoxColumn5, Me.DataGridViewTextBoxColumn6, Me.DataGridViewTextBoxColumn7, Me.DataGridViewTextBoxColumn8, Me.DataGridViewTextBoxColumn9, Me.DataGridViewCheckBoxColumn2, Me.DataGridViewTextBoxColumn10, Me.DataGridViewTextBoxColumn11, Me.DataGridViewTextBoxColumn12, Me.DataGridViewTextBoxColumn13, Me.DataGridViewTextBoxColumn14})
Me.DP_MsgDataGridView.DataSource = Me.DP_MsgBindingSource
Me.DP_MsgDataGridView.Location = New System.Drawing.Point(371, 51)
Me.DP_MsgDataGridView.Name = "DP_MsgDataGridView"
Me.DP_MsgDataGridView.Size = New System.Drawing.Size(300, 220)
Me.DP_MsgDataGridView.TabIndex = 2
'
'DataGridViewTextBoxColumn4
'
Me.DataGridViewTextBoxColumn4.DataPropertyName = "MsgRef"
Me.DataGridViewTextBoxColumn4.HeaderText = "MsgRef"
Me.DataGridViewTextBoxColumn4.Name = "DataGridViewTextBoxColumn4"
'
'DataGridViewTextBoxColumn5
'
Me.DataGridViewTextBoxColumn5.DataPropertyName = "MsgTyp"
Me.DataGridViewTextBoxColumn5.HeaderText = "MsgTyp"
Me.DataGridViewTextBoxColumn5.Name = "DataGridViewTextBoxColumn5"
'
'DataGridViewTextBoxColumn6
'
Me.DataGridViewTextBoxColumn6.DataPropertyName = "MsgLect"
Me.DataGridViewTextBoxColumn6.HeaderText = "MsgLect"
Me.DataGridViewTextBoxColumn6.Name = "DataGridViewTextBoxColumn6"
'
'DataGridViewTextBoxColumn7
'
Me.DataGridViewTextBoxColumn7.DataPropertyName = "MsgDate"
Me.DataGridViewTextBoxColumn7.HeaderText = "MsgDate"
Me.DataGridViewTextBoxColumn7.Name = "DataGridViewTextBoxColumn7"
'
'DataGridViewTextBoxColumn8
'
Me.DataGridViewTextBoxColumn8.DataPropertyName = "MsgExpi"
Me.DataGridViewTextBoxColumn8.HeaderText = "MsgExpi"
Me.DataGridViewTextBoxColumn8.Name = "DataGridViewTextBoxColumn8"
'
'DataGridViewTextBoxColumn9
'
Me.DataGridViewTextBoxColumn9.DataPropertyName = "Reader"
Me.DataGridViewTextBoxColumn9.HeaderText = "Reader"
Me.DataGridViewTextBoxColumn9.Name = "DataGridViewTextBoxColumn9"
'
'DataGridViewCheckBoxColumn2
'
Me.DataGridViewCheckBoxColumn2.DataPropertyName = "AR_sent"
Me.DataGridViewCheckBoxColumn2.HeaderText = "AR_sent"
Me.DataGridViewCheckBoxColumn2.Name = "DataGridViewCheckBoxColumn2"
'
'DataGridViewTextBoxColumn10
'
Me.DataGridViewTextBoxColumn10.DataPropertyName = "AR_Statut"
Me.DataGridViewTextBoxColumn10.HeaderText = "AR_Statut"
Me.DataGridViewTextBoxColumn10.Name = "DataGridViewTextBoxColumn10"
'
'DataGridViewTextBoxColumn11
'
Me.DataGridViewTextBoxColumn11.DataPropertyName = "AR_nbr_transmission"
Me.DataGridViewTextBoxColumn11.HeaderText = "AR_nbr_transmission"
Me.DataGridViewTextBoxColumn11.Name = "DataGridViewTextBoxColumn11"
'
'DataGridViewTextBoxColumn12
'
Me.DataGridViewTextBoxColumn12.DataPropertyName = "AR_next_trans_time"
Me.DataGridViewTextBoxColumn12.HeaderText = "AR_next_trans_time"
Me.DataGridViewTextBoxColumn12.Name = "DataGridViewTextBoxColumn12"
'
'DataGridViewTextBoxColumn13
'
Me.DataGridViewTextBoxColumn13.DataPropertyName = "MsgEme"
Me.DataGridViewTextBoxColumn13.HeaderText = "MsgEme"
Me.DataGridViewTextBoxColumn13.Name = "DataGridViewTextBoxColumn13"
'
'DataGridViewTextBoxColumn14
'
Me.DataGridViewTextBoxColumn14.DataPropertyName = "MsgTit"
Me.DataGridViewTextBoxColumn14.HeaderText = "MsgTit"
Me.DataGridViewTextBoxColumn14.Name = "DataGridViewTextBoxColumn14"
'
'DP_ReqBindingSource
'
Me.DP_ReqBindingSource.DataMember = "DP_Req"
Me.DP_ReqBindingSource.DataSource = Me.PharmaDataSet1
'
'DP_ReqTableAdapter
'
Me.DP_ReqTableAdapter.ClearBeforeFill = True
'
'DP_ReqDataGridView
'
Me.DP_ReqDataGridView.AutoGenerateColumns = False
Me.DP_ReqDataGridView.ColumnHeadersHeightSizeMode = System.Windows.Forms.DataGridViewColumnHeadersHeightSizeMode.AutoSize
Me.DP_ReqDataGridView.Columns.AddRange(New System.Windows.Forms.DataGridViewColumn() {Me.DataGridViewTextBoxColumn15, Me.DataGridViewTextBoxColumn16, Me.DataGridViewTextBoxColumn17, Me.DataGridViewTextBoxColumn18, Me.DataGridViewTextBoxColumn19, Me.DataGridViewTextBoxColumn20, Me.DataGridViewTextBoxColumn21})
Me.DP_ReqDataGridView.DataSource = Me.DP_ReqBindingSource
Me.DP_ReqDataGridView.Location = New System.Drawing.Point(107, 127)
Me.DP_ReqDataGridView.Name = "DP_ReqDataGridView"
Me.DP_ReqDataGridView.Size = New System.Drawing.Size(300, 220)
Me.DP_ReqDataGridView.TabIndex = 3
'
'DataGridViewTextBoxColumn15
'
Me.DataGridViewTextBoxColumn15.DataPropertyName = "Sequence_Number"
Me.DataGridViewTextBoxColumn15.HeaderText = "Sequence_Number"
Me.DataGridViewTextBoxColumn15.Name = "DataGridViewTextBoxColumn15"
'
'DataGridViewTextBoxColumn16
'
Me.DataGridViewTextBoxColumn16.DataPropertyName = "ReqId"
Me.DataGridViewTextBoxColumn16.HeaderText = "ReqId"
Me.DataGridViewTextBoxColumn16.Name = "DataGridViewTextBoxColumn16"
'
'DataGridViewTextBoxColumn17
'
Me.DataGridViewTextBoxColumn17.DataPropertyName = "Statut"
Me.DataGridViewTextBoxColumn17.HeaderText = "Statut"
Me.DataGridViewTextBoxColumn17.Name = "DataGridViewTextBoxColumn17"
'
'DataGridViewTextBoxColumn18
'
Me.DataGridViewTextBoxColumn18.DataPropertyName = "next_trans_time"
Me.DataGridViewTextBoxColumn18.HeaderText = "next_trans_time"
Me.DataGridViewTextBoxColumn18.Name = "DataGridViewTextBoxColumn18"
'
'DataGridViewTextBoxColumn19
'
Me.DataGridViewTextBoxColumn19.DataPropertyName = "nbr_trans"
Me.DataGridViewTextBoxColumn19.HeaderText = "nbr_trans"
Me.DataGridViewTextBoxColumn19.Name = "DataGridViewTextBoxColumn19"
'
'DataGridViewTextBoxColumn20
'
Me.DataGridViewTextBoxColumn20.DataPropertyName = "Identifiant_patient"
Me.DataGridViewTextBoxColumn20.HeaderText = "Identifiant_patient"
Me.DataGridViewTextBoxColumn20.Name = "DataGridViewTextBoxColumn20"
'
'DataGridViewTextBoxColumn21
'
Me.DataGridViewTextBoxColumn21.DataPropertyName = "référence_interne"
Me.DataGridViewTextBoxColumn21.HeaderText = "référence_interne"
Me.DataGridViewTextBoxColumn21.Name = "DataGridViewTextBoxColumn21"
'
'BDD
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.ClientSize = New System.Drawing.Size(691, 367)
Me.Controls.Add(Me.DP_ReqDataGridView)
Me.Controls.Add(Me.DP_MsgDataGridView)
Me.Controls.Add(Me.DP_ALERTE_PRODUITDataGridView)
Me.Controls.Add(Me.DP_ALERTE_PRODUITBindingNavigator)
Me.Name = "BDD"
Me.Text = "BDD"
CType(Me.PharmaDataSet1, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DP_ALERTE_PRODUITBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DP_ALERTE_PRODUITBindingNavigator, System.ComponentModel.ISupportInitialize).EndInit()
Me.DP_ALERTE_PRODUITBindingNavigator.ResumeLayout(False)
Me.DP_ALERTE_PRODUITBindingNavigator.PerformLayout()
CType(Me.DP_ALERTE_PRODUITDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DP_MsgBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DP_MsgDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DP_ReqBindingSource, System.ComponentModel.ISupportInitialize).EndInit()
CType(Me.DP_ReqDataGridView, System.ComponentModel.ISupportInitialize).EndInit()
Me.ResumeLayout(False)
Me.PerformLayout()
End Sub
Friend WithEvents PharmaDataSet1 As DP_Relay.PharmaDataSet1
Friend WithEvents DP_ALERTE_PRODUITBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents DP_ALERTE_PRODUITTableAdapter As DP_Relay.PharmaDataSet1TableAdapters.DP_ALERTE_PRODUITTableAdapter
Friend WithEvents TableAdapterManager As DP_Relay.PharmaDataSet1TableAdapters.TableAdapterManager
Friend WithEvents DP_ALERTE_PRODUITBindingNavigator As System.Windows.Forms.BindingNavigator
Friend WithEvents BindingNavigatorAddNewItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorCountItem As System.Windows.Forms.ToolStripLabel
Friend WithEvents BindingNavigatorDeleteItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveFirstItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMovePreviousItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator As System.Windows.Forms.ToolStripSeparator
Friend WithEvents BindingNavigatorPositionItem As System.Windows.Forms.ToolStripTextBox
Friend WithEvents BindingNavigatorSeparator1 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents BindingNavigatorMoveNextItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorMoveLastItem As System.Windows.Forms.ToolStripButton
Friend WithEvents BindingNavigatorSeparator2 As System.Windows.Forms.ToolStripSeparator
Friend WithEvents DP_ALERTE_PRODUITBindingNavigatorSaveItem As System.Windows.Forms.ToolStripButton
Friend WithEvents DP_ALERTE_PRODUITDataGridView As System.Windows.Forms.DataGridView
Friend WithEvents DataGridViewTextBoxColumn1 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn2 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn3 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn1 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DP_MsgTableAdapter As DP_Relay.PharmaDataSet1TableAdapters.DP_MsgTableAdapter
Friend WithEvents DP_MsgBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents DP_ReqTableAdapter As DP_Relay.PharmaDataSet1TableAdapters.DP_ReqTableAdapter
Friend WithEvents DP_MsgDataGridView As System.Windows.Forms.DataGridView
Friend WithEvents DataGridViewTextBoxColumn4 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn5 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn6 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn7 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn8 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn9 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewCheckBoxColumn2 As System.Windows.Forms.DataGridViewCheckBoxColumn
Friend WithEvents DataGridViewTextBoxColumn10 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn11 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn12 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn13 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn14 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DP_ReqBindingSource As System.Windows.Forms.BindingSource
Friend WithEvents DP_ReqDataGridView As System.Windows.Forms.DataGridView
Friend WithEvents DataGridViewTextBoxColumn15 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn16 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn17 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn18 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn19 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn20 As System.Windows.Forms.DataGridViewTextBoxColumn
Friend WithEvents DataGridViewTextBoxColumn21 As System.Windows.Forms.DataGridViewTextBoxColumn
End Class

236
DP_Relay/DP_Relay/BDD.resx Normal file
View File

@ -0,0 +1,236 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
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/>.
-->
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:import namespace="http://www.w3.org/XML/1998/namespace" />
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" use="required" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
<xsd:attribute ref="xml:space" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<metadata name="PharmaDataSet1.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 17</value>
</metadata>
<metadata name="DP_ALERTE_PRODUITBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>159, 17</value>
</metadata>
<metadata name="DP_ALERTE_PRODUITTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>406, 17</value>
</metadata>
<metadata name="TableAdapterManager.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>647, 17</value>
</metadata>
<metadata name="DP_MsgTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>17, 56</value>
</metadata>
<metadata name="DP_ReqTableAdapter.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>358, 56</value>
</metadata>
<metadata name="DP_ALERTE_PRODUITBindingNavigator.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>820, 17</value>
</metadata>
<assembly alias="System.Drawing" name="System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a" />
<data name="BindingNavigatorAddNewItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFKSURBVDhPYxi84O4C9v+35nH+vzqH6//FGbz/ocLEg+tA
jX8eNf7/87Dh/8nJAqQbcH46L9yAgz0ipBtwfJIgUHPd/z8Pqv7vaBcnbMClmTz/z07l+38SqPFIv9D/
fd0iQM3l///eK/q/vkHm/6oauf9LKxX/zy9V/j+rSBXTwFNAf/55WA/UVAvElf//3CsB4rz/f+9m/v97
J/n/39tx///djADikP+TcjQxDTjUKwx27t/7pUCNBUCN2UCNqUCNCf//3YoGagz7/+9G0P9/1/3+d6Xp
Yhqws13i/5Zmqf/rwM6V/7+kQvH/31sxQI3h/6fmafyfkKX1vztD9397qv7/5kRDwmEyG+hPkHP/3Qj4
35OhQ1gDOgD5898NfyD2+9+arE+6Ad3pumD/gnB9nBHpBrQkGfxviDf8XxNr/L8y2oR0A+gEGBgAJCPY
nnX8iGkAAAAASUVORK5CYII=
</value>
</data>
<data name="BindingNavigatorDeleteItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAFvSURBVDhPtZBNKMNhHMd3Vd5K7eKCWjkgk7yEZDKksciE
yMwkBw6LhHZxcCDlQg64SA4kJeVE4jRv89qaWn8tUtoF/7g8H2Ootb+x4nt56nm+38/v+/xUfyJcJ9Bt
BMcOH1eRiZV5RGcVwqyHrfWwELweWJoJ9rC2AL0mRLse0VEBcxOKkLeGwlwGIz2h75w6ApC6bERjAdia
gkxiyIow5cKkPWxDFYvTiMrUdxDDVnCfwVh/AOo/P2zhhccFzcWBLxmzEPV50Nfyu/Cn2N/1V85DGNKh
Rhth+EaCxkLISUDWxvOgjYXa7F/Wv7kGUz4UJeKzGODi6H25d2l+yPLsDwu8v4NWHY8lSbhL0/HtbX8F
GLXh1MQgnxwoQ3h5hkEL6JI5TlPj21gNMd6WZyC1VSN7r0Mh7G4i56pxpkQhdTWA/KQ4aUcTh+x0KACm
RpBSo3HrM0G6Uq7pl2zvhvNDBcClE8YH4HDv2/A/SKV6BYojAxyEJtLJAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveFirstItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEqSURBVDhPYxg8oHDW8/9NC57/z5z4+D9UCAOEtz/AKceQ
O/PZ/1VH3v/HpSi++8H/4IZruA3ImPL0/8J9H7Aqiu95+H/p/v///asv4DYgoefJ/2lb3mMoimi/D9ac
Oev/f6/SE7gNiOx69L939QcURaGt98CaW9cBbe/8+98l/wBuAwKbH/6vm/8Orii45e7/RXv//+8Aas6Y
8/O/Xd3P//YZ23Eb4FF1/3/+tDcoiuyKb/9Pn/P7v3/Xt/86he/+WySsx22Afend/9mTX2Mo0k85/9+k
6MV/laxP/40jl+E2wCLvzv/U/tdYFRkknfgvm/b1v27wPNwGGGbd/h/W8hKnIv3Uy/81fKfhNkAn7cZ/
v+qHeBWpeEzAbYBT7pX/IAV4FQ1CwMAAAPB2wKul5ZpwAAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMovePreviousItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAC2SURBVDhPYxg6ILz9wX8ok3QQ3/3gf3DDNfIMiO95+H/p
/v///asvkG5ARPt9sObMWf//e5WeIM2A0NZ7YM2t64C2d/7975J/gHgDglvu/l+09///DqDmjDk//9vV
/fxvn7GdNBfYFd/+nz7n93//rm//dQrf/bdIWE96GOinnP9vUvTiv0rWp//GkctINwAEDJJO/JdN+/pf
N3geeQaAgH7q5f8avtPINwAEVDwmUGbAYAUMDADQFGCYBLpQVQAAAABJRU5ErkJggg==
</value>
</data>
<data name="BindingNavigatorMoveNextItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAACjSURBVDhPYxh8oHDW8/9QJnkgd+az/wnd98g3JGPK0//z
9v/+n9B1hzxDEnqe/J+979f/zq1//7uVXibdkMiuR/+nbPv1v2Tp3/8J0//+t8k9S5ohgc0P/7eufQ/W
bFzy5b909LX/xpHLiDfEo+r+/5K57+CaFV16SHOBfend/4Etz8jTDAIWeXf+2xRcIU8zCBhm3SZfMwjo
pN0gX/NQBAwMAKB+X6AHNEI4AAAAAElFTkSuQmCC
</value>
</data>
<data name="BindingNavigatorMoveLastItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAAEsSURBVDhPYxhcoHDW8/9QJgYAyTUteP4/c+JjnGoYcmc+
+5/QfQ+rApDcqiPv/4e3P8BtQMaUp//n7f/9P6HrDoYikNzCfR/+Bzdcw21AQs+T/7P3/frfufXvf7fS
yygKQXLTtrz/7199AbcBkV2P/k/Z9ut/ydK//xOm//1vk3sWrhgk17v6w3+v0hO4DQhsfvi/de17sGbj
ki//paOv/TeOXAbWAJKrm//uv0v+AdwGeFTd/18y9x1cs6JLD1wxSC5/2pv/9hnbcRtgX3r3f2DLMwzN
IACSy578+r9FwnrcBljk3flvU3AFQzMIgORS+1/DvYQVGGbdxqoZBEByYS0v/+sGz8NtgE7aDZySIDm/
6of/NXyn4TYAH3DKvfJfxWMCGEOFBgVgYAAAvtG/s7kMTpwAAAAASUVORK5CYII=
</value>
</data>
<data name="DP_ALERTE_PRODUITBindingNavigatorSaveItem.Image" type="System.Drawing.Bitmap, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>
iVBORw0KGgoAAAANSUhEUgAAABAAAAAQCAYAAAAf8/9hAAAAAXNSR0IArs4c6QAAAARnQU1BAACxjwv8
YQUAAAAJcEhZcwAADsMAAA7DAcdvqGQAAABMSURBVDhPY6AK+Pbt239SMVQrBIAEnJyc4PjD+49wjCwG
otva2jANIcUAEIYZAtVOugEgTLQByBhZDW0NIAaPGjAoDSAHQ7VTAhgYAE2K+Vet//BHAAAAAElFTkSu
QmCC
</value>
</data>
<metadata name="DP_MsgBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>1083, 17</value>
</metadata>
<metadata name="DP_ReqBindingSource.TrayLocation" type="System.Drawing.Point, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a">
<value>186, 56</value>
</metadata>
</root>

33
DP_Relay/DP_Relay/BDD.vb Normal file
View File

@ -0,0 +1,33 @@
' 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/>.
Public Class BDD
Private Sub DP_ALERTE_PRODUITBindingNavigatorSaveItem_Click(sender As Object, e As EventArgs) Handles DP_ALERTE_PRODUITBindingNavigatorSaveItem.Click
Me.Validate()
Me.DP_ALERTE_PRODUITBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.PharmaDataSet1)
End Sub
Private Sub BDD_Load(sender As Object, e As EventArgs) Handles MyBase.Load
'TODO: cette ligne de code charge les données dans la table 'PharmaDataSet1.DP_Req'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
Me.DP_ReqTableAdapter.Fill(Me.PharmaDataSet1.DP_Req)
'TODO: cette ligne de code charge les données dans la table 'PharmaDataSet1.DP_Msg'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
Me.DP_MsgTableAdapter.Fill(Me.PharmaDataSet1.DP_Msg)
'TODO: cette ligne de code charge les données dans la table 'PharmaDataSet1.DP_ALERTE_PRODUIT'. Vous pouvez la déplacer ou la supprimer selon vos besoins.
Me.DP_ALERTE_PRODUITTableAdapter.Fill(Me.PharmaDataSet1.DP_ALERTE_PRODUIT)
End Sub
End Class

502
DP_Relay/DP_Relay/DP.vb Normal file
View File

@ -0,0 +1,502 @@
' Copyright (C) 2025 P4pillon.org
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU Affero General Public License as
' published by the Free Software Foundation, either version 3 of the
' License, or (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU Affero General Public License for more details.
'
' You should have received a copy of the GNU Affero General Public License
' along with this program. If not, see <https://www.gnu.org/licenses/>.
'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :4.0.30319.42000
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
'LIGNE DE COMMANDE POUR GENERER LA CLASSE A PARTIR DU xsd:
'xsd.exe D:\temp\alerte.xsd /classes /language:vb /out:D:\temp\
Option Strict Off
Option Explicit On
Imports System.Xml.Serialization
'
'This source code was auto-generated by xsd, Version=4.7.3062.0.
'
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class DP
Private refField As String
Private typeField As String
Private dateLectureField As Date
Private dateEmissionField As Date
Private dateExpirationField As Date
Private emetteurField As String
Private titreField As String
Private texteField As String
Private demandeRetourField As String
Private laboratoireField As laboratoire
Private produitsField() As produit
Private alerteSuivanteField As alerteSuivante
Private annulrefField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property ref() As String
Get
Return Me.refField
End Get
Set(value As String)
Me.refField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property type() As String
Get
Return Me.typeField
End Get
Set(value As String)
Me.typeField = value
End Set
End Property
'''<remarks/>
Public Property dateLecture() As Date
Get
Return Me.dateLectureField
End Get
Set(value As Date)
Me.dateLectureField = value
End Set
End Property
'''<remarks/>
Public Property dateEmission() As Date
Get
Return Me.dateEmissionField
End Get
Set(value As Date)
Me.dateEmissionField = value
End Set
End Property
'''<remarks/>
Public Property dateExpiration() As Date
Get
Return Me.dateExpirationField
End Get
Set(value As Date)
Me.dateExpirationField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property emetteur() As String
Get
Return Me.emetteurField
End Get
Set(value As String)
Me.emetteurField = value
End Set
End Property
'''<remarks/>
Public Property titre() As String
Get
Return Me.titreField
End Get
Set(value As String)
Me.titreField = value
End Set
End Property
'''<remarks/>
Public Property texte() As String
Get
Return Me.texteField
End Get
Set(value As String)
Me.texteField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property demandeRetour() As String
Get
Return Me.demandeRetourField
End Get
Set(value As String)
Me.demandeRetourField = value
End Set
End Property
'''<remarks/>
Public Property laboratoire() As laboratoire
Get
Return Me.laboratoireField
End Get
Set(value As laboratoire)
Me.laboratoireField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlArrayItemAttribute("produit", IsNullable:=False)> _
Public Property produits() As produit()
Get
Return Me.produitsField
End Get
Set(value As produit())
Me.produitsField = value
End Set
End Property
'''<remarks/>
Public Property alerteSuivante() As alerteSuivante
Get
Return Me.alerteSuivanteField
End Get
Set(value As alerteSuivante)
Me.alerteSuivanteField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property annulref() As String
Get
Return Me.annulrefField
End Get
Set(value As String)
Me.annulrefField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class laboratoire
Private contactField As String
Private adresseField As String
Private codePostalField As String
Private villeField As String
Private telephoneField As String
Private faxField As String
Private emailField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property contact() As String
Get
Return Me.contactField
End Get
Set(value As String)
Me.contactField = value
End Set
End Property
'''<remarks/>
Public Property adresse() As String
Get
Return Me.adresseField
End Get
Set(value As String)
Me.adresseField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property codePostal() As String
Get
Return Me.codePostalField
End Get
Set(value As String)
Me.codePostalField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property ville() As String
Get
Return Me.villeField
End Get
Set(value As String)
Me.villeField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property telephone() As String
Get
Return Me.telephoneField
End Get
Set(value As String)
Me.telephoneField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property fax() As String
Get
Return Me.faxField
End Get
Set(value As String)
Me.faxField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property email() As String
Get
Return Me.emailField
End Get
Set(value As String)
Me.emailField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class produit
Private codeField As String
Private libelleField As String
Private lotsField As lots
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property code() As String
Get
Return Me.codeField
End Get
Set(value As String)
Me.codeField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property libelle() As String
Get
Return Me.libelleField
End Get
Set(value As String)
Me.libelleField = value
End Set
End Property
'''<remarks/>
Public Property lots() As lots
Get
Return Me.lotsField
End Get
Set(value As lots)
Me.lotsField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class lots
Private lotField() As lot
Private ensembleField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute("lot")> _
Public Property lot() As lot()
Get
Return Me.lotField
End Get
Set(value As lot())
Me.lotField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
Public Property ensemble() As String
Get
Return Me.ensembleField
End Get
Set(value As String)
Me.ensembleField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class lot
Private numField As String
Private perField As Date
Private perFieldSpecified As Boolean
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
Public Property num() As String
Get
Return Me.numField
End Get
Set(value As String)
Me.numField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="date")> _
Public Property per() As Date
Get
Return Me.perField
End Get
Set(value As Date)
Me.perField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlIgnoreAttribute()> _
Public Property perSpecified() As Boolean
Get
Return Me.perFieldSpecified
End Get
Set(value As Boolean)
Me.perFieldSpecified = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class alerteSuivante
Private hrefField As String
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
Public Property href() As String
Get
Return Me.hrefField
End Get
Set(value As String)
Me.hrefField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=True, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=False)> _
Partial Public Class produits
Private produitField() As produit
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute("produit")> _
Public Property produit() As produit()
Get
Return Me.produitField
End Get
Set(value As produit())
Me.produitField = value
End Set
End Property
Public Sub save_alerte(ByVal myalerte As DP, ByVal File As String)
Dim serializer As New XmlSerializer(GetType(DP))
Dim writer As New System.IO.StreamWriter(File)
serializer.Serialize(writer, myalerte)
writer.Close()
End Sub
Public Sub load(ByVal File As String, ByRef myalerte As DP)
Dim serializer As New XmlSerializer(GetType(DP))
Dim reader As New IO.StreamReader(File)
myalerte = serializer.Deserialize(reader)
reader.Close()
reader.Dispose()
End Sub
End Class

174
DP_Relay/DP_Relay/DP_Relay.vbproj Normal file
View File

@ -0,0 +1,174 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
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/>.
-->
<Project ToolsVersion="4.0" DefaultTargets="Build" xmlns="http://schemas.microsoft.com/developer/msbuild/2003">
<Import Project="$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props" Condition="Exists('$(MSBuildExtensionsPath)\$(MSBuildToolsVersion)\Microsoft.Common.props')" />
<PropertyGroup>
<Configuration Condition=" '$(Configuration)' == '' ">Debug</Configuration>
<Platform Condition=" '$(Platform)' == '' ">AnyCPU</Platform>
<ProjectGuid>{34E05A7B-887A-46C8-9A73-8D1A6AA3A8CE}</ProjectGuid>
<OutputType>WinExe</OutputType>
<StartupObject>DP_Relay.My.MyApplication</StartupObject>
<RootNamespace>DP_Relay</RootNamespace>
<AssemblyName>DP_Relay</AssemblyName>
<FileAlignment>512</FileAlignment>
<MyType>WindowsForms</MyType>
<TargetFrameworkVersion>v4.6.1</TargetFrameworkVersion>
<TargetFrameworkProfile />
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Debug|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugSymbols>true</DebugSymbols>
<DebugType>full</DebugType>
<DefineDebug>true</DefineDebug>
<DefineTrace>true</DefineTrace>
<OutputPath>bin\Debug\</OutputPath>
<DocumentationFile>DP_Relay.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup Condition=" '$(Configuration)|$(Platform)' == 'Release|AnyCPU' ">
<PlatformTarget>AnyCPU</PlatformTarget>
<DebugType>pdbonly</DebugType>
<DefineDebug>false</DefineDebug>
<DefineTrace>true</DefineTrace>
<Optimize>true</Optimize>
<OutputPath>bin\Release\</OutputPath>
<DocumentationFile>DP_Relay.xml</DocumentationFile>
<NoWarn>42016,41999,42017,42018,42019,42032,42036,42020,42021,42022</NoWarn>
</PropertyGroup>
<PropertyGroup>
<OptionExplicit>On</OptionExplicit>
</PropertyGroup>
<PropertyGroup>
<OptionCompare>Binary</OptionCompare>
</PropertyGroup>
<PropertyGroup>
<OptionStrict>Off</OptionStrict>
</PropertyGroup>
<PropertyGroup>
<OptionInfer>On</OptionInfer>
</PropertyGroup>
<ItemGroup>
<Reference Include="System" />
<Reference Include="System.Data" />
<Reference Include="System.Drawing" />
<Reference Include="System.Security" />
<Reference Include="System.Windows.Forms" />
<Reference Include="System.Xml" />
<Reference Include="System.Core" />
<Reference Include="System.Xml.Linq" />
<Reference Include="System.Data.DataSetExtensions" />
</ItemGroup>
<ItemGroup>
<Import Include="Microsoft.VisualBasic" />
<Import Include="System" />
<Import Include="System.Collections" />
<Import Include="System.Collections.Generic" />
<Import Include="System.Data" />
<Import Include="System.Drawing" />
<Import Include="System.Diagnostics" />
<Import Include="System.Security" />
<Import Include="System.Windows.Forms" />
<Import Include="System.Linq" />
<Import Include="System.Xml.Linq" />
<Import Include="System.Threading.Tasks" />
</ItemGroup>
<ItemGroup>
<Compile Include="alerte.vb" />
<Compile Include="ApplicationEvents.vb" />
<Compile Include="BDD.Designer.vb">
<DependentUpon>BDD.vb</DependentUpon>
</Compile>
<Compile Include="BDD.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="MAIN.Designer.vb">
<DependentUpon>MAIN.vb</DependentUpon>
</Compile>
<Compile Include="MAIN.vb">
<SubType>Form</SubType>
</Compile>
<Compile Include="My Project\AssemblyInfo.vb" />
<Compile Include="My Project\Application.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Application.myapp</DependentUpon>
</Compile>
<Compile Include="My Project\Resources.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>Resources.resx</DependentUpon>
</Compile>
<Compile Include="My Project\Settings.Designer.vb">
<AutoGen>True</AutoGen>
<DependentUpon>Settings.settings</DependentUpon>
<DesignTimeSharedInput>True</DesignTimeSharedInput>
</Compile>
<Compile Include="PharmaDataSet1.Designer.vb">
<AutoGen>True</AutoGen>
<DesignTime>True</DesignTime>
<DependentUpon>PharmaDataSet1.xsd</DependentUpon>
</Compile>
<Compile Include="RCMR_IN000031UV01.vb" />
</ItemGroup>
<ItemGroup>
<EmbeddedResource Include="BDD.resx">
<DependentUpon>BDD.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="MAIN.resx">
<DependentUpon>MAIN.vb</DependentUpon>
</EmbeddedResource>
<EmbeddedResource Include="My Project\Resources.resx">
<Generator>VbMyResourcesResXFileCodeGenerator</Generator>
<LastGenOutput>Resources.Designer.vb</LastGenOutput>
<CustomToolNamespace>My.Resources</CustomToolNamespace>
<SubType>Designer</SubType>
</EmbeddedResource>
</ItemGroup>
<ItemGroup>
<None Include="My Project\Application.myapp">
<Generator>MyApplicationCodeGenerator</Generator>
<LastGenOutput>Application.Designer.vb</LastGenOutput>
</None>
<None Include="My Project\Settings.settings">
<Generator>SettingsSingleFileGenerator</Generator>
<CustomToolNamespace>My</CustomToolNamespace>
<LastGenOutput>Settings.Designer.vb</LastGenOutput>
</None>
<None Include="App.config">
<SubType>Designer</SubType>
</None>
<None Include="PharmaDataSet1.xsc">
<DependentUpon>PharmaDataSet1.xsd</DependentUpon>
</None>
<None Include="PharmaDataSet1.xsd">
<Generator>MSDataSetGenerator</Generator>
<LastGenOutput>PharmaDataSet1.Designer.vb</LastGenOutput>
<SubType>Designer</SubType>
</None>
<None Include="PharmaDataSet1.xss">
<DependentUpon>PharmaDataSet1.xsd</DependentUpon>
</None>
</ItemGroup>
<Import Project="$(MSBuildToolsPath)\Microsoft.VisualBasic.targets" />
<!-- To modify your build process, add your task inside one of the targets below and uncomment it.
Other similar extension points exist, see Microsoft.Common.targets.
<Target Name="BeforeBuild">
</Target>
<Target Name="AfterBuild">
</Target>
-->
</Project>

108
DP_Relay/DP_Relay/MAIN.Designer.vb generated Normal file
View File

@ -0,0 +1,108 @@
' 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/>.
<Global.Microsoft.VisualBasic.CompilerServices.DesignerGenerated()> _
Partial Class MAIN
Inherits System.Windows.Forms.Form
'Form remplace la méthode Dispose pour nettoyer la liste des composants.
<System.Diagnostics.DebuggerNonUserCode()> _
Protected Overrides Sub Dispose(ByVal disposing As Boolean)
Try
If disposing AndAlso components IsNot Nothing Then
components.Dispose()
End If
Finally
MyBase.Dispose(disposing)
End Try
End Sub
'Requise par le Concepteur Windows Form
Private components As System.ComponentModel.IContainer
'REMARQUE : la procédure suivante est requise par le Concepteur Windows Form
'Elle peut être modifiée à l'aide du Concepteur Windows Form.
'Ne la modifiez pas à l'aide de l'éditeur de code.
<System.Diagnostics.DebuggerStepThrough()> _
Private Sub InitializeComponent()
Me.components = New System.ComponentModel.Container()
Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(MAIN))
Me.RichTextBox1 = New System.Windows.Forms.RichTextBox()
Me.Button1 = New System.Windows.Forms.Button()
Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
Me.Button2 = New System.Windows.Forms.Button()
Me.SuspendLayout()
'
'RichTextBox1
'
Me.RichTextBox1.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.RichTextBox1.BorderStyle = System.Windows.Forms.BorderStyle.None
Me.RichTextBox1.Font = New System.Drawing.Font("Consolas", 9.75!, System.Drawing.FontStyle.Regular, System.Drawing.GraphicsUnit.Point, CType(0, Byte))
Me.RichTextBox1.ForeColor = System.Drawing.Color.FromArgb(CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer), CType(CType(224, Byte), Integer))
Me.RichTextBox1.Location = New System.Drawing.Point(12, 12)
Me.RichTextBox1.Name = "RichTextBox1"
Me.RichTextBox1.Size = New System.Drawing.Size(395, 156)
Me.RichTextBox1.TabIndex = 0
Me.RichTextBox1.Text = ""
'
'Button1
'
Me.Button1.BackColor = System.Drawing.Color.Red
Me.Button1.Location = New System.Drawing.Point(413, 93)
Me.Button1.Name = "Button1"
Me.Button1.Size = New System.Drawing.Size(75, 75)
Me.Button1.TabIndex = 8
Me.Button1.Text = "STOP"
Me.Button1.UseVisualStyleBackColor = False
'
'NotifyIcon1
'
Me.NotifyIcon1.Icon = CType(resources.GetObject("NotifyIcon1.Icon"), System.Drawing.Icon)
Me.NotifyIcon1.Text = "DP Relay"
Me.NotifyIcon1.Visible = True
'
'Button2
'
Me.Button2.BackColor = System.Drawing.Color.FromArgb(CType(CType(0, Byte), Integer), CType(CType(192, Byte), Integer), CType(CType(0, Byte), Integer))
Me.Button2.Location = New System.Drawing.Point(413, 12)
Me.Button2.Name = "Button2"
Me.Button2.Size = New System.Drawing.Size(75, 75)
Me.Button2.TabIndex = 9
Me.Button2.Text = "Connect"
Me.Button2.UseVisualStyleBackColor = False
'
'MAIN
'
Me.AutoScaleDimensions = New System.Drawing.SizeF(6.0!, 13.0!)
Me.AutoScaleMode = System.Windows.Forms.AutoScaleMode.Font
Me.BackColor = System.Drawing.Color.FromArgb(CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer), CType(CType(64, Byte), Integer))
Me.ClientSize = New System.Drawing.Size(500, 180)
Me.Controls.Add(Me.Button2)
Me.Controls.Add(Me.Button1)
Me.Controls.Add(Me.RichTextBox1)
Me.Cursor = System.Windows.Forms.Cursors.No
Me.FormBorderStyle = System.Windows.Forms.FormBorderStyle.FixedToolWindow
Me.Icon = CType(resources.GetObject("$this.Icon"), System.Drawing.Icon)
Me.Name = "MAIN"
Me.ShowIcon = False
Me.ShowInTaskbar = False
Me.Text = "DP"
Me.ResumeLayout(False)
End Sub
Friend WithEvents RichTextBox1 As System.Windows.Forms.RichTextBox
Friend WithEvents Button1 As System.Windows.Forms.Button
Friend WithEvents NotifyIcon1 As System.Windows.Forms.NotifyIcon
Friend WithEvents Button2 As System.Windows.Forms.Button
End Class

5560
DP_Relay/DP_Relay/MAIN.resx Normal file
View File

File diff suppressed because it is too large Load Diff

2070
DP_Relay/DP_Relay/MAIN.vb Normal file
View File

File diff suppressed because it is too large Load Diff

52
DP_Relay/DP_Relay/My Project/Application.Designer.vb generated Normal file
View File

@ -0,0 +1,52 @@
' Copyright (C) 2025 P4pillon.org
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU Affero General Public License as
' published by the Free Software Foundation, either version 3 of the
' License, or (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU Affero General Public License for more details.
'
' You should have received a copy of the GNU Affero General Public License
' along with this program. If not, see <https://www.gnu.org/licenses/>.
'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :4.0.30319.42000
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
'REMARQUE : ce fichier étant généré automatiquement, ne le modifiez pas directement. Pour apporter des modifications,
' ou si vous rencontrez des erreurs de build dans ce fichier, accédez au Concepteur de projets
' (allez dans les propriétés du projet ou double-cliquez sur le noeud My project dans
' l'Explorateur de solutions), puis apportez vos modifications sous l'onglet Application.
'
Partial Friend Class MyApplication
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Public Sub New()
MyBase.New(Global.Microsoft.VisualBasic.ApplicationServices.AuthenticationMode.Windows)
Me.IsSingleInstance = false
Me.EnableVisualStyles = true
Me.SaveMySettingsOnExit = true
Me.ShutDownStyle = Global.Microsoft.VisualBasic.ApplicationServices.ShutdownMode.AfterMainFormCloses
End Sub
<Global.System.Diagnostics.DebuggerStepThroughAttribute()> _
Protected Overrides Sub OnCreateMainForm()
Me.MainForm = Global.DP_Relay.MAIN
End Sub
End Class
End Namespace

26
DP_Relay/DP_Relay/My Project/Application.myapp Normal file
View File

@ -0,0 +1,26 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
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/>.
-->
<MyApplicationData xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema">
<MySubMain>true</MySubMain>
<MainForm>MAIN</MainForm>
<SingleInstance>false</SingleInstance>
<ShutdownMode>0</ShutdownMode>
<EnableVisualStyles>true</EnableVisualStyles>
<AuthenticationMode>0</AuthenticationMode>
<SaveMySettingsOnExit>true</SaveMySettingsOnExit>
</MyApplicationData>

49
DP_Relay/DP_Relay/My Project/AssemblyInfo.vb Normal file
View File

@ -0,0 +1,49 @@
' 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/>.
Imports System
Imports System.Reflection
Imports System.Runtime.InteropServices
' Les informations générales relatives à un assembly dépendent de
' l'ensemble d'attributs suivant. Changez les valeurs de ces attributs pour modifier les informations
' associées à un assembly.
' Passez en revue les valeurs des attributs de l'assembly
<Assembly: AssemblyTitle("DP_Relay")>
<Assembly: AssemblyDescription("")>
<Assembly: AssemblyCompany("")>
<Assembly: AssemblyProduct("DP_Relay")>
<Assembly: AssemblyCopyright("Copyright © 2016")>
<Assembly: AssemblyTrademark("")>
<Assembly: ComVisible(False)>
'Le GUID suivant est pour l'ID de la typelib si ce projet est exposé à COM
<Assembly: Guid("ec1459e1-f0b0-464a-9592-4ab43f909eef")>
' Les informations de version pour un assembly se composent des quatre valeurs suivantes :
'
' Version principale
' Version secondaire
' Numéro de build
' Révision
'
' Vous pouvez spécifier toutes les valeurs ou indiquer les numéros de build et de révision par défaut
' en utilisant '*', comme indiqué ci-dessous :
' <Assembly: AssemblyVersion("1.0.*")>
<Assembly: AssemblyVersion("1.0.0.0")>
<Assembly: AssemblyFileVersion("1.0.0.0")>

77
DP_Relay/DP_Relay/My Project/Resources.Designer.vb generated Normal file
View File

@ -0,0 +1,77 @@
' Copyright (C) 2025 P4pillon.org
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU Affero General Public License as
' published by the Free Software Foundation, either version 3 of the
' License, or (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU Affero General Public License for more details.
'
' You should have received a copy of the GNU Affero General Public License
' along with this program. If not, see <https://www.gnu.org/licenses/>.
'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :4.0.30319.42000
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Imports System
Namespace My.Resources
'Cette classe a été générée automatiquement par la classe StronglyTypedResourceBuilder
'à l'aide d'un outil, tel que ResGen ou Visual Studio.
'Pour ajouter ou supprimer un membre, modifiez votre fichier .ResX, puis réexécutez ResGen
'avec l'option /str ou régénérez votre projet VS.
'''<summary>
''' Une classe de ressource fortement typée destinée, entre autres, à la consultation des chaînes localisées.
'''</summary>
<Global.System.CodeDom.Compiler.GeneratedCodeAttribute("System.Resources.Tools.StronglyTypedResourceBuilder", "4.0.0.0"), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.Microsoft.VisualBasic.HideModuleNameAttribute()> _
Friend Module Resources
Private resourceMan As Global.System.Resources.ResourceManager
Private resourceCulture As Global.System.Globalization.CultureInfo
'''<summary>
''' Retourne l'instance ResourceManager mise en cache utilisée par cette classe.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend ReadOnly Property ResourceManager() As Global.System.Resources.ResourceManager
Get
If Object.ReferenceEquals(resourceMan, Nothing) Then
Dim temp As Global.System.Resources.ResourceManager = New Global.System.Resources.ResourceManager("DP_Relay.Resources", GetType(Resources).Assembly)
resourceMan = temp
End If
Return resourceMan
End Get
End Property
'''<summary>
''' Remplace la propriété CurrentUICulture du thread actuel pour toutes
''' les recherches de ressources à l'aide de cette classe de ressource fortement typée.
'''</summary>
<Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Friend Property Culture() As Global.System.Globalization.CultureInfo
Get
Return resourceCulture
End Get
Set
resourceCulture = value
End Set
End Property
End Module
End Namespace

133
DP_Relay/DP_Relay/My Project/Resources.resx Normal file
View File

@ -0,0 +1,133 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
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/>.
-->
<root>
<!--
Microsoft ResX Schema
Version 2.0
The primary goals of this format is to allow a simple XML format
that is mostly human readable. The generation and parsing of the
various data types are done through the TypeConverter classes
associated with the data types.
Example:
... ado.net/XML headers & schema ...
<resheader name="resmimetype">text/microsoft-resx</resheader>
<resheader name="version">2.0</resheader>
<resheader name="reader">System.Resources.ResXResourceReader, System.Windows.Forms, ...</resheader>
<resheader name="writer">System.Resources.ResXResourceWriter, System.Windows.Forms, ...</resheader>
<data name="Name1"><value>this is my long string</value><comment>this is a comment</comment></data>
<data name="Color1" type="System.Drawing.Color, System.Drawing">Blue</data>
<data name="Bitmap1" mimetype="application/x-microsoft.net.object.binary.base64">
<value>[base64 mime encoded serialized .NET Framework object]</value>
</data>
<data name="Icon1" type="System.Drawing.Icon, System.Drawing" mimetype="application/x-microsoft.net.object.bytearray.base64">
<value>[base64 mime encoded string representing a byte array form of the .NET Framework object]</value>
<comment>This is a comment</comment>
</data>
There are any number of "resheader" rows that contain simple
name/value pairs.
Each data row contains a name, and value. The row also contains a
type or mimetype. Type corresponds to a .NET class that support
text/value conversion through the TypeConverter architecture.
Classes that don't support this are serialized and stored with the
mimetype set.
The mimetype is used for serialized objects, and tells the
ResXResourceReader how to depersist the object. This is currently not
extensible. For a given mimetype the value must be set accordingly:
Note - application/x-microsoft.net.object.binary.base64 is the format
that the ResXResourceWriter will generate, however the reader can
read any of the formats listed below.
mimetype: application/x-microsoft.net.object.binary.base64
value : The object must be serialized with
: System.Serialization.Formatters.Binary.BinaryFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.soap.base64
value : The object must be serialized with
: System.Runtime.Serialization.Formatters.Soap.SoapFormatter
: and then encoded with base64 encoding.
mimetype: application/x-microsoft.net.object.bytearray.base64
value : The object must be serialized into a byte array
: using a System.ComponentModel.TypeConverter
: and then encoded with base64 encoding.
-->
<xsd:schema id="root" xmlns="" xmlns:xsd="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata">
<xsd:element name="root" msdata:IsDataSet="true">
<xsd:complexType>
<xsd:choice maxOccurs="unbounded">
<xsd:element name="metadata">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" />
<xsd:attribute name="type" type="xsd:string" />
<xsd:attribute name="mimetype" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="assembly">
<xsd:complexType>
<xsd:attribute name="alias" type="xsd:string" />
<xsd:attribute name="name" type="xsd:string" />
</xsd:complexType>
</xsd:element>
<xsd:element name="data">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
<xsd:element name="comment" type="xsd:string" minOccurs="0" msdata:Ordinal="2" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" msdata:Ordinal="1" />
<xsd:attribute name="type" type="xsd:string" msdata:Ordinal="3" />
<xsd:attribute name="mimetype" type="xsd:string" msdata:Ordinal="4" />
</xsd:complexType>
</xsd:element>
<xsd:element name="resheader">
<xsd:complexType>
<xsd:sequence>
<xsd:element name="value" type="xsd:string" minOccurs="0" msdata:Ordinal="1" />
</xsd:sequence>
<xsd:attribute name="name" type="xsd:string" use="required" />
</xsd:complexType>
</xsd:element>
</xsd:choice>
</xsd:complexType>
</xsd:element>
</xsd:schema>
<resheader name="resmimetype">
<value>text/microsoft-resx</value>
</resheader>
<resheader name="version">
<value>2.0</value>
</resheader>
<resheader name="reader">
<value>System.Resources.ResXResourceReader, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
<resheader name="writer">
<value>System.Resources.ResXResourceWriter, System.Windows.Forms, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089</value>
</resheader>
</root>

98
DP_Relay/DP_Relay/My Project/Settings.Designer.vb generated Normal file
View File

@ -0,0 +1,98 @@
' Copyright (C) 2025 P4pillon.org
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU Affero General Public License as
' published by the Free Software Foundation, either version 3 of the
' License, or (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU Affero General Public License for more details.
'
' You should have received a copy of the GNU Affero General Public License
' along with this program. If not, see <https://www.gnu.org/licenses/>.
'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :4.0.30319.42000
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict On
Option Explicit On
Namespace My
<Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute(), _
Global.System.CodeDom.Compiler.GeneratedCodeAttribute("Microsoft.VisualStudio.Editors.SettingsDesigner.SettingsSingleFileGenerator", "11.0.0.0"), _
Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Partial Friend NotInheritable Class MySettings
Inherits Global.System.Configuration.ApplicationSettingsBase
Private Shared defaultInstance As MySettings = CType(Global.System.Configuration.ApplicationSettingsBase.Synchronized(New MySettings()),MySettings)
#Region "Fonctionnalité Enregistrement automatique My.Settings"
#If _MyType = "WindowsForms" Then
Private Shared addedHandler As Boolean
Private Shared addedHandlerLockObject As New Object
<Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), Global.System.ComponentModel.EditorBrowsableAttribute(Global.System.ComponentModel.EditorBrowsableState.Advanced)> _
Private Shared Sub AutoSaveSettings(ByVal sender As Global.System.Object, ByVal e As Global.System.EventArgs)
If My.Application.SaveMySettingsOnExit Then
My.Settings.Save()
End If
End Sub
#End If
#End Region
Public Shared ReadOnly Property [Default]() As MySettings
Get
#If _MyType = "WindowsForms" Then
If Not addedHandler Then
SyncLock addedHandlerLockObject
If Not addedHandler Then
AddHandler My.Application.Shutdown, AddressOf AutoSaveSettings
addedHandler = True
End If
End SyncLock
End If
#End If
Return defaultInstance
End Get
End Property
<Global.System.Configuration.ApplicationScopedSettingAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Configuration.SpecialSettingAttribute(Global.System.Configuration.SpecialSetting.ConnectionString), _
Global.System.Configuration.DefaultSettingValueAttribute("Data Source=JUJU_PORTABLE\SQLEXPRESS;Initial Catalog=Pharma;Persist Security Info"& _
"=True;User ID=Test;Password=Test12345")> _
Public ReadOnly Property PharmaConnectionString() As String
Get
Return CType(Me("PharmaConnectionString"),String)
End Get
End Property
End Class
End Namespace
Namespace My
<Global.Microsoft.VisualBasic.HideModuleNameAttribute(), _
Global.System.Diagnostics.DebuggerNonUserCodeAttribute(), _
Global.System.Runtime.CompilerServices.CompilerGeneratedAttribute()> _
Friend Module MySettingsProperty
<Global.System.ComponentModel.Design.HelpKeywordAttribute("My.Settings")> _
Friend ReadOnly Property Settings() As Global.DP_Relay.My.MySettings
Get
Return Global.DP_Relay.My.MySettings.Default
End Get
End Property
End Module
End Namespace

14
DP_Relay/DP_Relay/My Project/Settings.settings Normal file
View File

@ -0,0 +1,14 @@
<?xml version='1.0' encoding='utf-8'?>
<SettingsFile xmlns="http://schemas.microsoft.com/VisualStudio/2004/01/settings" CurrentProfile="(Default)" GeneratedClassNamespace="My" GeneratedClassName="MySettings" UseMySettingsClassName="true">
<Profiles />
<Settings>
<Setting Name="PharmaConnectionString" Type="(Connection string)" Scope="Application">
<DesignTimeValue Profile="(Default)">&lt;?xml version="1.0" encoding="utf-16"?&gt;
&lt;SerializableConnectionString xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema"&gt;
&lt;ConnectionString&gt;Data Source=JUJU_PORTABLE\SQLEXPRESS;Initial Catalog=Pharma;Persist Security Info=True;User ID=Test;Password=Test12345&lt;/ConnectionString&gt;
&lt;ProviderName&gt;System.Data.SqlClient&lt;/ProviderName&gt;
&lt;/SerializableConnectionString&gt;</DesignTimeValue>
<Value Profile="(Default)">Data Source=JUJU_PORTABLE\SQLEXPRESS;Initial Catalog=Pharma;Persist Security Info=True;User ID=Test;Password=Test12345</Value>
</Setting>
</Settings>
</SettingsFile>

3951
DP_Relay/DP_Relay/PharmaDataSet1.Designer.vb generated Normal file
View File

File diff suppressed because it is too large Load Diff

9
DP_Relay/DP_Relay/PharmaDataSet1.xsc Normal file
View File

@ -0,0 +1,9 @@
<?xml version="1.0" encoding="utf-8"?>
<!--<autogenerated>
This code was generated by a tool.
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DataSetUISetting Version="1.00" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<TableUISettings />
</DataSetUISetting>

404
DP_Relay/DP_Relay/PharmaDataSet1.xsd Normal file
View File

@ -0,0 +1,404 @@
<?xml version="1.0" encoding="utf-8"?>
<!--
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/>.
-->
<xs:schema id="PharmaDataSet1" targetNamespace="http://tempuri.org/PharmaDataSet1.xsd" xmlns:mstns="http://tempuri.org/PharmaDataSet1.xsd" xmlns="http://tempuri.org/PharmaDataSet1.xsd" xmlns:xs="http://www.w3.org/2001/XMLSchema" xmlns:msdata="urn:schemas-microsoft-com:xml-msdata" xmlns:msprop="urn:schemas-microsoft-com:xml-msprop" attributeFormDefault="qualified" elementFormDefault="qualified">
<xs:annotation>
<xs:appinfo source="urn:schemas-microsoft-com:xml-msdatasource">
<DataSource DefaultConnectionIndex="0" FunctionsComponentName="QueriesTableAdapter" Modifier="AutoLayout, AnsiClass, Class, Public" SchemaSerializationMode="IncludeSchema" xmlns="urn:schemas-microsoft-com:xml-msdatasource">
<Connections>
<Connection AppSettingsObjectName="MySettings" AppSettingsPropertyName="PharmaConnectionString" ConnectionStringObject="" IsAppSettingsProperty="true" Modifier="Assembly" Name="PharmaConnectionString (MySettings)" ParameterPrefix="@" PropertyReference="ApplicationSettings.DP_Relay.My.MySettings.GlobalReference.Default.PharmaConnectionString" Provider="System.Data.SqlClient" />
</Connections>
<Tables>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="DP_ALERTE_PRODUITTableAdapter" GeneratorDataComponentClassName="DP_ALERTE_PRODUITTableAdapter" Name="DP_ALERTE_PRODUIT" UserDataComponentName="DP_ALERTE_PRODUITTableAdapter">
<MainSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_ALERTE_PRODUIT" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[DP_ALERTE_PRODUIT] ([CIP], [MsgRef], [Lots], [Vue]) VALUES (@CIP, @MsgRef, @Lots, @Vue)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@CIP" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="CIP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@MsgRef" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="MsgRef" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Lots" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="Lots" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@Vue" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="Vue" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT CIP, MsgRef, Lots, Vue FROM dbo.DP_ALERTE_PRODUIT</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="CIP" DataSetColumn="CIP" />
<Mapping SourceColumn="MsgRef" DataSetColumn="MsgRef" />
<Mapping SourceColumn="Lots" DataSetColumn="Lots" />
<Mapping SourceColumn="Vue" DataSetColumn="Vue" />
</Mappings>
<Sources>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_ALERTE_PRODUIT" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetData_unique" GetMethodModifier="Public" GetMethodName="GetData_unique" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData_unique" UserSourceName="GetData_unique">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT CIP, MsgRef, Lots, Vue FROM DP_ALERTE_PRODUIT WHERE (CIP = @CIP) AND (MsgRef = @MsgRef) AND (Lots = @Lots)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="CIP" ColumnName="CIP" DataSourceName="Pharma.dbo.DP_ALERTE_PRODUIT" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@CIP" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="CIP" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="MsgRef" ColumnName="MsgRef" DataSourceName="Pharma.dbo.DP_ALERTE_PRODUIT" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@MsgRef" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="MsgRef" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Lots" ColumnName="Lots" DataSourceName="Pharma.dbo.DP_ALERTE_PRODUIT" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@Lots" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="Lots" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
</Sources>
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="DP_MsgTableAdapter" GeneratorDataComponentClassName="DP_MsgTableAdapter" Name="DP_Msg" UserDataComponentName="DP_MsgTableAdapter">
<MainSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Msg" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[DP_Msg] ([MsgRef], [MsgTyp], [MsgLect], [MsgDate], [MsgExpi], [Reader], [AR_sent], [AR_Statut], [AR_nbr_transmission], [AR_next_trans_time], [MsgEme], [MsgTit]) VALUES (@MsgRef, @MsgTyp, @MsgLect, @MsgDate, @MsgExpi, @Reader, @AR_sent, @AR_Statut, @AR_nbr_transmission, @AR_next_trans_time, @MsgEme, @MsgTit)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@MsgRef" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="MsgRef" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@MsgTyp" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="MsgTyp" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Date" Direction="Input" ParameterName="@MsgLect" Precision="0" ProviderType="Date" Scale="0" Size="0" SourceColumn="MsgLect" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Date" Direction="Input" ParameterName="@MsgDate" Precision="0" ProviderType="Date" Scale="0" Size="0" SourceColumn="MsgDate" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Date" Direction="Input" ParameterName="@MsgExpi" Precision="0" ProviderType="Date" Scale="0" Size="0" SourceColumn="MsgExpi" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Reader" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="Reader" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Boolean" Direction="Input" ParameterName="@AR_sent" Precision="0" ProviderType="Bit" Scale="0" Size="0" SourceColumn="AR_sent" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@AR_Statut" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="AR_Statut" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Decimal" Direction="Input" ParameterName="@AR_nbr_transmission" Precision="18" ProviderType="Decimal" Scale="0" Size="0" SourceColumn="AR_nbr_transmission" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@AR_next_trans_time" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="AR_next_trans_time" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@MsgEme" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="MsgEme" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@MsgTit" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="MsgTit" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT MsgRef, MsgTyp, MsgLect, MsgDate, MsgExpi, Reader, AR_sent, AR_Statut, AR_nbr_transmission, AR_next_trans_time, MsgEme, MsgTit FROM dbo.DP_Msg</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="MsgRef" DataSetColumn="MsgRef" />
<Mapping SourceColumn="MsgTyp" DataSetColumn="MsgTyp" />
<Mapping SourceColumn="MsgLect" DataSetColumn="MsgLect" />
<Mapping SourceColumn="MsgDate" DataSetColumn="MsgDate" />
<Mapping SourceColumn="MsgExpi" DataSetColumn="MsgExpi" />
<Mapping SourceColumn="Reader" DataSetColumn="Reader" />
<Mapping SourceColumn="AR_sent" DataSetColumn="AR_sent" />
<Mapping SourceColumn="AR_Statut" DataSetColumn="AR_Statut" />
<Mapping SourceColumn="AR_nbr_transmission" DataSetColumn="AR_nbr_transmission" />
<Mapping SourceColumn="AR_next_trans_time" DataSetColumn="AR_next_trans_time" />
<Mapping SourceColumn="MsgEme" DataSetColumn="MsgEme" />
<Mapping SourceColumn="MsgTit" DataSetColumn="MsgTit" />
</Mappings>
<Sources>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Msg" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetData_where_AR_must_be_send" GetMethodModifier="Public" GetMethodName="GetData_where_AR_must_be_send" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData_where_AR_must_be_send" UserSourceName="GetData_where_AR_must_be_send">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT MsgRef, MsgTyp, MsgLect, MsgDate, MsgExpi, Reader, AR_sent, AR_Statut, AR_nbr_transmission, AR_next_trans_time, MsgEme, MsgTit FROM DP_Msg WHERE (Reader &lt;&gt; '') AND (AR_sent = 'False') OR (AR_sent = 'True') AND (AR_next_trans_time &lt; @now) AND (AR_nbr_transmission &lt; 3) AND (AR_Statut &lt;&gt; 'OK')</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="now" ColumnName="AR_next_trans_time" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@now" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="AR_next_trans_time" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Msg" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetDataBy_MsgRef" GetMethodModifier="Public" GetMethodName="GetDataBy_MsgRef" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy_MsgRef" UserSourceName="GetDataBy_MsgRef">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT MsgRef, MsgTyp, MsgLect, MsgDate, MsgExpi, Reader, AR_sent, AR_Statut, AR_nbr_transmission, AR_next_trans_time, MsgEme, MsgTit FROM DP_Msg WHERE (MsgRef = @MsgRef)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="MsgRef" ColumnName="MsgRef" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@MsgRef" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="MsgRef" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="Update_by_MsgRef" Modifier="Public" Name="Update_by_MsgRef" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="Update_by_MsgRef">
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE DP_Msg
set Reader = @Reader, AR_sent=@AR_sent, AR_Statut=@AR_Statut, AR_nbr_transmission=@AR_nbr_transmission,AR_next_trans_time=@AR_next_trans_time
where MsgRef=@MsgRef
</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="Reader" ColumnName="Reader" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@Reader" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="Reader" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AR_sent" ColumnName="AR_sent" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="bit" DbType="Boolean" Direction="Input" ParameterName="@AR_sent" Precision="0" ProviderType="Bit" Scale="0" Size="1" SourceColumn="AR_sent" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AR_Statut" ColumnName="AR_Statut" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@AR_Statut" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="AR_Statut" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AR_nbr_transmission" ColumnName="AR_nbr_transmission" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="numeric(18, 0)" DbType="Decimal" Direction="Input" ParameterName="@AR_nbr_transmission" Precision="18" ProviderType="Decimal" Scale="0" Size="9" SourceColumn="AR_nbr_transmission" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="AR_next_trans_time" ColumnName="AR_next_trans_time" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@AR_next_trans_time" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="AR_next_trans_time" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="MsgRef" ColumnName="MsgRef" DataSourceName="Pharma.dbo.DP_Msg" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@MsgRef" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="MsgRef" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</Sources>
</TableAdapter>
<TableAdapter BaseClass="System.ComponentModel.Component" DataAccessorModifier="AutoLayout, AnsiClass, Class, Public" DataAccessorName="DP_ReqTableAdapter" GeneratorDataComponentClassName="DP_ReqTableAdapter" Name="DP_Req" UserDataComponentName="DP_ReqTableAdapter">
<MainSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Req" DbObjectType="Table" FillMethodModifier="Public" FillMethodName="Fill" GenerateMethods="Both" GenerateShortCommands="true" GeneratorGetMethodName="GetData" GeneratorSourceName="Fill" GetMethodModifier="Public" GetMethodName="GetData" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData" UserSourceName="Fill">
<InsertCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>INSERT INTO [dbo].[DP_Req] ([Sequence_Number], [ReqId], [Statut], [next_trans_time], [nbr_trans], [Identifiant_patient], [référence_interne]) VALUES (@Sequence_Number, @ReqId, @Statut, @next_trans_time, @nbr_trans, @Identifiant_patient, @référence_interne)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Sequence_Number" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="Sequence_Number" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@ReqId" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="ReqId" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Statut" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="Statut" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="DateTime" Direction="Input" ParameterName="@next_trans_time" Precision="0" ProviderType="DateTime" Scale="0" Size="0" SourceColumn="next_trans_time" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="Int32" Direction="Input" ParameterName="@nbr_trans" Precision="0" ProviderType="Int" Scale="0" Size="0" SourceColumn="nbr_trans" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@Identifiant_patient" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="Identifiant_patient" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="" DataSourceName="" DbType="String" Direction="Input" ParameterName="@référence_interne" Precision="0" ProviderType="NVarChar" Scale="0" Size="0" SourceColumn="référence_interne" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</InsertCommand>
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="false">
<CommandText>SELECT Sequence_Number, ReqId, Statut, next_trans_time, nbr_trans, Identifiant_patient, référence_interne FROM dbo.DP_Req</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
</DbSource>
</MainSource>
<Mappings>
<Mapping SourceColumn="Sequence_Number" DataSetColumn="Sequence_Number" />
<Mapping SourceColumn="ReqId" DataSetColumn="ReqId" />
<Mapping SourceColumn="Statut" DataSetColumn="Statut" />
<Mapping SourceColumn="next_trans_time" DataSetColumn="next_trans_time" />
<Mapping SourceColumn="nbr_trans" DataSetColumn="nbr_trans" />
<Mapping SourceColumn="Identifiant_patient" DataSetColumn="Identifiant_patient" />
<Mapping SourceColumn="référence_interne" DataSetColumn="référence_interne" />
</Mappings>
<Sources>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="DeleteBy_ReqId" Modifier="Public" Name="DeleteBy_ReqId" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy" UserSourceName="DeleteBy_ReqId">
<DeleteCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>DELETE
FROM dbo.DP_Req
where ReqId=@ReqId</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="ReqId" ColumnName="ReqId" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@ReqId" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="ReqId" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</DeleteCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Req" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetData_Queue" GetMethodModifier="Public" GetMethodName="GetData_Queue" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData_Queue" UserSourceName="GetData_Queue">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT Sequence_Number, ReqId, Statut, nbr_trans, next_trans_time, Identifiant_patient, référence_interne FROM DP_Req WHERE (Statut = 'A_REEMETTRE') AND (Identifiant_patient &lt;&gt; 'IAM') OR (Statut = 'ERREUR_TECHNIQUE') AND (Identifiant_patient &lt;&gt; 'IAM') AND (next_trans_time &lt; @now) AND (nbr_trans &lt; 4)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="now" ColumnName="next_trans_time" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@now" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="next_trans_time" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Req" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetData_Queue_IAM" GetMethodModifier="Public" GetMethodName="GetData_Queue_IAM" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetData_Queue_IAM" UserSourceName="GetData_Queue_IAM">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT Sequence_Number, ReqId, Statut, nbr_trans, next_trans_time, Identifiant_patient, référence_interne FROM DP_Req WHERE ((Statut = 'A_REEMETTRE') AND (Identifiant_patient = 'IAM') OR (Statut = 'ERREUR_TECHNIQUE') AND (Identifiant_patient = 'IAM')) AND (next_trans_time &lt; getdate()) AND (nbr_trans &lt; 2)</CommandText>
<Parameters />
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Req" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetDataBy_ReqId" GetMethodModifier="Public" GetMethodName="GetDataBy_ReqId" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy_ReqId" UserSourceName="GetDataBy_ReqId">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT Sequence_Number, ReqId, Statut, next_trans_time, nbr_trans, Identifiant_patient, référence_interne FROM dbo.DP_Req
where ReqId=@ReqId</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="ReqId" ColumnName="ReqId" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@ReqId" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="ReqId" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="Pharma.dbo.DP_Req" DbObjectType="Table" GenerateMethods="Get" GenerateShortCommands="true" GeneratorGetMethodName="GetDataBy_Sequence_Number" GetMethodModifier="Public" GetMethodName="GetDataBy_Sequence_Number" QueryType="Rowset" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy_Sequence_Number" UserSourceName="GetDataBy_Sequence_Number">
<SelectCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>SELECT Sequence_Number, ReqId, Statut, nbr_trans, next_trans_time, Identifiant_patient, référence_interne FROM DP_Req WHERE (Sequence_Number = @Sequence_Number)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="Sequence_Number" ColumnName="Sequence_Number" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@Sequence_Number" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="Sequence_Number" SourceColumnNullMapping="false" SourceVersion="Current" />
</Parameters>
</DbCommand>
</SelectCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="Update_byReqId" Modifier="Public" Name="Update_byReqId" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy1" UserSourceName="Update_byReqId">
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>update DP_Req set Sequence_Number=@Sequence_Number, Statut=@Statut, nbr_trans=@nbr_trans, next_trans_time=@next_trans_time, Identifiant_patient=@Identifiant_patient, référence_interne=@référence_interne where ReqId =@ReqId </CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="Sequence_Number" ColumnName="Sequence_Number" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@Sequence_Number" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="Sequence_Number" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Statut" ColumnName="Statut" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@Statut" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="Statut" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="nbr_trans" ColumnName="nbr_trans" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="int" DbType="Int32" Direction="Input" ParameterName="@nbr_trans" Precision="0" ProviderType="Int" Scale="0" Size="4" SourceColumn="nbr_trans" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="next_trans_time" ColumnName="next_trans_time" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@next_trans_time" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="next_trans_time" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="Identifiant_patient" ColumnName="Identifiant_patient" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@Identifiant_patient" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="Identifiant_patient" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="référence_interne" ColumnName="référence_interne" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(MAX)" DbType="String" Direction="Input" ParameterName="@référence_interne" Precision="0" ProviderType="NVarChar" Scale="0" Size="2147483647" SourceColumn="référence_interne" SourceColumnNullMapping="false" SourceVersion="Current" />
<Parameter AllowDbNull="true" AutogeneratedName="ReqId" ColumnName="ReqId" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="nvarchar(50)" DbType="String" Direction="Input" ParameterName="@ReqId" Precision="0" ProviderType="NVarChar" Scale="0" Size="50" SourceColumn="ReqId" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
<DbSource ConnectionRef="PharmaConnectionString (MySettings)" DbObjectName="" DbObjectType="Unknown" GenerateShortCommands="true" GeneratorSourceName="Update_Requetes_Perimées" Modifier="Public" Name="Update_Requetes_Perimées" QueryType="NoData" ScalarCallRetval="System.Object, mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089" UseOptimisticConcurrency="true" UserGetMethodName="GetDataBy2" UserSourceName="Update_Requetes_Perimées">
<UpdateCommand>
<DbCommand CommandType="Text" ModifiedByUser="true">
<CommandText>UPDATE DP_Req set Statut='DELAI_EXPIRE' where (Statut = 'A_REEMETTRE') AND (next_trans_time &lt; @DateLimite)</CommandText>
<Parameters>
<Parameter AllowDbNull="true" AutogeneratedName="DateLimite" ColumnName="next_trans_time" DataSourceName="Pharma.dbo.DP_Req" DataTypeServer="datetime" DbType="DateTime" Direction="Input" ParameterName="@DateLimite" Precision="0" ProviderType="DateTime" Scale="0" Size="8" SourceColumn="next_trans_time" SourceColumnNullMapping="false" SourceVersion="Original" />
</Parameters>
</DbCommand>
</UpdateCommand>
</DbSource>
</Sources>
</TableAdapter>
</Tables>
<Sources />
</DataSource>
</xs:appinfo>
</xs:annotation>
<xs:element name="PharmaDataSet1" msdata:IsDataSet="true" msdata:UseCurrentLocale="true" msprop:EnableTableAdapterManager="True" msprop:Generator_DataSetName="PharmaDataSet1" msprop:Generator_UserDSName="PharmaDataSet1">
<xs:complexType>
<xs:choice minOccurs="0" maxOccurs="unbounded">
<xs:element name="DP_ALERTE_PRODUIT" msprop:Generator_TableClassName="DP_ALERTE_PRODUITDataTable" msprop:Generator_TableVarName="tableDP_ALERTE_PRODUIT" msprop:Generator_RowChangedName="DP_ALERTE_PRODUITRowChanged" msprop:Generator_TablePropName="DP_ALERTE_PRODUIT" msprop:Generator_RowDeletingName="DP_ALERTE_PRODUITRowDeleting" msprop:Generator_RowChangingName="DP_ALERTE_PRODUITRowChanging" msprop:Generator_RowEvHandlerName="DP_ALERTE_PRODUITRowChangeEventHandler" msprop:Generator_RowDeletedName="DP_ALERTE_PRODUITRowDeleted" msprop:Generator_RowClassName="DP_ALERTE_PRODUITRow" msprop:Generator_UserTableName="DP_ALERTE_PRODUIT" msprop:Generator_RowEvArgName="DP_ALERTE_PRODUITRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="CIP" msprop:Generator_ColumnVarNameInTable="columnCIP" msprop:Generator_ColumnPropNameInRow="CIP" msprop:Generator_ColumnPropNameInTable="CIPColumn" msprop:Generator_UserColumnName="CIP" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="MsgRef" msprop:Generator_ColumnVarNameInTable="columnMsgRef" msprop:Generator_ColumnPropNameInRow="MsgRef" msprop:Generator_ColumnPropNameInTable="MsgRefColumn" msprop:Generator_UserColumnName="MsgRef" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Lots" msprop:Generator_ColumnVarNameInTable="columnLots" msprop:Generator_ColumnPropNameInRow="Lots" msprop:Generator_ColumnPropNameInTable="LotsColumn" msprop:Generator_UserColumnName="Lots" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Vue" msprop:Generator_ColumnVarNameInTable="columnVue" msprop:Generator_ColumnPropNameInRow="Vue" msprop:Generator_ColumnPropNameInTable="VueColumn" msprop:Generator_UserColumnName="Vue" type="xs:boolean" minOccurs="0" />
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="DP_Msg" msprop:Generator_TableClassName="DP_MsgDataTable" msprop:Generator_TableVarName="tableDP_Msg" msprop:Generator_RowChangedName="DP_MsgRowChanged" msprop:Generator_TablePropName="DP_Msg" msprop:Generator_RowDeletingName="DP_MsgRowDeleting" msprop:Generator_RowChangingName="DP_MsgRowChanging" msprop:Generator_RowEvHandlerName="DP_MsgRowChangeEventHandler" msprop:Generator_RowDeletedName="DP_MsgRowDeleted" msprop:Generator_RowClassName="DP_MsgRow" msprop:Generator_UserTableName="DP_Msg" msprop:Generator_RowEvArgName="DP_MsgRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="MsgRef" msprop:Generator_ColumnVarNameInTable="columnMsgRef" msprop:Generator_ColumnPropNameInRow="MsgRef" msprop:Generator_ColumnPropNameInTable="MsgRefColumn" msprop:Generator_UserColumnName="MsgRef" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="MsgTyp" msprop:Generator_ColumnVarNameInTable="columnMsgTyp" msprop:Generator_ColumnPropNameInRow="MsgTyp" msprop:Generator_ColumnPropNameInTable="MsgTypColumn" msprop:Generator_UserColumnName="MsgTyp" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="MsgLect" msprop:Generator_ColumnVarNameInTable="columnMsgLect" msprop:Generator_ColumnPropNameInRow="MsgLect" msprop:Generator_ColumnPropNameInTable="MsgLectColumn" msprop:Generator_UserColumnName="MsgLect" type="xs:dateTime" minOccurs="0" />
<xs:element name="MsgDate" msprop:Generator_ColumnVarNameInTable="columnMsgDate" msprop:Generator_ColumnPropNameInRow="MsgDate" msprop:Generator_ColumnPropNameInTable="MsgDateColumn" msprop:Generator_UserColumnName="MsgDate" type="xs:dateTime" minOccurs="0" />
<xs:element name="MsgExpi" msprop:Generator_ColumnVarNameInTable="columnMsgExpi" msprop:Generator_ColumnPropNameInRow="MsgExpi" msprop:Generator_ColumnPropNameInTable="MsgExpiColumn" msprop:Generator_UserColumnName="MsgExpi" type="xs:dateTime" minOccurs="0" />
<xs:element name="Reader" msprop:Generator_ColumnVarNameInTable="columnReader" msprop:Generator_ColumnPropNameInRow="Reader" msprop:Generator_ColumnPropNameInTable="ReaderColumn" msprop:Generator_UserColumnName="Reader" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="AR_sent" msprop:Generator_ColumnVarNameInTable="columnAR_sent" msprop:Generator_ColumnPropNameInRow="AR_sent" msprop:Generator_ColumnPropNameInTable="AR_sentColumn" msprop:Generator_UserColumnName="AR_sent" type="xs:boolean" minOccurs="0" />
<xs:element name="AR_Statut" msprop:Generator_ColumnVarNameInTable="columnAR_Statut" msprop:Generator_ColumnPropNameInRow="AR_Statut" msprop:Generator_ColumnPropNameInTable="AR_StatutColumn" msprop:Generator_UserColumnName="AR_Statut" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="AR_nbr_transmission" msprop:Generator_ColumnVarNameInTable="columnAR_nbr_transmission" msprop:Generator_ColumnPropNameInRow="AR_nbr_transmission" msprop:Generator_ColumnPropNameInTable="AR_nbr_transmissionColumn" msprop:Generator_UserColumnName="AR_nbr_transmission" type="xs:decimal" minOccurs="0" />
<xs:element name="AR_next_trans_time" msprop:Generator_ColumnVarNameInTable="columnAR_next_trans_time" msprop:Generator_ColumnPropNameInRow="AR_next_trans_time" msprop:Generator_ColumnPropNameInTable="AR_next_trans_timeColumn" msprop:Generator_UserColumnName="AR_next_trans_time" type="xs:dateTime" minOccurs="0" />
<xs:element name="MsgEme" msprop:Generator_ColumnVarNameInTable="columnMsgEme" msprop:Generator_ColumnPropNameInRow="MsgEme" msprop:Generator_ColumnPropNameInTable="MsgEmeColumn" msprop:Generator_UserColumnName="MsgEme" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="MsgTit" msprop:Generator_ColumnVarNameInTable="columnMsgTit" msprop:Generator_ColumnPropNameInRow="MsgTit" msprop:Generator_ColumnPropNameInTable="MsgTitColumn" msprop:Generator_UserColumnName="MsgTit" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
<xs:element name="DP_Req" msprop:Generator_TableClassName="DP_ReqDataTable" msprop:Generator_TableVarName="tableDP_Req" msprop:Generator_RowChangedName="DP_ReqRowChanged" msprop:Generator_TablePropName="DP_Req" msprop:Generator_RowDeletingName="DP_ReqRowDeleting" msprop:Generator_RowChangingName="DP_ReqRowChanging" msprop:Generator_RowEvHandlerName="DP_ReqRowChangeEventHandler" msprop:Generator_RowDeletedName="DP_ReqRowDeleted" msprop:Generator_RowClassName="DP_ReqRow" msprop:Generator_UserTableName="DP_Req" msprop:Generator_RowEvArgName="DP_ReqRowChangeEvent">
<xs:complexType>
<xs:sequence>
<xs:element name="Sequence_Number" msprop:Generator_ColumnVarNameInTable="columnSequence_Number" msprop:Generator_ColumnPropNameInRow="Sequence_Number" msprop:Generator_ColumnPropNameInTable="Sequence_NumberColumn" msprop:Generator_UserColumnName="Sequence_Number" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="ReqId" msprop:Generator_ColumnVarNameInTable="columnReqId" msprop:Generator_ColumnPropNameInRow="ReqId" msprop:Generator_ColumnPropNameInTable="ReqIdColumn" msprop:Generator_UserColumnName="ReqId" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="50" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="Statut" msprop:Generator_ColumnVarNameInTable="columnStatut" msprop:Generator_ColumnPropNameInRow="Statut" msprop:Generator_ColumnPropNameInTable="StatutColumn" msprop:Generator_UserColumnName="Statut" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="next_trans_time" msprop:Generator_ColumnVarNameInTable="columnnext_trans_time" msprop:Generator_ColumnPropNameInRow="next_trans_time" msprop:Generator_ColumnPropNameInTable="next_trans_timeColumn" msprop:Generator_UserColumnName="next_trans_time" type="xs:dateTime" minOccurs="0" />
<xs:element name="nbr_trans" msprop:Generator_ColumnVarNameInTable="columnnbr_trans" msprop:Generator_ColumnPropNameInRow="nbr_trans" msprop:Generator_ColumnPropNameInTable="nbr_transColumn" msprop:Generator_UserColumnName="nbr_trans" type="xs:int" minOccurs="0" />
<xs:element name="Identifiant_patient" msprop:Generator_ColumnVarNameInTable="columnIdentifiant_patient" msprop:Generator_ColumnPropNameInRow="Identifiant_patient" msprop:Generator_ColumnPropNameInTable="Identifiant_patientColumn" msprop:Generator_UserColumnName="Identifiant_patient" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
<xs:element name="référence_interne" msprop:Generator_ColumnVarNameInTable="columnréférence_interne" msprop:Generator_ColumnPropNameInRow="référence_interne" msprop:Generator_ColumnPropNameInTable="référence_interneColumn" msprop:Generator_UserColumnName="référence_interne" minOccurs="0">
<xs:simpleType>
<xs:restriction base="xs:string">
<xs:maxLength value="2147483647" />
</xs:restriction>
</xs:simpleType>
</xs:element>
</xs:sequence>
</xs:complexType>
</xs:element>
</xs:choice>
</xs:complexType>
</xs:element>
</xs:schema>

14
DP_Relay/DP_Relay/PharmaDataSet1.xss Normal file
View File

@ -0,0 +1,14 @@
<?xml version="1.0" encoding="utf-8"?>
<!--<autogenerated>
This code was generated by a tool to store the dataset designer's layout information.
Changes to this file may cause incorrect behavior and will be lost if
the code is regenerated.
</autogenerated>-->
<DiagramLayout xmlns:xsi="http://www.w3.org/2001/XMLSchema-instance" xmlns:xsd="http://www.w3.org/2001/XMLSchema" ex:showrelationlabel="False" ViewPortX="-10" ViewPortY="15" xmlns:ex="urn:schemas-microsoft-com:xml-msdatasource-layout-extended" xmlns="urn:schemas-microsoft-com:xml-msdatasource-layout">
<Shapes>
<Shape ID="DesignTable:DP_ALERTE_PRODUIT" ZOrder="3" X="66" Y="25" Height="94" Width="269" AdapterExpanded="true" DataTableExpanded="false" OldAdapterHeight="0" OldDataTableHeight="102" SplitterPosition="25" />
<Shape ID="DesignTable:DP_Msg" ZOrder="2" X="399" Y="27" Height="132" Width="300" AdapterExpanded="true" DataTableExpanded="false" OldAdapterHeight="0" OldDataTableHeight="254" SplitterPosition="25" />
<Shape ID="DesignTable:DP_Req" ZOrder="1" X="789" Y="61" Height="151" Width="300" AdapterExpanded="true" DataTableExpanded="false" OldAdapterHeight="0" OldDataTableHeight="159" SplitterPosition="25" />
</Shapes>
<Connectors />
</DiagramLayout>

2227
DP_Relay/DP_Relay/RCMR_IN000031UV01.vb Normal file
View File

File diff suppressed because it is too large Load Diff

470
DP_Relay/DP_Relay/alerte.vb Normal file
View File

@ -0,0 +1,470 @@
' Copyright (C) 2025 P4pillon.org
'
' This program is free software: you can redistribute it and/or modify
' it under the terms of the GNU Affero General Public License as
' published by the Free Software Foundation, either version 3 of the
' License, or (at your option) any later version.
'
' This program is distributed in the hope that it will be useful,
' but WITHOUT ANY WARRANTY; without even the implied warranty of
' MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
' GNU Affero General Public License for more details.
'
' You should have received a copy of the GNU Affero General Public License
' along with this program. If not, see <https://www.gnu.org/licenses/>.
'------------------------------------------------------------------------------
' <auto-generated>
' Ce code a été généré par un outil.
' Version du runtime :4.0.30319.42000
'
' Les modifications apportées à ce fichier peuvent provoquer un comportement incorrect et seront perdues si
' le code est régénéré.
' </auto-generated>
'------------------------------------------------------------------------------
Option Strict Off
Option Explicit On
Imports System.Xml.Serialization
'
'This source code was auto-generated by xsd, Version=4.7.3062.0.
'
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class alerte
Private refField As String
Private typeField As String
Private dateLectureField As Date
Private dateEmissionField As Date
Private dateExpirationField As Date
Private emetteurField As String
Private titreField As String
Private texteField As String
Private demandeRetourField As String
Private laboratoireField As laboratoire
Private produitsField() As produit
Private alerteSuivanteField As alerteSuivante
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property ref() As String
Get
Return Me.refField
End Get
Set
Me.refField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property type() As String
Get
Return Me.typeField
End Get
Set
Me.typeField = value
End Set
End Property
'''<remarks/>
Public Property dateLecture() As Date
Get
Return Me.dateLectureField
End Get
Set
Me.dateLectureField = value
End Set
End Property
'''<remarks/>
Public Property dateEmission() As Date
Get
Return Me.dateEmissionField
End Get
Set
Me.dateEmissionField = value
End Set
End Property
'''<remarks/>
Public Property dateExpiration() As Date
Get
Return Me.dateExpirationField
End Get
Set
Me.dateExpirationField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property emetteur() As String
Get
Return Me.emetteurField
End Get
Set
Me.emetteurField = value
End Set
End Property
'''<remarks/>
Public Property titre() As String
Get
Return Me.titreField
End Get
Set
Me.titreField = value
End Set
End Property
'''<remarks/>
Public Property texte() As String
Get
Return Me.texteField
End Get
Set
Me.texteField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property demandeRetour() As String
Get
Return Me.demandeRetourField
End Get
Set
Me.demandeRetourField = value
End Set
End Property
'''<remarks/>
Public Property laboratoire() As laboratoire
Get
Return Me.laboratoireField
End Get
Set
Me.laboratoireField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlArrayItemAttribute("produit", IsNullable:=false)> _
Public Property produits() As produit()
Get
Return Me.produitsField
End Get
Set
Me.produitsField = value
End Set
End Property
'''<remarks/>
Public Property alerteSuivante() As alerteSuivante
Get
Return Me.alerteSuivanteField
End Get
Set
Me.alerteSuivanteField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class laboratoire
Private contactField As String
Private adresseField As String
Private codePostalField As String
Private villeField As String
Private telephoneField As String
Private faxField As String
Private emailField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property contact() As String
Get
Return Me.contactField
End Get
Set
Me.contactField = value
End Set
End Property
'''<remarks/>
Public Property adresse() As String
Get
Return Me.adresseField
End Get
Set
Me.adresseField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property codePostal() As String
Get
Return Me.codePostalField
End Get
Set
Me.codePostalField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property ville() As String
Get
Return Me.villeField
End Get
Set
Me.villeField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property telephone() As String
Get
Return Me.telephoneField
End Get
Set
Me.telephoneField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property fax() As String
Get
Return Me.faxField
End Get
Set
Me.faxField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property email() As String
Get
Return Me.emailField
End Get
Set
Me.emailField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class produit
Private codeField As String
Private libelleField As String
Private lotsField As lots
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property code() As String
Get
Return Me.codeField
End Get
Set
Me.codeField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute(DataType:="token")> _
Public Property libelle() As String
Get
Return Me.libelleField
End Get
Set
Me.libelleField = value
End Set
End Property
'''<remarks/>
Public Property lots() As lots
Get
Return Me.lotsField
End Get
Set
Me.lotsField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class lots
Private lotField() As lot
Private ensembleField As String
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute("lot")> _
Public Property lot() As lot()
Get
Return Me.lotField
End Get
Set
Me.lotField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
Public Property ensemble() As String
Get
Return Me.ensembleField
End Get
Set
Me.ensembleField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class lot
Private numField As String
Private perField As Date
Private perFieldSpecified As Boolean
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
Public Property num() As String
Get
Return Me.numField
End Get
Set
Me.numField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="date")> _
Public Property per() As Date
Get
Return Me.perField
End Get
Set
Me.perField = value
End Set
End Property
'''<remarks/>
<System.Xml.Serialization.XmlIgnoreAttribute()> _
Public Property perSpecified() As Boolean
Get
Return Me.perFieldSpecified
End Get
Set
Me.perFieldSpecified = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class alerteSuivante
Private hrefField As String
'''<remarks/>
<System.Xml.Serialization.XmlAttributeAttribute(DataType:="token")> _
Public Property href() As String
Get
Return Me.hrefField
End Get
Set
Me.hrefField = value
End Set
End Property
End Class
'''<remarks/>
<System.CodeDom.Compiler.GeneratedCodeAttribute("xsd", "4.7.3062.0"), _
System.SerializableAttribute(), _
System.Diagnostics.DebuggerStepThroughAttribute(), _
System.ComponentModel.DesignerCategoryAttribute("code"), _
System.Xml.Serialization.XmlTypeAttribute(AnonymousType:=true, [Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte"), _
System.Xml.Serialization.XmlRootAttribute([Namespace]:="http://schemas.dossier-pharmaceutique.fr/alerte", IsNullable:=false)> _
Partial Public Class produits
Private produitField() As produit
'''<remarks/>
<System.Xml.Serialization.XmlElementAttribute("produit")> _
Public Property produit() As produit()
Get
Return Me.produitField
End Get
Set
Me.produitField = value
End Set
End Property
End Class

26
DP_Relay/WDExpress.sln Normal file
View File

@ -0,0 +1,26 @@

Microsoft Visual Studio Solution File, Format Version 12.00
# Visual Studio Express 2012 for Windows Desktop
Project("{911E67C6-3D85-4FCE-B560-20A9C3E3FF48}") = "WDExpress", "..\..\..\..\..\..\Program Files (x86)\Microsoft Visual Studio 11.0\Common7\IDE\WDExpress.exe", "{4EFC579E-E91A-45E5-BAC8-3B5C5D3EA7CD}"
ProjectSection(DebuggerProjectSystem) = preProject
PortSupplier = 00000000-0000-0000-0000-000000000000
Executable = C:\Program Files (x86)\Microsoft Visual Studio 11.0\Common7\IDE\WDExpress.exe
RemoteMachine = JUJU_PORTABLE
StartingDirectory = C:\Program Files (x86)\Microsoft Visual Studio 11.0\Common7\IDE
Environment = Par défaut
LaunchingEngine = 00000000-0000-0000-0000-000000000000
LaunchSQLEngine = No
AttachLaunchAction = No
EndProjectSection
EndProject
Global
GlobalSection(SolutionConfigurationPlatforms) = preSolution
Debug|x86 = Debug|x86
EndGlobalSection
GlobalSection(ProjectConfigurationPlatforms) = postSolution
{4EFC579E-E91A-45E5-BAC8-3B5C5D3EA7CD}.Debug|x86.ActiveCfg = Debug|x86
EndGlobalSection
GlobalSection(SolutionProperties) = preSolution
HideSolutionNode = FALSE
EndGlobalSection
EndGlobal