WIP

ImporterShared/Documents/Document.vb

@@ -1,18 +1,15 @@
 Imports System.IO
 Imports ImporterShared.Schemas
+Imports ImporterShared.Winline
 
 Namespace Documents
     Public Class Document
         Public File As FileInfo
         Public Type As DocumentType
         Public Schema As Schema
-        Public Mandator As String
-        Public Selected As Boolean = False
+        Public Mandator As Mandator
 
-        ''' <summary>
-        ''' TODO: Set before submitting to web services
-        ''' </summary>
-        Public CreatedAt As Date
+        Public Selected As Boolean = False
 
         Public TemplateName As String
         Public TemplateType As Integer
@@ -24,6 +21,18 @@ Namespace Documents
         ''' </summary>
         Public Property Rows As New List(Of DocumentRow)
 
+        Public ReadOnly Property MandatorId As String
+            Get
+                Return Mandator?.Id
+            End Get
+        End Property
+
+        Public ReadOnly Property CreatedAt As Date
+            Get
+                Return File?.CreationTime
+            End Get
+        End Property
+
         Public ReadOnly Property FullName As String
             Get
                 Return File?.FullName