Revision 3dc2935c
Von Sven Schöling vor fast 16 Jahren hinzugefügt
| bin/mozilla/ic.pl | ||
|---|---|---|
|
|
||
|
# save form variables in a previousform variable
|
||
|
foreach my $key (sort keys %$form) {
|
||
|
next unless ref $form->{$key} eq '' && $form->{$key};
|
||
|
|
||
|
# escape ampersands
|
||
|
$form->{$key} =~ s/&/%26/g;
|
||
| ... | ... | |
|
|
||
|
} else {
|
||
|
$href =
|
||
|
qq|$form->{script}?action=edit&id=$form->{"id_$i"}|;
|
||
|
qq|$form->{script}?action=edit&id=$form->{"id_$i"}&rowcount=$i&previousform=$previousform|;
|
||
|
$column_data{partnumber} =
|
||
|
qq|<td><input type=hidden name="partnumber_$i" value="$form->{"partnumber_$i"}"><a href=$href>$form->{"partnumber_$i"}</a></td>|;
|
||
|
$column_data{runningnumber} =
|
||
Auch abrufbar als: Unified diff
Und nochmal anders:
Previous Form nur die Werte speichern, die SCALAR und nicht leer sind.
Damit dann auch wieder die previousform Funktion in assembly_row->part