Lines 1587-1593
Return the ordernumber of created order.
Link Here
|
1587 |
sub TransferOrder { |
1587 |
sub TransferOrder { |
1588 |
my ($ordernumber, $basketno) = @_; |
1588 |
my ($ordernumber, $basketno) = @_; |
1589 |
|
1589 |
|
1590 |
return unless $ordernumber or $basketno; |
1590 |
return unless ($ordernumber and $basketno); |
1591 |
|
1591 |
|
1592 |
my $order = GetOrder( $ordernumber ); |
1592 |
my $order = GetOrder( $ordernumber ); |
1593 |
return if $order->{datereceived}; |
1593 |
return if $order->{datereceived}; |
1594 |
- |
|
|