Start, IDS, Procedures

This commit is contained in:
2025-08-08 11:26:48 +02:00
parent 423462b21f
commit 25faaa5a15
3 changed files with 65 additions and 5 deletions

View File

@@ -4762,9 +4762,9 @@ Public Class frmStartOptions
For Each node As XmlElement In doc.GetElementsByTagName("kurs")
Dim wk
If art = 1 Then
wk = New cFremdwaehrungskurse()
wk = New cFremdwaehrungskurse() ' notierte Währungen
Else
wk = New cWaehrungskurseNEU()
wk = New cWaehrungskurseNEU() 'nicht notierte Währungen
End If
If node.Attributes("id") IsNot Nothing Then wk.fw_id = node.Attributes("id").Value
If node.HasChildNodes Then