Imports DevExpress.XtraGrid.Columns

Public Class DocumentPositions
    ''' <summary>
    ''' Class to determine the displayed columns in the positions grid
    ''' </summary>
    Public Class OrderPosition
        Public Property RowNumber As Integer
        Public Property EuropeanArticleNumber As String
        Public Property ArticleNumber As String
        Public Property ArticleNumberVendor As String
        Public Property ArticleDescription As String
        Public Property EDIPrice As Double
        Public Property WinLinePrice As Double
        Public Property Price As Double
        Public Property Amount As Double
    End Class

    Public Shared Property ColumnRowNumber As New GridColumn With {
        .FieldName = "RowNumber",
        .Caption = "Nr.",
        .VisibleIndex = 0,
        .MaxWidth = 30
    }
    Public Shared Property ColumnArticleNumber As New GridColumn With {
        .FieldName = "ArticleNumber",
        .Caption = "Artikelnummer",
        .VisibleIndex = 1
    }
    Public Shared Property ColumnEuropeanArticleNumber As New GridColumn With {
        .FieldName = "EuropeanArticleNumber",
        .Caption = "EAN",
        .VisibleIndex = 2
    }
    Public Shared Property ColumnArticleNumberVendor As New GridColumn With {
        .FieldName = "ArticleNumberVendor",
        .Caption = "Artikel Lieferant",
        .VisibleIndex = 3
    }
    Public Shared Property ColumnArticleDescription As New GridColumn With {
        .FieldName = "ArticleDescription",
        .Caption = "Artikel Beschreibung",
        .VisibleIndex = 4
    }
    Public Shared Property ColumnAmount As New GridColumn With {
        .FieldName = "Amount",
        .Caption = "Menge",
        .VisibleIndex = 5
    }
    Public Shared Property ColumnEDIPrice As New GridColumn With {
        .FieldName = "EDIPrice",
        .Caption = "Einzelpreis EDI",
        .VisibleIndex = 6
    }
    Public Shared Property ColumnWinLinePrice As New GridColumn With {
        .FieldName = "WinLinePrice",
        .Caption = "Einzelpreis WinLine",
        .VisibleIndex = 7
    }
    Public Shared Property ColumnPrice As New GridColumn With {
        .FieldName = "Price",
        .Caption = "Einzelpreis",
        .VisibleIndex = 8
    }

    ''' <summary>
    ''' Columns that can be changed in the positions grid
    ''' </summary>
    Public Shared Property WritableColumns As New List(Of GridColumn) From {
        ColumnPrice
    }
End Class