Lines 65-71
sub TransportCostMatrix {
Link Here
|
65 |
my $transport_costs = $dbh->selectall_arrayref("SELECT * FROM transport_cost",{ Slice => {} }); |
65 |
my $transport_costs = $dbh->selectall_arrayref("SELECT * FROM transport_cost",{ Slice => {} }); |
66 |
|
66 |
|
67 |
my $today = dt_from_string(); |
67 |
my $today = dt_from_string(); |
68 |
my $calendars; |
|
|
69 |
my %transport_cost_matrix; |
68 |
my %transport_cost_matrix; |
70 |
foreach (@$transport_costs) { |
69 |
foreach (@$transport_costs) { |
71 |
my $from = $_->{frombranch}; |
70 |
my $from = $_->{frombranch}; |
72 |
- |
|
|