Namespace Templates
    Public Class GeneralConfig
        Public Property InputDirectory As String = ""
        Public Property OutputDirectory As String = ""
        Public Property TemplateDirectory As String = ""

        Public ReadOnly Property OutputReportDirectory
            Get
                Return IO.Path.Combine(OutputDirectory, "Reports")
            End Get
        End Property

        Public ReadOnly Property OutputWebserviceDirectory
            Get
                Return IO.Path.Combine(OutputDirectory, "WebService")
            End Get
        End Property

        Public ReadOnly Property OutputXmlFileDirectory
            Get
                Return IO.Path.Combine(OutputDirectory, "XmlFiles")
            End Get
        End Property

        Public Property Webservice As New WebServiceConfig()
        Public Property DefaultYearOverride As Integer = 0

        Public Class WebServiceConfig
            Public Property BaseUrl As String = "http://127.0.0.1/EWL"
            Public Property Username As String = "Username"
            Public Property Password As String = "Password"
            Public Property ImportBasePath As String = ""
            Public Property ImportRelativePath As String = ""
        End Class

        <DebuggerStepThrough>
        Public Function GetYear() As Integer
            If DefaultYearOverride > 0 Then
                Return DefaultYearOverride
            End If

            Return Now.Year
        End Function

        <DebuggerStepThrough>
        Public Function GetWinLineYear()
            Return GetWinLineYear(GetYear)
        End Function

        <DebuggerStepThrough>
        Public Function GetWinLineYear(pYear As Integer)
            Return (pYear - 1900) * 12
        End Function
    End Class
End Namespace