Revision 11047a5a
Von Jan Büren vor mehr als 1 Jahr hinzugefügt
SL/AM.pm | ||
---|---|---|
90 | 90 |
my $chart_obj = SL::DB::Manager::Chart->find_by(id => $form->{id}) || die "Can't open chart"; |
91 | 91 |
|
92 | 92 |
my @chart_fields = qw(accno description charttype category link pos_bilanz |
93 |
pos_eur pos_er new_chart_id valid_from pos_bwa datevautomatik); |
|
93 |
pos_eur pos_er new_chart_id valid_from pos_bwa datevautomatik |
|
94 |
invalid); |
|
94 | 95 |
foreach my $cf ( @chart_fields ) { |
95 | 96 |
$form->{"$cf"} = $chart_obj->$cf; |
96 | 97 |
} |
... | ... | |
232 | 233 |
pos_er = ?, |
233 | 234 |
new_chart_id = ?, |
234 | 235 |
valid_from = ?, |
235 |
datevautomatik = ? |
|
236 |
datevautomatik = ?, |
|
237 |
invalid = ? |
|
236 | 238 |
WHERE id = ?|; |
237 | 239 |
|
238 | 240 |
@values = ( |
... | ... | |
248 | 250 |
conv_i($form->{new_chart_id}), |
249 | 251 |
conv_date($form->{valid_from}), |
250 | 252 |
($form->{datevautomatik} eq 'T') ? 'true':'false', |
253 |
$form->{invalid} ? 'true' : 'false', |
|
251 | 254 |
$form->{id}, |
252 | 255 |
); |
253 | 256 |
|
SL/DB/MetaSetup/Chart.pm | ||
---|---|---|
15 | 15 |
datevautomatik => { type => 'boolean', default => 'false' }, |
16 | 16 |
description => { type => 'text' }, |
17 | 17 |
id => { type => 'integer', not_null => 1, sequence => 'id' }, |
18 |
invalid => { type => 'boolean', default => 'false' }, |
|
18 | 19 |
itime => { type => 'timestamp', default => 'now()' }, |
19 | 20 |
link => { type => 'text', not_null => 1 }, |
20 | 21 |
mtime => { type => 'timestamp' }, |
sql/Pg-upgrade2/invalid_chart.sql | ||
---|---|---|
1 |
-- @tag: invalid_chart |
|
2 |
-- @description: Ungültigkeit für Chart |
|
3 |
-- @depends: release_3_8_0 |
|
4 |
-- @ignore: 0 |
|
5 |
|
|
6 |
ALTER TABLE chart add column invalid boolean DEFAULT FALSE; |
|
7 |
|
templates/webpages/am/edit_accounts.html | ||
---|---|---|
75 | 75 |
[% END %] |
76 | 76 |
</td> |
77 | 77 |
</tr> |
78 |
<tr> |
|
79 |
<td>[% 'Invalid' | $T8 %] </td> |
|
80 |
<td>[% L.checkbox_tag('invalid', value => 1, checked => invalid, class => 'checkbox') %]</td> |
|
81 |
</tr> |
|
78 | 82 |
</table> |
79 | 83 |
</fieldset> |
80 | 84 |
|
Auch abrufbar als: Unified diff
Chart neues Feld ungültig