|
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 |
- |
|
|