|
Lines 56-61
if ( $op eq 'acct_form' ) {
Link Here
|
| 56 |
); |
56 |
); |
| 57 |
$template->param( vendors => \@vendors ); |
57 |
$template->param( vendors => \@vendors ); |
| 58 |
|
58 |
|
|
|
59 |
# Get available file transports for selection |
| 60 |
my @file_transports = $schema->resultset('FileTransport')->search( |
| 61 |
{}, |
| 62 |
{ order_by => { -asc => 'name' } } |
| 63 |
); |
| 64 |
$template->param( file_transports => \@file_transports ); |
| 65 |
|
| 59 |
if ( C4::Context->config("enable_plugins") ) { |
66 |
if ( C4::Context->config("enable_plugins") ) { |
| 60 |
my @plugins = Koha::Plugins->new()->GetPlugins( |
67 |
my @plugins = Koha::Plugins->new()->GetPlugins( |
| 61 |
{ |
68 |
{ |
|
Lines 71-99
if ( $op eq 'acct_form' ) {
Link Here
|
| 71 |
if ( $op eq 'cud-save' ) { |
78 |
if ( $op eq 'cud-save' ) { |
| 72 |
|
79 |
|
| 73 |
# validate & display |
80 |
# validate & display |
| 74 |
my $id = $input->param('id'); |
81 |
my $id = $input->param('id'); |
| 75 |
my $password = scalar $input->param('password'); |
|
|
| 76 |
$password = $crypt->encrypt_hex($password); |
| 77 |
my $fields = { |
82 |
my $fields = { |
| 78 |
description => scalar $input->param('description'), |
83 |
description => scalar $input->param('description'), |
| 79 |
host => scalar $input->param('host'), |
84 |
vendor_id => scalar $input->param('vendor_id'), |
| 80 |
username => scalar $input->param('username'), |
85 |
file_transport_id => scalar $input->param('file_transport_id') || undef, |
| 81 |
password => $password, |
86 |
san => scalar $input->param('san'), |
| 82 |
upload_port => scalar $input->param('upload_port') || $input->param('transport') eq 'FTP' ? 21 : 22, |
87 |
standard => scalar $input->param('standard'), |
| 83 |
download_port => scalar $input->param('download_port') || $input->param('transport') eq 'FTP' ? 21 : 22, |
88 |
quotes_enabled => $input->param('quotes_enabled') ? 1 : 0, |
| 84 |
vendor_id => scalar $input->param('vendor_id'), |
89 |
invoices_enabled => $input->param('invoices_enabled') ? 1 : 0, |
| 85 |
upload_directory => scalar $input->param('upload_directory'), |
90 |
orders_enabled => $input->param('orders_enabled') ? 1 : 0, |
| 86 |
download_directory => scalar $input->param('download_directory'), |
91 |
responses_enabled => $input->param('responses_enabled') ? 1 : 0, |
| 87 |
san => scalar $input->param('san'), |
92 |
auto_orders => $input->param('auto_orders') ? 1 : 0, |
| 88 |
standard => scalar $input->param('standard'), |
93 |
id_code_qualifier => scalar $input->param('id_code_qualifier'), |
| 89 |
transport => scalar $input->param('transport'), |
94 |
plugin => scalar $input->param('plugin'), |
| 90 |
quotes_enabled => $input->param('quotes_enabled') ? 1 : 0, |
|
|
| 91 |
invoices_enabled => $input->param('invoices_enabled') ? 1 : 0, |
| 92 |
orders_enabled => $input->param('orders_enabled') ? 1 : 0, |
| 93 |
responses_enabled => $input->param('responses_enabled') ? 1 : 0, |
| 94 |
auto_orders => $input->param('auto_orders') ? 1 : 0, |
| 95 |
id_code_qualifier => scalar $input->param('id_code_qualifier'), |
| 96 |
plugin => scalar $input->param('plugin'), |
| 97 |
}; |
95 |
}; |
| 98 |
|
96 |
|
| 99 |
if ($id) { |
97 |
if ($id) { |
|
Lines 163-169
sub show_account {
Link Here
|
| 163 |
my $acct_id = $input->param('id'); |
161 |
my $acct_id = $input->param('id'); |
| 164 |
if ($acct_id) { |
162 |
if ($acct_id) { |
| 165 |
my $acct = $schema->resultset('VendorEdiAccount')->find($acct_id); |
163 |
my $acct = $schema->resultset('VendorEdiAccount')->find($acct_id); |
| 166 |
$acct->password( $crypt->decrypt_hex( $acct->password ) ); |
|
|
| 167 |
if ($acct) { |
164 |
if ($acct) { |
| 168 |
$template->param( account => $acct ); |
165 |
$template->param( account => $acct ); |
| 169 |
} |
166 |
} |