WIP: cleanup, work on doc result form

Modules.Jobs/Exceptions.vb

@@ -0,0 +1,46 @@
+Imports System.IO
+
+Public Class Exceptions
+    Public Class MissingValueException
+        Inherits ApplicationException
+
+        Public ReadOnly File As FileInfo
+
+        Public Sub New(File As FileInfo)
+            MyBase.New()
+
+            Me.File = File
+        End Sub
+    End Class
+
+    Public Class TooMuchFerdsException
+        Inherits ApplicationException
+
+        Public Sub New()
+            MyBase.New("More than one ZUGFeRD document found")
+        End Sub
+    End Class
+
+    Public Class InvalidFerdException
+        Inherits ApplicationException
+
+        Public Sub New()
+            MyBase.New("ZUGFeRD document found but was not formatted correctly")
+        End Sub
+    End Class
+
+    Public Class NoFerdsException
+        Inherits ApplicationException
+
+        Public Sub New()
+            MyBase.New("No ZUGFeRD documents found")
+        End Sub
+    End Class
+    Public Class MD5HashException
+        Inherits ApplicationException
+
+        Public Sub New()
+            MyBase.New("There is already an identical invoice")
+        End Sub
+    End Class
+End Class