Code development platform for open source projects from the European Union institutions

Skip to content
Snippets Groups Projects
Commit 01cdf87e authored by Martin Dippold's avatar Martin Dippold
Browse files

* Correction GenShape Check

parent 9aca560a
No related branches found
No related tags found
No related merge requests found
......@@ -149,7 +149,7 @@ The generic parameters for classes are stored in the GenShape.shp",
''
'' Check if vehicle class with the given configuration class is available
For i = 0 To GenShape.veh_class.Count - 1
If GenShape.veh_class(i) = Me.classCode AndAlso CBool(GenShape.veh_conf(i)) = Me.IsRigid Then
If GenShape.veh_class(i) = Me.classCode AndAlso CBool(GenShape.veh_conf(i)) = CBool(Me.configuration) Then
Job.fa_pe = GenShape.fa_pe(i)
Return
End If
......
......@@ -43,7 +43,7 @@ Public Module input
MSCX.longS.Add(Line(5))
MSCX.latE.Add(Line(6))
MSCX.longE.Add(Line(7))
If Crt.gradient_correction Then MSCX.AltPath.Add(Line(8))
If Crt.gradient_correction And Not calibration Then MSCX.AltPath.Add(Line(8))
Loop
Catch ex As Exception
' Falls kein gültiger Wert eingegeben wurde
......
0% Loading or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment