|
Lines 47-53
sub create_edi_order {
Link Here
|
| 47 |
my $ean = $parameters->{ean}; |
47 |
my $ean = $parameters->{ean}; |
| 48 |
my $branchcode = $parameters->{branchcode}; |
48 |
my $branchcode = $parameters->{branchcode}; |
| 49 |
my $noingest = $parameters->{noingest}; |
49 |
my $noingest = $parameters->{noingest}; |
| 50 |
$ean ||= C4::Context->preference('EDIfactEAN'); |
|
|
| 51 |
if ( !$basketno || !$ean ) { |
50 |
if ( !$basketno || !$ean ) { |
| 52 |
carp 'create_edi_order called with no basketno or ean'; |
51 |
carp 'create_edi_order called with no basketno or ean'; |
| 53 |
return; |
52 |
return; |
| 54 |
- |
|
|