ajout module devis

mondumas/static/DEVFAC/RPTViewer/modGeneral.vb

@@ -0,0 +1,16 @@
+Module modGeneral
+    ' Paramètres de l'application
+    Public ctDSN_AEM As String
+
+    Public gDate_debut As Date = Now         ' Date début de traitement
+    Public gDate_fin As Date = Now           ' Date fin de traitement
+
+    '-------------------------------------------------------------------------------------
+    Public Function nv(ByVal c As Object) As Object
+        ' remplace une chaine NULL en ""
+        On Error Resume Next
+        nv = vbNullString & c
+
+    End Function
+
+End Module