diff options
Diffstat (limited to 'config')
| -rw-r--r-- | config/pikul_cost.tag | 6 |
1 files changed, 2 insertions, 4 deletions
diff --git a/config/pikul_cost.tag b/config/pikul_cost.tag index f8e656c..7d9fd0e 100644 --- a/config/pikul_cost.tag +++ b/config/pikul_cost.tag @@ -1,9 +1,8 @@ -UserTag pikul_cost Order company district city province weight service +UserTag pikul_cost Order company origin district city province weight service UserTag pikul_cost Routine <<EOR sub { - my ($company, $district, $city, $province, $weight, $service) = @_; + my ($company, $origin, $district, $city, $province, $weight, $service) = @_; my @provisions; - my $origin; my $table; if ($company == 0) { @provisions = ( @@ -11,7 +10,6 @@ sub { "$Global::Variable->{ANTERAJA_ACCESS_KEY_ID}", "$Global::Variable->{ANTERAJA_SECRET_ACCESS_KEY}" ); - $origin = "$Global::Variable->{ANTERAJA_ORIGIN}"; $table = 'anteraja'; } elsif ($company == 1) { @provisions = ( |