fix error for profilepreselection
This commit is contained in:
parent
9b8a780f06
commit
b2f82f3880
@ -1677,8 +1677,8 @@ Public Class frmIndex
|
||||
If CURRENT_LASTDOKART <> "" Then
|
||||
_Logger.Info("Last Saved DocType: {0}", CURRENT_LASTDOKART)
|
||||
|
||||
Dim oFoundDocType = ComboboxDoctype.Properties.DataSource.
|
||||
Cast(Of DocType)().
|
||||
Dim oDocTypes As List(Of DocType) = ComboboxDoctype.Properties.DataSource
|
||||
Dim oFoundDocType = oDocTypes.
|
||||
Where(Function(dt) dt.Name = CURRENT_LASTDOKART).
|
||||
FirstOrDefault()
|
||||
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user