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