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

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

Merge pull request #19 in VECTO/vecto-cse from ~EMDIPPOMA/vecto-cse:master to master

* commit 'a7dc84ed':
  * New Version number
  * Correction GenShape Check
parents 9aca560a a7dc84ed
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
......
......@@ -13,7 +13,7 @@ Module declaration_public
' Description of the form
Public Const AppName As String = "VECTO_CSE" ' Name of the programm
Public Const AppVers As String = "2.0.1-beta1" ' Version of the Programm
Public Const AppVers As String = "2.0.1-beta2" ' Version of the Programm
Public AppDate As String ' Date of the compilation of the programm
' Control variables
......
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