Projekt

Allgemein

Profil

« Zurück | Weiter » 

Revision 9c548b6f

Von Moritz Bunkus vor mehr als 17 Jahren hinzugefügt

  • ID 9c548b6f507a54d562dd47e79d6dcc0893e15da5
  • Vorgänger a3057d3f
  • Nachfolger c7f9da81

Umstellung der Steuerbearbeitungsfunktion auf das "Template"-Modul.

Unterschiede anzeigen:

bin/mozilla/am.pl
3156 3156
  };
3157 3157
  
3158 3158
  # Ausgabe des Templates
3159
  print($form->parse_html_template('am/edit_tax', $parameters_ref));
3159
  print($form->parse_html_template2('am/edit_tax', $parameters_ref));
3160 3160

  
3161 3161
  $lxdebug->leave_sub();
3162 3162
}
......
3177 3177
  };
3178 3178
  
3179 3179
  # Ausgabe des Templates
3180
  print($form->parse_html_template('am/edit_tax', $parameters_ref));
3180
  print($form->parse_html_template2('am/edit_tax', $parameters_ref));
3181 3181

  
3182 3182
  $lxdebug->leave_sub();
3183 3183
}
......
3196 3196
  $form->header();
3197 3197
  
3198 3198
  # Ausgabe des Templates
3199
  print($form->parse_html_template('am/list_tax', $parameters_ref));
3199
  print($form->parse_html_template2('am/list_tax', $parameters_ref));
3200 3200

  
3201 3201
  $lxdebug->leave_sub();
3202 3202
}
3203 3203

  
3204 3204
sub _get_taxaccount_selection{
3205
    $lxdebug->enter_sub();
3205
  $lxdebug->enter_sub();
3206 3206

  
3207 3207
  AM->get_tax_accounts(\%myconfig, \%$form);
3208 3208

  
3209
  my $i = 0;
3210
  foreach my $taxaccount (@{ $form->{ACCOUNTS} } ) {
3211

  
3212
    # Fill in the Taxaxxounts as select options
3213
      if ($form->{chart_id} == $taxaccount->{id}) {
3214
        $form->{ACCOUNTS}[$i]{select_taxaccount} .=
3215
          qq|<option value="$taxaccount->{id}" selected="selected">
3216
            $form->{ACCOUNTS}[$i]{_taxaccount}\n|;
3217
      }
3218
      else {
3219
        $form->{ACCOUNTS}[$i]{select_taxaccount} .=
3220
          qq|<option value="$taxaccount->{id}">
3221
            $form->{ACCOUNTS}[$i]{_taxaccount}<!-- hallo-->\n|;
3222
      }
3223
    $i++;
3224
  }
3225
  return;
3209
  map { $_->{selected} = $form->{chart_id} == $_->{id} } @{ $form->{ACCOUNTS} };
3226 3210

  
3227 3211
  $lxdebug->leave_sub();
3228 3212
}

Auch abrufbar als: Unified diff