Revision b2f44e3d
Von Moritz Bunkus vor mehr als 15 Jahren hinzugefügt
| SL/CVar.pm | ||
|---|---|---|
| 79 | 79 |
my $h_id = prepare_query($form, $dbh, $q_id); |
| 80 | 80 |
|
| 81 | 81 |
my $q_new = |
| 82 |
qq|INSERT INTO custom_variable_configs (name, description, type, default_value, options, searchable, includeable, included_by_default, module, id, sortkey) |
|
| 83 |
VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, |
|
| 82 |
qq|INSERT INTO custom_variable_configs (name, description, type, default_value, options, searchable, includeable, included_by_default, module, flags, id, sortkey)
|
|
| 83 |
VALUES (?, ?, ?, ?, ?, ?, ?, ?, ?, ?, ?,
|
|
| 84 | 84 |
(SELECT COALESCE(MAX(sortkey) + 1, 1) FROM custom_variable_configs))|; |
| 85 | 85 |
my $h_new = prepare_query($form, $dbh, $q_new); |
| 86 | 86 |
|
| ... | ... | |
| 90 | 90 |
type = ?, default_value = ?, |
| 91 | 91 |
options = ?, searchable = ?, |
| 92 | 92 |
includeable = ?, included_by_default = ?, |
| 93 |
module = ? |
|
| 93 |
module = ?, flags = ?
|
|
| 94 | 94 |
WHERE id = ?|; |
| 95 | 95 |
my $h_update = prepare_query($form, $dbh, $q_update); |
| 96 | 96 |
|
| ... | ... | |
| 118 | 118 |
|
| 119 | 119 |
do_statement($form, $h_actual, $q_actual, @{$config}{qw(name description type default_value options)},
|
| 120 | 120 |
$config->{searchable} ? 't' : 'f', $config->{includeable} ? 't' : 'f', $config->{included_by_default} ? 't' : 'f',
|
| 121 |
$params{module}, conv_i($config->{id}));
|
|
| 121 |
$params{module}, $config->{flags}, conv_i($config->{id}));
|
|
| 122 | 122 |
} |
| 123 | 123 |
|
| 124 | 124 |
$h_id->finish(); |
Auch abrufbar als: Unified diff
Das Definieren, Erstellen und Bearbeiten von benutzerdefinierten Variablen bei Waren, Dienstleistungen und Erzeugnissen implementiert.