projekt kivitendo

      if ($form->{hashed_password}) {

        $form->{password} = $form->{hashed_password};

      } else {

        $form->{password} = crypt($form->{password},

                                  substr($self->{login}, 0, 2));

      }

        qw(dbname dbhost dbport dbdriver dbuser dbpasswd dbconnect);

.subsubheading {

  color: black;

  font-weight: bolder;

  text-decoration: underline;

}

  'Assign new units'            => 'Neue Einheiten zuweisen',

  'Assign units'                => 'Einheiten zuweisen',

  'Back'                        => 'Zurück',

  'Current unit'                => 'Aktuelle Einheit',

  'Database update error:'      => '',

  'Dimension unit'              => 'Maßeinheit',

  'Error'                       => 'Fehler',

  'For each unit there\'s either no or exactly one base unit. If you chose a base unit then you also have to chose a factor. That way the new unit will be defined as a multiple of the base unit. The base unit must be the "smaller" one. A factor may not be less than 1. Therefore you may define "kg" with the base unit "g" and a factor of "1", but not the other way round.' => 'Einheiten haben entweder keine oder genau eine Basiseinheit, von der sie ein Vielfaches sind. Wenn Sie eine Basiseinheit auswählen, dann müssen Sie auch einen Faktor eingeben. Sie müssen Einheiten als ein Vielfaches einer kleineren Einheit eingeben. So ist die Definition von "kg" mit der Basiseinheit "g" und dem Faktor 1000 zulässig, die Definition von "g" mit der Basiseinheit "kg" und dem Faktor "0,001" hingegen nicht.',

  'In Lx-Office 2.4.0 the administrator has to enter a list of units in the administrative section.' => 'In Lx-Office 2.4.0 muss der Administrator in den Systemeinstellungen eine Liste von verwendbaren Einheiten angeben.',

  'Introduction of units'       => 'Einführung von Einheiten',

  'It is possible to do this automatically for some units, but for others the user has to chose the new unit.' => 'Das ist für einige Einheiten automatisch möglich, aber bei anderen muss der Benutzer die neue Einheit auswählen.',

  'New unit'                    => 'Neue Einheit',

  'No entries were found which had no unit assigned to them.' => 'Es wurden keine Einträge gefunden, denen keine Einheit zugeordnet war.',

  'No unknown units where found.' => 'Es wurden keine unbekannten Einheiten gefunden.',

  'Prior to Lx-Office v2.4.0 the user could enter arbitrary strings as units for parts, services and in invoices, sales quotations etc.' => 'Vor Lx-Office 2.4.0 konnte der Benutzer bei Artikeln, Dienstleistungen und Rechnungen, Angeboten etc beliebige Einheiten angeben.',

  'Service unit'                => 'Dienstleistungseinheit',

  'Step 1 of 3: Parts'          => 'Schritt 1 von 3: Waren',

  'Step 2 of 3: Services'       => 'Schritt 2 von 3: Dienstleistungen',

  'Step 3 of 3: Default units'  => 'Schritt 3 von 3: Standardeinheiten',

  'The database upgrade for the introduction of units is now complete.' => 'Das Datenbankupgrade zwecks Einführung von Einheiten ist nun beendet.',

  'The following units are unknown.' => 'Die folgenden Einheiten sind unbekannt.',

  'The following units exist already:' => 'Die folgenden Einheiten existieren bereits:',

  'There are still entries in the database for which no unit has been assigned.' => 'Es gibt noch Einträge in der Datenbank, für die keine Einheit zugeordnet ist.',

  'These units can be based on other units so that Lx-Office can convert prices when the user switches from one unit to another.' => 'Diese Einheiten können auf anderen Einheiten basieren, sodass Lx-Office Preise umrechnen kann, wenn der Benutzer von einer Einheit zu einer anderen Wechselt.',

  'This upgrade script tries to map all existing units in the database to the newly created units.' => 'Dieses Update-Script versucht, alle bestehenden Einheiten automatisch in die neuen Einheiten umzuwandeln.',

  'You can also create new units now.' => 'Sie können jetzt auch neue Einheiten anlegen.',

  'You cannot continue until all unknown units have been mapped to known ones.' => 'Sie können nicht fortfahren, bis alle unbekannten Einheiten in neue Einheiten umgewandelt wurden.',

  'You have to chose a dimension unit and a service unit which will then be assigned to those entries.' => 'Sie müssen eine Maß- und eine Dienstleistungseinheit auswählen, die diesen Waren und Dienstleistungen, denen noch keine Einheit zugeordnet ist, zugeordnet wird.',

  'You have to chose which unit to save for each of them.' => 'Sie müssen für jeden Artikel die neue Einheit auswählen.',

$self{texts} = {

  'A unit with this name does already exist.' => 'Eine Einheit mit diesem Namen existiert bereits.',

  'Database update error:'      => 'Database update error:',

  'The base unit does not exist.' => 'Die Basiseinheit existiert nicht.',

  'The factor is missing.'      => 'Der Faktor fehlt.',

  'The name is missing.'        => 'Der Name fehlt.',

  'The unit has been saved.'    => 'Die Einheit wurde gespeichert.',

};

$self{subs} = {

  'mydberror'                   => 'mydberror',

  'myshowerror'                 => 'myshowerror',

  'update_units'                => 'update_units',

  'update_units_add_unit'       => 'update_units_add_unit',

  'update_units_assign_known'   => 'update_units_assign_known',

  'update_units_assign_units'   => 'update_units_assign_units',

  'update_units_set_default'    => 'update_units_set_default',

  'update_units_step_3'         => 'update_units_step_3',

  'update_units_steps_1_2'      => 'update_units_steps_1_2',

  'einheit_hinzufügen'     => 'add_unit',

  'einheiten_zuweisen'          => 'assign_units',

};

1;

#!/usr/bin/perl

die("This script cannot be run from the command line.") unless ($main::form);

use SL::AM;

%dbup_myconfig = ();

map({ $dbup_myconfig{$_} = $main::form->{$_}; }

    qw(dbname dbuser dbpasswd dbhost dbport dbconnect));

sub mydberror {

  my ($dbup_locale, $msg) = @_;

  die($dbup_locale->text("Database update error:") .

      "<br>$msg<br>" . $DBI::errstr);

}

sub myshowerror {

  my ($msg) = @_;

  print($main::form->parse_html_template("dbupgrade/units_error",

                                         { "message" => $msg }));

  return 2;

}

sub update_units_add_unit {

  my ($dbup_locale, $dbh) = @_;

  my $form = $main::form;

  return 0 unless ($form->{"new_name"});

  return myshowerror($dbup_locale->text("The name is missing."))

    if ($form->{"new_name"} eq "");

  my $units = AM->retrieve_units(\%dbup_myconfig, $form);

  return myshowerror($dbup_locale->text("A unit with this name does already exist."))

    if ($units->{$form->{"new_name"}});

  $units = AM->retrieve_units(\%dbup_myconfig, $form, $form->{"unit_type"});

  my ($base_unit, $factor);

  if ($form->{"new_base_unit"}) {

    return myshowerror($dbup_locale->text("The base unit does not exist."))

      unless (defined($units->{$form->{"new_base_unit"}}));

    return myshowerror($dbup_locale->text("The factor is missing."))

      if ($form->{"new_factor"} eq "");

    $factor = $form->parse_amount(\%dbup_myconfig, $form->{"new_factor"});

    return myshowerror($dbup_locale->text("The factor is missing."))

      unless ($factor);

    $base_unit = $form->{"new_base_unit"};

  }

  my $query = "INSERT INTO units " .

    "(name, base_unit, factor, type) " .

    "VALUES (?, ?, ?, ?)";

  $dbh->do($query, undef, $form->{"new_name"}, $base_unit, $factor,

           $form->{"unit_type"}) ||

    mydberror($dbup_locale, $query .

              " ($form->{new_name}, $base_unit, $factor, $form->{unit_type})");

  $dbh->commit();

  $dbh->begin_work();

  $form->{"saved_message"} = $dbup_locale->text("The unit has been saved.");

  return 0;

}

sub update_units_assign_units {

  my ($dbup_locale, $dbh) = @_;

  my ($query, $sth, @values);

  my $form = $main::form;

  foreach my $table (qw(parts invoice orderitems rmaitems)) {

    $query = "UPDATE $table SET unit = ? WHERE lower(unit) = ?";

    $sth = $dbh->prepare($query);

    for (my $i = 1; $i <= $form->{"rowcount"}; $i++) {

      next unless ($form->{"new_unit_$i"} && $form->{"old_unit_$i"});

      @values = ($form->{"new_unit_$i"}, lc($form->{"old_unit_$i"}));

      $sth->execute(@values) ||

        mydberror($dbup_locale, $query . " (" . join(", ", @values) . ")");

    }

  }

  $sth->finish();

  $dbh->commit();

  $dbh->begin_work();

}

sub update_units_assign_known {

  my ($dbup_locale, $dbh) = @_;

  my $form = $main::form;

  my %unit_name_mapping = (

    "st" => "Stck",

    "st." => "Stck",

    "pc" => "Stck",

    "pcs" => "Stck",

    "ea" => "Stck",

    );

  my $i = 1;

  foreach my $k (keys(%unit_name_mapping)) {

    $form->{"old_unit_$i"} = $k;

    $form->{"new_unit_$i"} = $unit_name_mapping{$k};

    $i++;

  }

  $form->{"rowcount"} = scalar(keys(%unit_name_mapping));

  update_units_assign_units($dbup_locale, $dbh);

}

sub update_units_steps_1_2 {

  my ($dbup_locale, $dbh) = @_;

  my (%unknown_dimension_units, %unknown_service_units);

  my $form = $main::form;

  foreach my $table (qw(parts invoice orderitems rmaitems)) {

    my ($query, $sth, $ref);

    if ($table eq "parts") {

      $query = "SELECT unit, inventory_accno_id FROM parts " .

        "WHERE NOT ((unit = '') OR unit ISNULL OR " .

        "           unit IN (SELECT name FROM units))";

    } else {

      $query = "SELECT t.unit, p.inventory_accno_id " .

        "FROM $table t " .

        "LEFT JOIN parts p ON p.id = t.parts_id " .

        "WHERE NOT ((t.unit = '') OR t.unit ISNULL OR " .

        "           t.unit IN (SELECT name FROM units))";

    }

    $sth = $dbh->prepare($query);

    $sth->execute() || mydberror($dbup_locale, $query);

    while ($ref = $sth->fetchrow_hashref()) {

      if ($ref->{"inventory_accno_id"}) {

        $unknown_dimension_units{$ref->{"unit"}} = 1;

      } else {

        $unknown_service_units{$ref->{"unit"}} = 1;

      }

    }

    $sth->finish();

  }

  if (scalar(keys(%unknown_dimension_units)) != 0) {

    my $units = AM->retrieve_units(\%dbup_myconfig, $form, "dimension");

    my $ddbox = AM->unit_select_data($units, undef, 1);

    my @unknown_parts;

    map({ push(@unknown_parts, { "name" => $_, "NEW_UNITS" => $ddbox }); }

        sort({ lc($a) cmp lc($b) } keys(%unknown_dimension_units)));

    print($form->parse_html_template("dbupgrade/units_parts",

                                     { "NEW_BASE_UNIT_DDBOX" => $ddbox,

                                       "UNKNOWN_PART_UNITS" => \@unknown_parts,

                                     }));

    return 2;

  } else {

    print($form->parse_html_template("dbupgrade/units_parts_done"));

  }

  if (scalar(keys(%unknown_service_units)) != 0) {

    my $units = AM->retrieve_units(\%dbup_myconfig, $form, "service");

    my $ddbox = AM->unit_select_data($units, undef, 1);

    my @unknown_services;

    map({ push(@unknown_services, { "name" => $_, "NEW_UNITS" => $ddbox }); }

        sort({ lc($a) cmp lc($b) } keys(%unknown_service_units)));

    print($form->parse_html_template("dbupgrade/units_services",

                                     { "NEW_BASE_UNIT_DDBOX" => $ddbox,

                                       "UNKNOWN_PART_UNITS" => \@unknown_services,

                                     }));

    return 2;

  } else {

    print($form->parse_html_template("dbupgrade/units_services_done"));

  }

  return 0;

}

sub update_units_step_3 {

  my ($dbup_locale, $dbh) = @_;

  my $form = $main::form;

  my $query = "SELECT ";

  foreach my $table (qw(parts invoice orderitems rmaitems)) {

    $query .= "(SELECT COUNT(*) FROM $table " .

      "WHERE (unit ISNULL) OR (unit = '')) +";

  }

  substr($query, -1, 1) = "AS has_unassigned";

  my ($has_unassigned) = $dbh->selectrow_array($query);

  if ($has_unassigned) {

    my $dimension_units = AM->retrieve_units(\%dbup_myconfig, $form,

                                             "dimension");

    my $dimension_ddbox = AM->unit_select_data($dimension_units);

    my $service_units = AM->retrieve_units(\%dbup_myconfig, $form, "service");

    my $service_ddbox = AM->unit_select_data($service_units);

    print($form->parse_html_template("dbupgrade/units_set_default",

                                     { "DIMENSION_DDBOX" => $dimension_ddbox,

                                       "SERVICE_DDBOX" => $service_ddbox }));

    return 2;

  } else {

    print($form->parse_html_template("dbupgrade/units_set_default_done"));

    return 1;

  }

}

sub update_units_set_default {

  my ($dbup_locale, $dbh) = @_;

  my $form = $main::form;

  foreach my $table (qw(parts invoice orderitems rmaitems)) {

    my $base_query = "UPDATE $table SET unit = " .

      $dbh->quote($form->{"default_service_unit"}) . " " .

      "WHERE ((unit ISNULL) OR (unit = '')) AND ";

    my $query;

    if ($table eq "parts") {

      $query = "UPDATE $table SET unit = " .

        $dbh->quote($form->{"default_dimension_unit"}) . " " .

        "WHERE ((unit ISNULL) OR (unit = '')) AND (inventory_accno_id > 0)";

    } else {

      $query = "UPDATE $table SET unit = " .

        $dbh->quote($form->{"default_dimension_unit"}) . " " .

        "WHERE ((unit ISNULL) OR (unit = '')) AND " .

        "parts_id IN (SELECT id FROM parts WHERE (inventory_accno_id > 0))";

    }

    $dbh->do($query) || mydberror($dbup_locale, $query);

    if ($table eq "parts") {

      $query = "UPDATE $table SET unit = " .

        $dbh->quote($form->{"default_service_unit"}) . " " .

        "WHERE ((unit ISNULL) OR (unit = '')) AND " .

        "(inventory_accno_id ISNULL) OR (inventory_accno_id = 0)";

    } else {

      $query = "UPDATE $table SET unit = " .

        $dbh->quote($form->{"default_service_unit"}) . " " .

        "WHERE ((unit ISNULL) OR (unit = '')) AND " .

        "parts_id IN (SELECT id FROM parts " .

        "WHERE (inventory_accno_id ISNULL) OR (inventory_accno_id = 0))";

    }

    $dbh->do($query) || mydberror($dbup_locale, $query);

  }

}

sub update_units {

  my (@dbh) = @_;

  my $form = $main::form;

  my $res;

  my $dbup_locale = Locale->new($main::language, "dbupgrade");

  print($form->parse_html_template("dbupgrade/units_header"));

  if ($form->{"action2"} eq "add_unit") {

    $res = update_units_add_unit($dbup_locale, $dbh);

    return $res if ($res);

  } elsif ($form->{"action2"} eq "assign_units") {

    update_units_assign_units($dbup_locale, $dbh);

  } elsif ($form->{"action2"} eq "set_default") {

    update_units_set_default($dbup_locale, $dbh);

  }

  update_units_assign_known($dbup_locale, $dbh);

  $res = update_units_steps_1_2($dbup_locale, $dbh);

  return $res if ($res);

  return update_units_step_3($dbup_locale, $dbh);

}

update_units($dbh);

<p><b>Fehler:</b> <TMPL_VAR message></p>

<form>

<input type="button" onclick="history.back()" value="Zur&uuml;ck">

</form>

<p><b><translate>Error</translate>:</b> <TMPL_VAR message></p>

<form>

<input type="button" onclick="history.back()" value="<translate>Back</translate>">

</form>

<div class="listtop">Einf&uuml;hrung von Einheiten</div>

<p>

 Vor Lx-Office 2.4.0 konnte der Benutzer bei Artikeln, Dienstleistungen und Rechnungen, Angeboten etc beliebige Einheiten angeben.

 In Lx-Office 2.4.0 muss der Administrator in den Systemeinstellungen eine Liste von verwendbaren Einheiten angeben.

 Diese Einheiten können auf anderen Einheiten basieren, sodass Lx-Office Preise umrechnen kann, wenn der Benutzer von einer Einheit zu einer anderen Wechselt.

</p>

<p>

 Dieses Update-Script versucht, alle bestehenden Einheiten automatisch in die neuen Einheiten umzuwandeln.

 Das ist für einige Einheiten automatisch möglich, aber bei anderen muss der Benutzer die neue Einheit auswählen.

 Sie können nicht fortfahren, bis alle unbekannten Einheiten in neue Einheiten umgewandelt wurden.

 Sie können jetzt auch neue Einheiten anlegen.

</p>

<div class="listtop"><translate>Introduction of units</translate></div>

<p>

 <translate>Prior to Lx-Office v2.4.0 the user could enter arbitrary

  strings as units for parts, services and in invoices, sales quotations

  etc.</translate>

 <translate>In Lx-Office 2.4.0 the administrator has to enter a list

  of units in the administrative section.</translate>

 <translate>These units can be based on other units so that Lx-Office

  can convert prices when the user switches from one unit to

  another.</translate>

</p>

<p>

 <translate>This upgrade script tries to map all existing units in the

  database to the newly created units.</translate>

 <translate>It is possible to do this automatically for some units,

  but for others the user has to chose the new unit.</translate>

 <translate>You cannot continue until all unknown units have been

  mapped to known ones.</translate>

 <translate>You can also create new units now.</translate>

</p>

<div class="listtop">Schritt 1 von 3: Waren</div>

<form name="Form" method="post" action="login.pl">

 <input type="hidden" name="path" value="<TMPL_VAR path ESCAPE=HTML>">

 <input type="hidden" name="login" value="<TMPL_VAR login ESCAPE=HTML>">

 <input type="hidden" name="hashed_password" value="<TMPL_VAR password ESCAPE=HTML>">

 <input type="hidden" name="unit_type" value="dimension">

 <input type="hidden" name="action" value="login">

 <input type="hidden" name="action2" value="">

 <TMPL_IF saved_message>

  <p><TMPL_VAR saved_message></p>

 </TMPL_IF>

 <div class="subsubheading">Einheit hinzuf&uuml;gen</div>

 <p>

  Einheiten haben entweder keine oder genau eine Basiseinheit, von der sie ein Vielfaches sind. Wenn Sie eine Basiseinheit auswählen, dann müssen Sie auch einen Faktor eingeben. Sie müssen Einheiten als ein Vielfaches einer kleineren Einheit eingeben. So ist die Definition von "kg" mit der Basiseinheit "g" und dem Faktor 1000 zulässig, die Definition von "g" mit der Basiseinheit "kg" und dem Faktor "0,001" hingegen nicht.

 </p>

 <p>

  Die folgenden Einheiten existieren bereits:

  <TMPL_LOOP NEW_BASE_UNIT_DDBOX><TMPL_IF name><TMPL_VAR name ESCAPE=HTML><TMPL_UNLESS __last__>; </TMPL_UNLESS></TMPL_IF></TMPL_LOOP>

 </p>

 <hr>

 <table>

  <tr>

   <th align="right">Einheit</th>

   <td><input name="new_name" size="20" maxlength="20"></td>

  </tr>

  <tr>

   <th align="right">Basiseinheit</th>

   <td>

    <select name="new_base_unit">

     <TMPL_LOOP NEW_BASE_UNIT_DDBOX><option <TMPL_VAR selected>><TMPL_VAR name></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

  <tr>

   <th align="right">Faktor</th>

   <td><input name="new_factor"></td>

  </tr>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'add_unit'; document.Form.submit();" name="dummy" value="Einheit hinzuf&uuml;gen">

 <hr>

 <div class="subsubheading">Neue Einheiten zuweisen</div>

 <p>

  Die folgenden Einheiten sind unbekannt.

  Sie müssen für jeden Artikel die neue Einheit auswählen.

 </p>

 <table>

  <tr>

   <th class="listheading">Aktuelle Einheit</th>

   <th class="listheading">Neue Einheit</th>

  </tr>

  <TMPL_LOOP UNKNOWN_PART_UNITS>

   <tr class="listrow<TMPL_VAR __counter__>">

    <td>

     <TMPL_VAR name ESCAPE=HTML>

     <input type="hidden" name="old_unit_<TMPL_VAR __counter__>" value="<TMPL_VAR name ESCAPE=HTML>">

    </td>

    <td>

     <select name="new_unit_<TMPL_VAR __counter__>">

      <TMPL_LOOP NEW_UNITS><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

     </select>

    </td>

    <TMPL_IF __last__><input type="hidden" name="rowcount" value="<TMPL_VAR __counter__>"></TMPL_IF>

  </TMPL_LOOP>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'assign_units'; document.Form.submit();" name="dummy" value="Einheiten zuweisen">

</form>

<div class="listtop">Schritt 1 von 3: Waren</div>

<p>Es wurden keine unbekannten Einheiten gefunden.</p>

<div class="listtop"><translate>Step 1 of 3: Parts</translate></div>

<p><translate>No unknown units where found.</translate></p>

<div class="listtop"><translate>Step 1 of 3: Parts</translate></div>

<form name="Form" method="post" action="login.pl">

 <input type="hidden" name="path" value="<TMPL_VAR path ESCAPE=HTML>">

 <input type="hidden" name="login" value="<TMPL_VAR login ESCAPE=HTML>">

 <input type="hidden" name="hashed_password" value="<TMPL_VAR password ESCAPE=HTML>">

 <input type="hidden" name="unit_type" value="dimension">

 <input type="hidden" name="action" value="login">

 <input type="hidden" name="action2" value="">

 <TMPL_IF saved_message>

  <p><TMPL_VAR saved_message></p>

 </TMPL_IF>

 <div class="subsubheading"><translate>Add unit</translate></div>

 <p>

  <translate>For each unit there's either no or exactly one base

   unit. If you chose a base unit then you also have to chose a

   factor. That way the new unit will be defined as a multiple of the

   base unit. The base unit must be the "smaller" one. A

   factor may not be less than 1. Therefore you may define

   "kg" with the base unit "g" and a factor of

   &quot;1&quot;, but not the other way round.</translate>

 </p>

 <p>

  <translate>The following units exist already:</translate>

  <TMPL_LOOP NEW_BASE_UNIT_DDBOX><TMPL_IF name><TMPL_VAR name ESCAPE=HTML><TMPL_UNLESS __last__>; </TMPL_UNLESS></TMPL_IF></TMPL_LOOP>

 </p>

 <hr>

 <table>

  <tr>

   <th align="right"><translate>Unit</translate></th>

   <td><input name="new_name" size="20" maxlength="20"></td>

  </tr>

  <tr>

   <th align="right"><translate>Base unit</translate></th>

   <td>

    <select name="new_base_unit">

     <TMPL_LOOP NEW_BASE_UNIT_DDBOX><option <TMPL_VAR selected>><TMPL_VAR name></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

  <tr>

   <th align="right"><translate>Factor</translate></th>

   <td><input name="new_factor"></td>

  </tr>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'add_unit'; document.Form.submit();" name="dummy" value="<translate>Add unit</translate>">

 <hr>

 <div class="subsubheading"><translate>Assign new units</translate></div>

 <p>

  <translate>The following units are unknown.</translate>

  <translate>You have to chose which unit to save for each of them.</translate>

 </p>

 <table>

  <tr>

   <th class="listheading"><translate>Current unit</translate></th>

   <th class="listheading"><translate>New unit</translate></th>

  </tr>

  <TMPL_LOOP UNKNOWN_PART_UNITS>

   <tr class="listrow<TMPL_VAR __counter__>">

    <td>

     <TMPL_VAR name ESCAPE=HTML>

     <input type="hidden" name="old_unit_<TMPL_VAR __counter__>" value="<TMPL_VAR name ESCAPE=HTML>">

    </td>

    <td>

     <select name="new_unit_<TMPL_VAR __counter__>">

      <TMPL_LOOP NEW_UNITS><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

     </select>

    </td>

    <TMPL_IF __last__><input type="hidden" name="rowcount" value="<TMPL_VAR __counter__>"></TMPL_IF>

  </TMPL_LOOP>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'assign_units'; document.Form.submit();" name="dummy" value="<translate>Assign units</translate>">

</form>

<div class="listtop">Schritt 2 von 3: Dienstleistungen</div>

<form name="Form" method="post" action="login.pl">

 <input type="hidden" name="path" value="<TMPL_VAR path ESCAPE=HTML>">

 <input type="hidden" name="login" value="<TMPL_VAR login ESCAPE=HTML>">

 <input type="hidden" name="hashed_password" value="<TMPL_VAR password ESCAPE=HTML>">

 <input type="hidden" name="unit_type" value="service">

 <input type="hidden" name="action" value="login">

 <input type="hidden" name="action2" value="">

 <TMPL_IF saved_message>

  <p><TMPL_VAR saved_message></p>

 </TMPL_IF>

 <div class="subsubheading">Einheit hinzuf&uuml;gen</div>

 <p>

  Einheiten haben entweder keine oder genau eine Basiseinheit, von der sie ein Vielfaches sind. Wenn Sie eine Basiseinheit auswählen, dann müssen Sie auch einen Faktor eingeben. Sie müssen Einheiten als ein Vielfaches einer kleineren Einheit eingeben. So ist die Definition von "kg" mit der Basiseinheit "g" und dem Faktor 1000 zulässig, die Definition von "g" mit der Basiseinheit "kg" und dem Faktor "0,001" hingegen nicht.

 </p>

 <p>

  Die folgenden Einheiten existieren bereits:

  <TMPL_LOOP NEW_BASE_UNIT_DDBOX><TMPL_IF name><TMPL_VAR name ESCAPE=HTML><TMPL_UNLESS __last__>; </TMPL_UNLESS></TMPL_IF></TMPL_LOOP>

 </p>

 <hr>

 <table>

  <tr>

   <th align="right">Einheit</th>

   <td><input name="new_name" size="20" maxlength="20"></td>

  </tr>

  <tr>

   <th align="right">Basiseinheit</th>

   <td>

    <select name="new_base_unit">

     <TMPL_LOOP NEW_BASE_UNIT_DDBOX><option <TMPL_VAR selected>><TMPL_VAR name></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

  <tr>

   <th align="right">Faktor</th>

   <td><input name="new_factor"></td>

  </tr>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'add_unit'; document.Form.submit();" name="dummy" value="Einheit hinzuf&uuml;gen">

 <hr>

 <div class="subsubheading">Neue Einheiten zuweisen</div>

 <p>

  Die folgenden Einheiten sind unbekannt.

  Sie müssen für jeden Artikel die neue Einheit auswählen.

 </p>

 <table>

  <tr>

   <th class="listheading">Aktuelle Einheit</th>

   <th class="listheading">Neue Einheit</th>

  </tr>

  <TMPL_LOOP UNKNOWN_PART_UNITS>

   <tr class="listrow<TMPL_VAR __counter__>">

    <td>

     <TMPL_VAR name ESCAPE=HTML>

     <input type="hidden" name="old_unit_<TMPL_VAR __counter__>" value="<TMPL_VAR name ESCAPE=HTML>">

    </td>

    <td>

     <select name="new_unit_<TMPL_VAR __counter__>">

      <TMPL_LOOP NEW_UNITS><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

     </select>

    </td>

    <TMPL_IF __last__><input type="hidden" name="rowcount" value="<TMPL_VAR __counter__>"></TMPL_IF>

  </TMPL_LOOP>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'assign_units'; document.Form.submit();" name="dummy" value="Einheiten zuweisen">

</form>

<div class="listtop">Schritt 2 von 3: Dienstleistungen</div>

<p>Es wurden keine unbekannten Einheiten gefunden.</p>

<div class="listtop"><translate>Step 2 of 3: Services</translate></div>

<p><translate>No unknown units where found.</translate></p>

<div class="listtop"><translate>Step 2 of 3: Services</translate></div>

<form name="Form" method="post" action="login.pl">

 <input type="hidden" name="path" value="<TMPL_VAR path ESCAPE=HTML>">

 <input type="hidden" name="login" value="<TMPL_VAR login ESCAPE=HTML>">

 <input type="hidden" name="hashed_password" value="<TMPL_VAR password ESCAPE=HTML>">

 <input type="hidden" name="unit_type" value="service">

 <input type="hidden" name="action" value="login">

 <input type="hidden" name="action2" value="">

 <TMPL_IF saved_message>

  <p><TMPL_VAR saved_message></p>

 </TMPL_IF>

 <div class="subsubheading"><translate>Add unit</translate></div>

 <p>

  <translate>For each unit there's either no or exactly one base

   unit. If you chose a base unit then you also have to chose a

   factor. That way the new unit will be defined as a multiple of the

   base unit. The base unit must be the "smaller" one. A

   factor may not be less than 1. Therefore you may define

   "kg" with the base unit "g" and a factor of

   &quot;1&quot;, but not the other way round.</translate>

 </p>

 <p>

  <translate>The following units exist already:</translate>

  <TMPL_LOOP NEW_BASE_UNIT_DDBOX><TMPL_IF name><TMPL_VAR name ESCAPE=HTML><TMPL_UNLESS __last__>; </TMPL_UNLESS></TMPL_IF></TMPL_LOOP>

 </p>

 <hr>

 <table>

  <tr>

   <th align="right"><translate>Unit</translate></th>

   <td><input name="new_name" size="20" maxlength="20"></td>

  </tr>

  <tr>

   <th align="right"><translate>Base unit</translate></th>

   <td>

    <select name="new_base_unit">

     <TMPL_LOOP NEW_BASE_UNIT_DDBOX><option <TMPL_VAR selected>><TMPL_VAR name></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

  <tr>

   <th align="right"><translate>Factor</translate></th>

   <td><input name="new_factor"></td>

  </tr>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'add_unit'; document.Form.submit();" name="dummy" value="<translate>Add unit</translate>">

 <hr>

 <div class="subsubheading"><translate>Assign new units</translate></div>

 <p>

  <translate>The following units are unknown.</translate>

  <translate>You have to chose which unit to save for each of them.</translate>

 </p>

 <table>

  <tr>

   <th class="listheading"><translate>Current unit</translate></th>

   <th class="listheading"><translate>New unit</translate></th>

  </tr>

  <TMPL_LOOP UNKNOWN_PART_UNITS>

   <tr class="listrow<TMPL_VAR __counter__>">

    <td>

     <TMPL_VAR name ESCAPE=HTML>

     <input type="hidden" name="old_unit_<TMPL_VAR __counter__>" value="<TMPL_VAR name ESCAPE=HTML>">

    </td>

    <td>

     <select name="new_unit_<TMPL_VAR __counter__>">

      <TMPL_LOOP NEW_UNITS><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

     </select>

    </td>

    <TMPL_IF __last__><input type="hidden" name="rowcount" value="<TMPL_VAR __counter__>"></TMPL_IF>

  </TMPL_LOOP>

 </table>

 <input type="submit" onclick="document.Form.action2.value = 'assign_units'; document.Form.submit();" name="dummy" value="<translate>Assign units</translate>">

</form>

<div class="listtop">Schritt 3 von 3: Standardeinheiten</div>

<form name="Form" method="post" action="login.pl">

 <input type="hidden" name="path" value="<TMPL_VAR path ESCAPE=HTML>">

 <input type="hidden" name="login" value="<TMPL_VAR login ESCAPE=HTML>">

 <input type="hidden" name="hashed_password" value="<TMPL_VAR password ESCAPE=HTML>">

 <input type="hidden" name="unit_type" value="dimension">

 <input type="hidden" name="action" value="login">

 <input type="hidden" name="action2" value="">

 <p>

  Es gibt noch Einträge in der Datenbank, für die keine Einheit zugeordnet ist.

  Sie müssen eine Maß- und eine Dienstleistungseinheit auswählen, die diesen Waren und Dienstleistungen, denen noch keine Einheit zugeordnet ist, zugeordnet wird.

 </p>

 <table>

  <tr>

   <td>Ma&szlig;einheit:</td>

   <td>

    <select name="default_dimension_unit">

     <TMPL_LOOP DIMENSION_DDBOX><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

  <tr>

   <td>Dienstleistungseinheit:</td>

   <td>

    <select name="default_service_unit">

     <TMPL_LOOP SERVICE_DDBOX><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

 </table>

 <p><input type="submit" onclick="document.Form.action2.value = 'set_default'; document.Form.submit();" name="dummy" value="Einheiten zuweisen"></p>

</form>

<div class="listtop">Schritt 3 von 3: Standardeinheiten</div>

<p>Es wurden keine Eintr&auml;ge gefunden, denen keine Einheit zugeordnet war.</p>

<p>Das Datenbankupgrade zwecks Einf&uuml;hrung von Einheiten ist nun beendet.</p>

<hr>

<div class="listtop"><translate>Step 3 of 3: Default units</translate></div>

<p><translate>No entries were found which had no unit assigned to them.</translate></p>

<p><translate>The database upgrade for the introduction of units is now complete.</translate></p>

<hr>

<div class="listtop"><translate>Step 3 of 3: Default units</translate></div>

<form name="Form" method="post" action="login.pl">

 <input type="hidden" name="path" value="<TMPL_VAR path ESCAPE=HTML>">

 <input type="hidden" name="login" value="<TMPL_VAR login ESCAPE=HTML>">

 <input type="hidden" name="hashed_password" value="<TMPL_VAR password ESCAPE=HTML>">

 <input type="hidden" name="unit_type" value="dimension">

 <input type="hidden" name="action" value="login">

 <input type="hidden" name="action2" value="">

 <p>

  <translate>There are still entries in the database for which no unit

   has been assigned.</translate>

  <translate>You have to chose a dimension unit and a service unit

   which will then be assigned to those entries.</translate>

 </p>

 <table>

  <tr>

   <td><translate>Dimension unit</translate>:</td>

   <td>

    <select name="default_dimension_unit">

     <TMPL_LOOP DIMENSION_DDBOX><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

  <tr>

   <td><translate>Service unit</translate>:</td>

   <td>

    <select name="default_service_unit">

     <TMPL_LOOP SERVICE_DDBOX><option><TMPL_VAR name ESCAPE=HTML></option></TMPL_LOOP>

    </select>

   </td>

  </tr>

 </table>

 <p><input type="submit" onclick="document.Form.action2.value = 'set_default'; document.Form.submit();" name="dummy" value="<translate>Assign units</translate>"></p>

</form>