Lines 69-88
else {
Link Here
|
69 |
if ($change) { |
69 |
if ($change) { |
70 |
$schema->resultset('EdifactEan')->find($id)->update( |
70 |
$schema->resultset('EdifactEan')->find($id)->update( |
71 |
{ |
71 |
{ |
72 |
branchcode => $input->param('branchcode'), |
72 |
branchcode => scalar $input->param('branchcode'), |
73 |
description => $input->param('description'), |
73 |
description => scalar $input->param('description'), |
74 |
ean => $input->param('ean'), |
74 |
ean => scalar $input->param('ean'), |
75 |
id_code_qualifier => $input->param('id_code_qualifier'), |
75 |
id_code_qualifier => scalar $input->param('id_code_qualifier'), |
76 |
} |
76 |
} |
77 |
); |
77 |
); |
78 |
} |
78 |
} |
79 |
else { |
79 |
else { |
80 |
my $new_ean = $schema->resultset('EdifactEan')->new( |
80 |
my $new_ean = $schema->resultset('EdifactEan')->new( |
81 |
{ |
81 |
{ |
82 |
branchcode => $input->param('branchcode'), |
82 |
branchcode => scalar $input->param('branchcode'), |
83 |
description => $input->param('description'), |
83 |
description => scalar $input->param('description'), |
84 |
ean => $input->param('ean'), |
84 |
ean => scalar $input->param('ean'), |
85 |
id_code_qualifier => $input->param('id_code_qualifier'), |
85 |
id_code_qualifier => scalar $input->param('id_code_qualifier'), |
86 |
} |
86 |
} |
87 |
); |
87 |
); |
88 |
$new_ean->insert(); |
88 |
$new_ean->insert(); |
89 |
- |
|
|