diff options
-rw-r--r-- | config/pikul_order.tag | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/config/pikul_order.tag b/config/pikul_order.tag index 074cc07..de4f7f2 100644 --- a/config/pikul_order.tag +++ b/config/pikul_order.tag @@ -19,7 +19,7 @@ sub { "$Global::Variable->{ANTERAJA_SECRET_ACCESS_KEY}", "$Global::Variable->{ANTERAJA_PREFIX}" ); - $origin = $::Variable->{ANTERAJA_ORIGIN}; + $origin = "$::Variable->{ANTERAJA_ORIGIN}"; } my @items = @{$Tag->query({sql => "SELECT sku,quantity FROM orderline WHERE \ order_number='$order_number'", @@ -36,10 +36,10 @@ sub { my $waybill = Pikul::order( $order_number, $service, - $::Variable->{COMPANY}, - $::Variable->{PHONE}, + "$::Variable->{COMPANY}", + "$::Variable->{PHONE}", $origin, - $::Variable->{ADDRESS}, + "$::Variable->{ADDRESS}", "$fname $lname", $phone_day, $Tag->query({sql => "SELECT code FROM $table WHERE district='$address2' AND city='$city' \ |