Add year combobox, fix filenames

MultiTool.Form/frmExportMain.vb

@@ -81,6 +81,8 @@ Public Class frmExportMain
             comboDocumentKind.Properties.EditValueType = Repository.EditValueTypeCollection.List
             comboDocumentKind.EditValue = New List(Of Object)
 
+            comboYear.Properties.Items.AddRange(Winline.Years)
+
             comboDocumentType.Properties.DisplayMember = "Key"
             comboDocumentType.Properties.ValueMember = "Value"
             comboDocumentType.Properties.DataSource = [Enum].
@@ -189,6 +191,7 @@ Public Class frmExportMain
             dateDocDateTo.DoValidate()
 
             Dim oMandator = lookupMandator.EditValue
+            Dim oYear = Utils.NotNull(comboYear.EditValue, 0)
             Dim oAccount = lookupAccount.EditValue
             Dim oKindsAsObjects As List(Of Object) = comboDocumentKind.EditValue
             Dim oKinds As List(Of DocumentKind) = oKindsAsObjects.Cast(Of DocumentKind).ToList()
@@ -214,7 +217,8 @@ Public Class frmExportMain
                 .DateTo = oDateTo,
                 .ShowExported = oShowExported,
                 .DocNumberFrom = oDocNumberFrom,
-                .DocNumberTo = oDocNumberTo
+                .DocNumberTo = oDocNumberTo,
+                .Year = oYear
             })
 
             GridControlDocuments.DataSource = oDocuments