diff --git a/CSE/Calculation/main_calculation_call.vb b/CSE/Calculation/main_calculation_call.vb index 53f803a1f4f75c28bb46f2d36abc6388fd42f751..2579d9d35ee871b592053028858bc996ed5ae2d7 100644 --- a/CSE/Calculation/main_calculation_call.vb +++ b/CSE/Calculation/main_calculation_call.vb @@ -492,7 +492,8 @@ Public Module main_calculation_call SecCount.vVeh.Add(ErgValues(tCompErg.v_veh)(i)) Else SecCount.AnzSec.Add(0) - SecCount.vVeh.Add(0) + 'SecCount.vVeh.Add(0) + SecCount.vVeh.Add(ErgValues(tCompErg.v_veh)(i)) End If End If @@ -513,7 +514,8 @@ Public Module main_calculation_call SecCount.vVeh.Add(ErgValues(tCompErg.v_veh)(i)) Else SecCount.AnzSec.Add(0) - SecCount.vVeh.Add(0) + 'SecCount.vVeh.Add(0) + SecCount.vVeh.Add(ErgValues(tCompErg.v_veh)(i)) End If Else For j = i + 1 To ErgValues(tCompErg.SecID).Count - 1 @@ -526,7 +528,8 @@ Public Module main_calculation_call SecCount.vVeh.Add(ErgValues(tCompErg.v_veh)(i)) Else SecCount.AnzSec.Add(0) - SecCount.vVeh.Add(0) + 'SecCount.vVeh.Add(0) + SecCount.vVeh.Add(ErgValues(tCompErg.v_veh)(i)) End If End If