Lines 81-97
else {
Link Here
|
81 |
download_directory => scalar $input->param('download_directory'), |
81 |
download_directory => scalar $input->param('download_directory'), |
82 |
san => scalar $input->param('san'), |
82 |
san => scalar $input->param('san'), |
83 |
transport => scalar $input->param('transport'), |
83 |
transport => scalar $input->param('transport'), |
|
|
84 |
quotes_enabled => $input->param('quotes_enabled') ? 1 : 0, |
85 |
invoices_enabled => $input->param('invoices_enabled') ? 1 : 0, |
86 |
orders_enabled => $input->param('orders_enabled') ? 1 : 0, |
87 |
responses_enabled => $input->param('responses_enabled') ? 1 : 0, |
88 |
auto_orders => $input->param('auto_orders') ? 1 : 0, |
84 |
id_code_qualifier => scalar $input->param('id_code_qualifier'), |
89 |
id_code_qualifier => scalar $input->param('id_code_qualifier'), |
85 |
plugin => scalar $input->param('plugin'), |
90 |
plugin => scalar $input->param('plugin'), |
86 |
}; |
91 |
}; |
87 |
# ensure all capability fields set to binary 0 or 1 |
|
|
88 |
foreach my $capability |
89 |
(qw( quotes_enabled invoices_enabled orders_enabled responses_enabled auto_orders)) { |
90 |
$fields->{$capability} = defined $input->param($capability); |
91 |
if ($fields->{$capability} != 1) { |
92 |
$fields->{$capability} = 0; |
93 |
} |
94 |
} |
95 |
|
92 |
|
96 |
if ($id) { |
93 |
if ($id) { |
97 |
$schema->resultset('VendorEdiAccount')->search( |
94 |
$schema->resultset('VendorEdiAccount')->search( |
98 |
- |
|
|