View | Details | Raw Unified | Return to bug 17692
Collapse All | Expand All

(-)a/admin/edi_ean_accounts.pl (-9 / +8 lines)
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
- 

Return to bug 17692