sub aktualisiere {    my $self    = shift;            # Query-Parameter wieder in die Liste der in das    # Template einzusetenden Werte aufnehmen    my %p       = $self->query->Vars();    while( my ($key, $val) = each(%p) ){        $self->_set2substitute(ucfirst($key) => $val);    } # /while        # ToDo: CAP::Plugin::MessageStack benutzen    my $msg     = 'Ihr Formular wurde aktualisiert (nicht gepeichert). [' . localtime() . ']';    $self->_set2substitute('Msg' => $msg);        return $self->forward('printForm'); } # /aktualisiere