WIP

EDIDocumentImport/Exceptions.vb

@@ -1,9 +1,33 @@
 Public Class Exceptions
-    Public Class NoMandatorException
+    Public MustInherit Class DocumentShowException
         Inherits ApplicationException
 
         Public Sub New(message As String)
             MyBase.New(message)
         End Sub
     End Class
+
+    Public Class NoMandatorException
+        Inherits DocumentShowException
+
+        Public Sub New(message As String)
+            MyBase.New(message)
+        End Sub
+    End Class
+
+    Public Class MultipleAccountsException
+        Inherits DocumentShowException
+
+        Public Sub New(message As String)
+            MyBase.New(message)
+        End Sub
+    End Class
+
+    Public Class NoAccountException
+        Inherits DocumentShowException
+
+        Public Sub New(message As String)
+            MyBase.New(message)
+        End Sub
+    End Class
 End Class