diff --git a/VECTO/Input Files/cDRI.vb b/VECTO/Input Files/cDRI.vb index 899209c01a5eaa49f99725b1fd8e3346f0673955..1b5c00101a49bf780f6954cfc25e8c45715966b6 100644 --- a/VECTO/Input Files/cDRI.vb +++ b/VECTO/Input Files/cDRI.vb @@ -913,6 +913,13 @@ lb10: 'Accept New fields Values = NewValues + + If AuxDef Then + For Each AuxKV In NewAuxValues + AuxComponents(AuxKV.Key) = AuxKV.Value + Next + End If + tDim = Values(tDriComp.t).Count - 1 Return True diff --git a/VECTO/Input Files/cFLD.vb b/VECTO/Input Files/cFLD.vb index 7f125edc3c747a9da92c1ca53ecdd29b8421373b..ead03040bc879de0777db74f92555e2da3acd20d 100644 --- a/VECTO/Input Files/cFLD.vb +++ b/VECTO/Input Files/cFLD.vb @@ -542,28 +542,28 @@ lbInt: Nlo = fnUofPfull(0.55 * Pmax, True) If Nlo < 0 Then - WorkerMsg(tMsgID.Err, "Failed to calculate Nlo! Check full load curve!", MsgSrc) + WorkerMsg(tMsgID.Err, "Failed to calculate Nlo! Expand full load curve!", MsgSrc) Return False End If N95h = fnUofPfull(0.95 * Pmax, False) If N95h < 0 Then - WorkerMsg(tMsgID.Err, "Failed to calculate N95h! Check full load curve!", MsgSrc) + WorkerMsg(tMsgID.Err, "Failed to calculate N95h! Expand full load curve!", MsgSrc) Return False End If Npref = fNpref(Nidle) If Npref < 0 Then - WorkerMsg(tMsgID.Err, "Failed to calculate Npref! Check full load curve!", MsgSrc) + WorkerMsg(tMsgID.Err, "Failed to calculate Npref! Expand full load curve!", MsgSrc) Return False End If Nhi = fnUofPfull(0.7 * Pmax, False) If Nhi < 0 Then - WorkerMsg(tMsgID.Err, "Failed to calculate Nhi! Check full load curve!", MsgSrc) + WorkerMsg(tMsgID.Err, "Failed to calculate Nhi! Expand full load curve!", MsgSrc) Return False End If diff --git a/VECTO/MODcalc/cMOD.vb b/VECTO/MODcalc/cMOD.vb index 23fc42ae092d998a3121267d76110f8f161633b7..448d2008c62d568939e64a19547429beb4ccb627 100644 --- a/VECTO/MODcalc/cMOD.vb +++ b/VECTO/MODcalc/cMOD.vb @@ -838,7 +838,11 @@ Public Class cMOD Abort = False If TrLossMapExtr <> "" Then - WorkerMsg(tMsgID.Err, "Invalid extrapolation in Transmission Loss Map (" & TrLossMapExtr & ")!", MsgSrc & "/t= " & Second) + If Cfg.DeclMode Then + WorkerMsg(tMsgID.Err, "Extrapolation of Transmission Loss Map (" & TrLossMapExtr & ")!", MsgSrc & "/t= " & Second) + Else + WorkerMsg(tMsgID.Warn, "Extrapolation of Transmission Loss Map (" & TrLossMapExtr & ")!", MsgSrc & "/t= " & Second) + End If End If If AuxMapExtr <> "" Then diff --git a/VECTO/VECTO_Global.vb b/VECTO/VECTO_Global.vb index e1a4a4ad2493285b955e6b91ee1547b181ab51a4..677ec4f0125e6c8ec3edfbd5e0f532bea546def3 100644 --- a/VECTO/VECTO_Global.vb +++ b/VECTO/VECTO_Global.vb @@ -12,7 +12,7 @@ Imports System.Collections.Generic Module VECTO_Global - Public Const VECTOvers As String = "2.0.4-beta3" + Public Const VECTOvers As String = "2.0.4-beta4 test1" Public Const LicSigAppCode As String = "VECTO-Release-0093C61E0A2E4BFA9A7ED7E729C56AE4" Public MyAppPath As String Public MyConfPath As String