diff options
Diffstat (limited to 'config')
| -rw-r--r-- | config/pikul_cost.tag | 6 | ||||
| -rw-r--r-- | config/pikul_order.tag | 7 |
2 files changed, 13 insertions, 0 deletions
diff --git a/config/pikul_cost.tag b/config/pikul_cost.tag index eb99dde..f885c12 100644 --- a/config/pikul_cost.tag +++ b/config/pikul_cost.tag @@ -11,6 +11,12 @@ sub { ); $origin = $::Variable->{ANTERAJA_ORIGIN}; $table = 'anteraja'; + } elsif ($company == $::Variable->{PIKUL_SICEPAT}) { + @provisions = ( + "$Global::Variable->{SICEPAT_API_KEY}" + ); + $origin = $::Variable->{SICEPAT_ORIGIN}; + $table = 'sicepat_destination'; } use Pikul; Pikul::init($company, \@provisions); diff --git a/config/pikul_order.tag b/config/pikul_order.tag index 08bbffb..8e955ad 100644 --- a/config/pikul_order.tag +++ b/config/pikul_order.tag @@ -21,6 +21,13 @@ sub { "$Global::Variable->{ANTERAJA_PREFIX}" ); $origin = "$::Variable->{ANTERAJA_ORIGIN}"; + } elsif (substr($table, 0, 7) eq 'sicepat') { + $company = $::Variable->{PIKUL_SICEPAT}; + @provisions = ( + "$Global::Variable->{SICEPAT_API_KEY}" + ); + $origin = "$::Variable->{SICEPAT_ORIGIN}"; + $table .= '_destination'; } my @items = @{$Tag->query({sql => "SELECT sku,quantity FROM orderline WHERE \ order_number='$order_number'", |