projekt kivitendo

use warnings;

#use strict;

#

#	Testfall:

#

sub transfer_assembly {

  $main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  Common::check_params(\%params, qw(assembly_id dst_warehouse_id login qty unit dst_bin_id chargenumber comment));

#  my $maxcreate=WH->check_assembly_max_create(assembly_id =>$params{'assembly_id'}, dbh => $my_dbh);

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh($myconfig);

# Ablauferklärung

#

# ... Standard-Check oben Ende. Hier die eigentliche SQL-Abfrage

# select parts_id,qty from assembly where id=1064;

# 

  my $query    = qq|select parts_id,qty from assembly where id = ?|;

  my $sth_part_qty_assembly      = prepare_execute_query($form, $dbh, $query, $params{assembly_id});

# Hier wird das prepared Statement für die Schleife über alle Lagerplätze vorbereitet

  my $transferPartSQL = qq|INSERT INTO inventory (parts_id, warehouse_id, bin_id, chargenumber, comment, employee_id, qty, trans_id, trans_type_id)

			    VALUES (?, ?, ?, ?, ?,(SELECT id FROM employee WHERE login = ?), ?, nextval('id'), 

				    (SELECT id FROM transfer_type WHERE direction = 'out' AND description = 'used'))|;

  my $sthTransferPartSQL   = prepare_query($form, $dbh, $transferPartSQL);

  my $kannNichtFertigen ="";	# der return-string für die fehlermeldung inkl. welche waren zum fertigen noch fehlen

  while (my $hash_ref = $sth_part_qty_assembly->fetchrow_hashref()) {	# Schleife für $query=select parts_id,qty from assembly 

    my $partsQTY = $hash_ref->{qty} * $params{qty}; # benötigte teile * anzahl erzeugnisse

    my $currentPart_ID = $hash_ref->{parts_id};

    # Überprüfen, ob diese Anzahl gefertigt werden kann

    my $max_parts = get_max_qty_parts($self, parts_id => $currentPart_ID, warehouse_id => $params{dst_warehouse_id}); #$self angeben, damit die Standardkonvention (Name, Parameter) eingehalten wird

    if ($partsQTY  > $max_parts){

      # Gibt es hier ein Problem mit nicht "escapten" Zeichen?

	$kannNichtFertigen .= "Zum Fertigen fehlen:" . abs($partsQTY) . " Stueck der Ware:" . get_part_description($self, parts_id => $currentPart_ID) . ", um das Erzeugnis herzustellen. <br>";	# Konnte die Menge nicht mit der aktuellen Anzahl der Waren fertigen

    }

# Eine kurze Vorabfrage, um den Lagerplatz und die Chargennummber zu bestimmen

# Offen: Die Summe über alle Lagerplätze wird noch nicht gebildet

# Gelöst: Wir haben vorher schon die Abfrage durchgeführt, ob wir fertigen können.

# Noch besser gelöst: Wir laufen durch alle benötigten Waren zum Fertigen und geben eine Rückmeldung an den Benutzer was noch fehlt

# und lösen den Rest dann so wie bei xplace im Barcode-Programm

# S.a. Kommentar im bin/mozilla-Code mb übernimmt und macht das in ordentlich

    my $tempquery =	qq|SELECT SUM(qty), bin_id, chargenumber   FROM inventory  WHERE warehouse_id = ? AND parts_id = ?  GROUP BY bin_id, chargenumber having SUM(qty)>0|;

    my $tempsth	  =	prepare_execute_query($form, $dbh, $tempquery, $params{dst_warehouse_id}, $currentPart_ID);

    # Alle Werte zu dem einzelnen Artikel, die wir später auslagern

    my $tmpPartsQTY = $partsQTY;

    while (my $temphash_ref = $tempsth->fetchrow_hashref()) {

      my $temppart_bin_id	= $temphash_ref->{bin_id}; # kann man hier den quelllagerplatz beim verbauen angeben?

      my $temppart_chargenumber	= $temphash_ref->{chargenumber};

      my $temppart_qty	= $temphash_ref->{sum};

      if ($tmpPartsQTY > $temppart_qty) {	# wir haben noch mehr waren zum wegbuchen. Wir buchen den kompletten Lagerplatzbestand und zählen die Hilfsvariable runter

	$tmpPartsQTY = $tmpPartsQTY - $temppart_qty;

	$temppart_qty = $temppart_qty * -1;	# beim analyiseren des sql-trace, war dieser wert positiv, wenn * -1 als berechnung in der parameter-übergabe angegeben wird. Dieser Wert IST und BLEIBT positiv!! Hilfe. Liegt das daran, dass dieser Wert aus einem SQL-Statement stammt?

	do_statement($form, $sthTransferPartSQL, $transferPartSQL, $currentPart_ID, $params{dst_warehouse_id}, $temppart_bin_id, $temppart_chargenumber, 'Verbraucht für ' . get_part_description($self, parts_id => $params{assembly_id}), $params{login}, $temppart_qty);

	# hier ist noch ein fehler am besten mit definierten erzeugnissen debuggen 02/2009 jb

	# idee: ausbuch algorithmus mit rekursion lösen und an- und abschaltbar machen

	# das problem könnte sein, dass strict nicht an war und sth global eine andere zuweisung bekam

	# auf jeden fall war der internal-server-error nach aktivierung von strict und warnings plus ein paar my-definitionen weg

      }	else {	# okay, wir haben weniger oder gleich Waren die wir wegbuchen müssen, wir können also aufhören

	$tmpPartsQTY *=-1;

        do_statement($form, $sthTransferPartSQL, $transferPartSQL, $currentPart_ID, $params{dst_warehouse_id}, $temppart_bin_id, $temppart_chargenumber, 'Verbraucht für ' . get_part_description($self, parts_id => $params{assembly_id}), $params{login}, $tmpPartsQTY);

        last;	# beendet die schleife (springt zum letzten element)

      }

    }	# ende while SELECT SUM(qty), bin_id, chargenumber   FROM inventory  WHERE warehouse_id

  } #ende while select parts_id,qty from assembly where id = ?

  if ($kannNichtFertigen) {

    return $kannNichtFertigen;

  }

  # soweit alles gut. Jetzt noch die wirkliche Lagerbewegung für das Erzeugnis ausführen ... 

  my $transferAssemblySQL = qq|INSERT INTO inventory (parts_id, warehouse_id, bin_id, chargenumber, comment, employee_id, qty, trans_id, trans_type_id)

			    VALUES (?, ?, ?, ?, ?, (SELECT id FROM employee WHERE login = ?), ?, nextval('id'), 

				    (SELECT id FROM transfer_type WHERE direction = 'in' AND description = 'stock'))|;

  my $sthTransferAssemblySQL   = prepare_query($form, $dbh, $transferAssemblySQL);

  do_statement($form, $sthTransferAssemblySQL, $transferAssemblySQL, $params{assembly_id}, $params{dst_warehouse_id}, $params{dst_bin_id}, $params{chargenumber}, $params{comment}, $params{login}, $params{qty});

  $dbh->commit();

  $main::lxdebug->leave_sub();

  return 1;	# Alles erfolgreich

}

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

#

# Eingabe: 	Teilenummer, Lagernummer (warehouse)

# Ausgabe:	Die maximale Anzahl der Teile in diesem Lager

#

sub get_max_qty_parts {

$main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  Common::check_params(\%params, qw(parts_id warehouse_id)); #die brauchen wir 

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh();

  my $query = qq| SELECT SUM(qty), bin_id, chargenumber  FROM inventory where parts_id = ? AND warehouse_id = ? GROUP BY bin_id, chargenumber|;

  my $sth_QTY      = prepare_execute_query($form, $dbh, $query, ,$params{parts_id}, $params{warehouse_id}); #info: aufruf an DBUtils.pm

  my $max_qty_parts = 0; #Initialisierung mit 0

  while (my $ref = $sth_QTY->fetchrow_hashref()) {	# wir laufen über alle chargen und Lagerorte (s.a. SQL-Query oben)

    $max_qty_parts += $ref->{sum};	

  }

  $main::lxdebug->leave_sub();

  return $max_qty_parts;

}

#

# Eingabe: 	Teilenummer, Lagernummer (warehouse)

# Ausgabe:	Die Beschreibung der Ware bzw. Erzeugnis

#

sub get_part_description {

$main::lxdebug->enter_sub();

  my $self     = shift;

  my %params   = @_;

  Common::check_params(\%params, qw(parts_id )); #die brauchen wir 

  my $myconfig = \%main::myconfig;

  my $form     = $main::form;

  my $dbh      = $params{dbh} || $form->get_standard_dbh();

  my $query = qq| SELECT partnumber, description FROM parts where id = ? |;

  my $sth      = prepare_execute_query($form, $dbh, $query, ,$params{parts_id}); #info: aufruf zu DBUtils.pm

  my $ref = $sth->fetchrow_hashref(); 

  my $part_description = $ref->{partnumber} . " " . $ref->{description};	

  $main::lxdebug->leave_sub();

  return $part_description;

}

      $column_data{stock_in_out} =  $form->{"inventory_accno_$i"} ? calculate_stock_in_out($i) : ' ';

  } elsif ($form->{trans_type} eq 'assembly') {

    $form->{title} = $locale->text('Assembly');

    $content       = $form->parse_html_template('wh/warehouse_selection_assembly');

# --------------------------------------------------------------------

# Transfer: assemblies

# Dies ist die Auswahlmaske für ein assembly. 

# Die ist einfach von transfer_assembly_update_part kopiert und nur um den trans_type (assembly) korrigiert worden

# Es wäre schön, hier nochmal check_assembly_max_create auf, um die max. Fertigungszahl herauszufinden.

# Ich lass das mal als auskommentierte Idee bestehen jb 18.3.09

# --------------------------------------------------------------------

sub transfer_assembly_update_part {

  $lxdebug->enter_sub();

  $form->{trans_type} = 'assembly';

  $form->{qty}        = $form->parse_amount(\%myconfig, $form->{qty});

  if (!$form->{partnumber} && !$form->{description}) {

    delete @{$form}{qw(parts_id partunit)};

    transfer_warehouse_selection();

  } elsif (($form->{partnumber} && ($form->{partnumber} ne $form->{old_partnumber})) || $form->{description}) {

    $form->{assemblies} = 1;

    $form->{no_assemblies} = 0;

    my $parts = Common->retrieve_parts(\%myconfig, $form, 'description', 1);

    if (scalar @{ $parts } == 1) {

      @{$form}{qw(parts_id partnumber description)} = @{$parts->[0]}{qw(id partnumber description)};

      transfer_stock_get_partunit();

      transfer_warehouse_selection();

    } else {

      select_part('transfer_stock_part_selected', @{ $parts });

    }

  } else {

    transfer_stock_get_partunit();

    transfer_warehouse_selection();

  }

# hier die oben benannte idee

#    my $maxcreate = Common->check_assembly_max_create(assembly_id => $form->{parts_id}, dbh => $my_dbh); 

  $lxdebug->leave_sub();

}

# vorüberlegung jb 22.2.2009

# wir benötigen für diese funktion, die anzahl die vom erzeugnis hergestellt werden soll. vielleicht direkt per js fehleingaben verhindern?

# ferner dann nochmal mit check_asssembly_max_create gegenprüfen und dann transaktionssicher wegbuchen.

# wir brauchen eine hilfsfunktion, die nee. brauchen wir nicht. der algorithmus läuft genau wie bei check max_create, nur dass hier auch eine lagerbewegung (verbraucht) stattfindet

# Manko ist derzeit noch, dass unterschiedliche Lagerplätze, bzw. das Quelllager an sich nicht ausgewählt werden können.

# Laut Absprache in KW11 09 übernimmt mb hier den rest im April ... jb 18.3.09

sub create_assembly {

#  my $maxcreate=shift;	# oben begonnene auskommentierte idee, hier als motiv weiterverfolgen (umkehrungen und sequenzierungen als stilmittel nicht vergessen)

  $lxdebug->enter_sub();

  $form->{qty} = $form->parse_amount(\%myconfig, $form->{qty});

#  my $maxcreate = WH->check_assembly_max_create(assembly_id	=>	$form->{parts_id});

  if ($form->{qty} <= 0) {

    $form->show_generic_error($locale->text('Invalid quantity.'), 'back_button' => 1);

  } #else { if ($form->{qty} > $maxcreate) {	#s.o.

#	    $form->show_generic_error($locale->text('Can not create that quantity with current stock'), 'back_button' => 1);

#	    $form->show_generic_error('Maximale Stückzahl' . $maxcreate , 'back_button' => 1);

#	  } 

#  }

  if (!$form->{warehouse_id} || !$form->{bin_id}) {

    $form->error($locale->text('The warehouse or the bin is missing.'));

  }

# WIESO war das nicht vorher schon ein %HASH?? ein hash ist ein hash! das hat mich mehr als eine Stunde gekostet herauszufinden. grr. jb 3.3.2009

# Anm. jb 18.3. vielleicht auch nur meine unwissenheit in perl-datenstrukturen

  my %TRANSFER = (

    'transfer_type'    => 'assembly',

    'login'	=> $form->{login},

    'dst_warehouse_id' => $form->{warehouse_id},

    'dst_bin_id'       => $form->{bin_id},

    'chargenumber'     => $form->{chargenumber},

    'assembly_id'         => $form->{parts_id},

    'qty'              => $form->{qty},

    'unit'             => $form->{unit},

    'comment'          => $form->{comment},

  );

  my $ret = WH->transfer_assembly (%TRANSFER);

# Frage: Ich pack in den return-wert auch gleich die Fehlermeldung. Irgendwelche Nummern als Fehlerkonstanten definieren find ich auch nicht besonders schick...

# Ideen? jb 18.3.09

  if ($ret ne "1"){

    $form->show_generic_error($locale->text($ret), 'back_button' => 1);

  }

  delete @{$form}{qw(parts_id partnumber description qty unit chargenumber comment)};

  $form->{saved_message} = $locale->text('The assembly has been created.');

  $form->{trans_type}    = 'assembly';

  transfer_warehouse_selection();

  $lxdebug->leave_sub();

}

  'Assembly'                    => 'Erzeugnis',

  'Assembly Description'        => 'Erzeugnis-Beschreibung',

  'Assembly Number'             => 'Erzeugnis-Nummer',

  'Can not create that quantity with current stock' => 'Ich kann diese Anzahl mit dem gegenwärtigen Lagerbestand nicht herstellen.',

  'Create Assembly'             => 'Erzeugnis fertigen',

  'The assembly has been created.' => 'Das Erzeugnis wurde hergestellt.',

[% USE HTML %][% USE JavaScript %][% USE LxERP %]<body onload="on_load(); [% onload %]">

 <script type="text/javascript" src="js/common.js"></script>

 <script type="text/javascript" src="js/part_selection.js"></script>

 <script type="text/javascript">

  <!--

      warehouses = new Array();

      [%- USE WAREHOUSES_it = Iterator(WAREHOUSES) %][%- FOREACH warehouse = WAREHOUSES_it %]

      warehouses[[% WAREHOUSES_it.count - 1 %]] = new Array();

      warehouses[[% WAREHOUSES_it.count - 1 %]]['id'] = [% warehouse.id %];

      warehouses[[% WAREHOUSES_it.count - 1 %]]['bins'] = new Array();

      [% USE BINS_it = Iterator(warehouse.BINS) %][% FOREACH bin = BINS_it %]

      warehouses[[% WAREHOUSES_it.count - 1%]]['bins'][[% BINS_it.count - 1 %]] = new Array();

      warehouses[[% WAREHOUSES_it.count - 1%]]['bins'][[% BINS_it.count - 1 %]]['description'] = "[% JavaScript.escape(bin.description) %]";

      warehouses[[% WAREHOUSES_it.count - 1%]]['bins'][[% BINS_it.count - 1 %]]['id'] = [% bin.id %];

      [% END %]

      [% END %]

      function warehouse_selected(warehouse_id, bin_id) {

        var control = document.getElementById("bin_id");

        for (var i = control.options.length - 1; i >= 0; i--) {

          control.options[i] = null;

        }

        var warehouse_index = 0;

        for (i = 0; i < warehouses.length; i++)

          if (warehouses[i]['id'] == warehouse_id) {

            warehouse_index = i;

            break;

          }

        var warehouse = warehouses[warehouse_index];

        var bin_index = 0;

        for (i = 0; i < warehouse['bins'].length; i++)

          if (warehouse['bins'][i]['id'] == bin_id) {

            bin_index = i;

            break;

          }

        for (i = 0; i < warehouse['bins'].length; i++) {

          control.options[i] = new Option(warehouse['bins'][i]['description'], warehouse['bins'][i]['id']);

        }

        control.options[bin_index].selected = true;

      }

      function on_load() {

        warehouse_selected([% warehouse_id %], [% bin_id %]);

      }

    -->

 </script>

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

  <input type="hidden" name="nextsub" value="transfer_assembly">

  <input type="hidden" name="update_nextsub" value="transfer_assembly_update_part">

  [% IF saved_message %]

  <p>[% saved_message %]</p>

  [% END %]

  <div class="listtop">[% title %]</div>

  <p>

   <table>

    <tr>

     <th align="right" nowrap>Ziellager</th>

     <td>

      <select name="warehouse_id" onchange="warehouse_selected(warehouses[this.selectedIndex]['id'], 0)">

       [%- FOREACH warehouse = WAREHOUSES %]

       <option value="[% HTML.escape(warehouse.id) %]"[% IF warehouse_id == warehouse.id %] selected[% END %]>[% warehouse.description %]</option>

       [%- END %]

      </select>

     </td>

    </tr>

    <tr>

     <th align="right" nowrap>Ziellagerplatz:</th>

     <td><select id="bin_id" name="bin_id"></select></td>

    </tr>

    <tr>

     <th align="right" nowrap>Erzeugnis-Nummer</th>

     <td>

      <input type="hidden" name="parts_id" id="parts_id" value="[% HTML.escape(parts_id) %]">

      <input type="hidden" name="old_partnumber" id="old_partnumber" value="[% HTML.escape(partnumber) %]">

      <input name="partnumber" size="30" value="[% HTML.escape(partnumber) %]">

     </td>

    </tr>

    <tr>

     <th align="right" nowrap>Erzeugnis-Beschreibung</th>

     <td>

      <input name="description" size="30" value="[% HTML.escape(description) %]">

      <input type="button" onclick="part_selection_window('partnumber', 'description', 'parts_id', 0, 'Form', 'assemblies:click_button=update_button')" value="?">

     </td>

    </tr>

    <tr>

     <th align="right" nowrap>Chargennummer</th>

     <td><input name="chargenumber" size="30" value="[% HTML.escape(chargenumber) %]"></td>

    </tr>

    <tr>

     <th align="right" nowrap>Menge</th>

     <td>

      <input name="qty" size="10" value="[% HTML.escape(LxERP.format_amount(qty)) %]">

      <select name="unit">

       [%- FOREACH unit = UNITS %]<option[% IF unit.selected %] selected[% END %]>[% HTML.escape(unit.name) %]</option>[% END %]

      </select>

     </td>

    </tr>

    <tr>

     <th align="right" nowrap>Optionaler Kommentar</th>

     <td><input name="comment" size="30" value="[% HTML.escape(comment) %]"></td>

    </tr>

   </table>

  </p>

  <p>

   <input type="submit" class="submit" name="action" id="update_button" value="Erneuern">

   [%- IF parts_id %]

   <input type="submit" class="submit" name="action" value="Erzeugnis fertigen">

   [%- END %]

  </p>

 </form>

</body>

</html>

[% USE HTML %][% USE JavaScript %][% USE LxERP %]<body onload="on_load(); [% onload %]">

 <script type="text/javascript" src="js/common.js"></script>

 <script type="text/javascript" src="js/part_selection.js"></script>

 <script type="text/javascript">

  <!--

      warehouses = new Array();

      [%- USE WAREHOUSES_it = Iterator(WAREHOUSES) %][%- FOREACH warehouse = WAREHOUSES_it %]

      warehouses[[% WAREHOUSES_it.count - 1 %]] = new Array();

      warehouses[[% WAREHOUSES_it.count - 1 %]]['id'] = [% warehouse.id %];

      warehouses[[% WAREHOUSES_it.count - 1 %]]['bins'] = new Array();

      [% USE BINS_it = Iterator(warehouse.BINS) %][% FOREACH bin = BINS_it %]

      warehouses[[% WAREHOUSES_it.count - 1%]]['bins'][[% BINS_it.count - 1 %]] = new Array();

      warehouses[[% WAREHOUSES_it.count - 1%]]['bins'][[% BINS_it.count - 1 %]]['description'] = "[% JavaScript.escape(bin.description) %]";

      warehouses[[% WAREHOUSES_it.count - 1%]]['bins'][[% BINS_it.count - 1 %]]['id'] = [% bin.id %];

      [% END %]

      [% END %]

      function warehouse_selected(warehouse_id, bin_id) {

        var control = document.getElementById("bin_id");

        for (var i = control.options.length - 1; i >= 0; i--) {

          control.options[i] = null;

        }

        var warehouse_index = 0;

        for (i = 0; i < warehouses.length; i++)

          if (warehouses[i]['id'] == warehouse_id) {

            warehouse_index = i;

            break;

          }

        var warehouse = warehouses[warehouse_index];

        var bin_index = 0;

        for (i = 0; i < warehouse['bins'].length; i++)

          if (warehouse['bins'][i]['id'] == bin_id) {

            bin_index = i;

            break;

          }

        for (i = 0; i < warehouse['bins'].length; i++) {

          control.options[i] = new Option(warehouse['bins'][i]['description'], warehouse['bins'][i]['id']);

        }

        control.options[bin_index].selected = true;

      }

      function on_load() {

        warehouse_selected([% warehouse_id %], [% bin_id %]);

      }

    -->

 </script>

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

  <input type="hidden" name="nextsub" value="transfer_assembly">

  <input type="hidden" name="update_nextsub" value="transfer_assembly_update_part">

  [% IF saved_message %]

  <p>[% saved_message %]</p>

  [% END %]

  <div class="listtop">[% title %]</div>

  <p>

   <table>

    <tr>

     <th align="right" nowrap><translate>Destination warehouse</translate></th>

     <td>

      <select name="warehouse_id" onchange="warehouse_selected(warehouses[this.selectedIndex]['id'], 0)">

       [%- FOREACH warehouse = WAREHOUSES %]

       <option value="[% HTML.escape(warehouse.id) %]"[% IF warehouse_id == warehouse.id %] selected[% END %]>[% warehouse.description %]</option>

       [%- END %]

      </select>

     </td>

    </tr>

    <tr>

     <th align="right" nowrap><translate>Destination bin</translate>:</th>

     <td><select id="bin_id" name="bin_id"></select></td>

    </tr>

    <tr>

     <th align="right" nowrap><translate>Assembly Number</translate></th>

     <td>

      <input type="hidden" name="parts_id" id="parts_id" value="[% HTML.escape(parts_id) %]">

      <input type="hidden" name="old_partnumber" id="old_partnumber" value="[% HTML.escape(partnumber) %]">

      <input name="partnumber" size="30" value="[% HTML.escape(partnumber) %]">

     </td>

    </tr>

    <tr>

     <th align="right" nowrap><translate>Assembly Description</translate></th>

     <td>

      <input name="description" size="30" value="[% HTML.escape(description) %]">

      <input type="button" onclick="part_selection_window('partnumber', 'description', 'parts_id', 0, 'Form', 'assemblies:click_button=update_button')" value="?">

     </td>

    </tr>

    <tr>

     <th align="right" nowrap><translate>Charge number</translate></th>

     <td><input name="chargenumber" size="30" value="[% HTML.escape(chargenumber) %]"></td>

    </tr>

    <tr>

     <th align="right" nowrap><translate>Quantity</translate></th>

     <td>

      <input name="qty" size="10" value="[% HTML.escape(LxERP.format_amount(qty)) %]">

      <select name="unit">

       [%- FOREACH unit = UNITS %]<option[% IF unit.selected %] selected[% END %]>[% HTML.escape(unit.name) %]</option>[% END %]

      </select>

     </td>

    </tr>

    <tr>

     <th align="right" nowrap><translate>Optional comment</translate></th>

     <td><input name="comment" size="30" value="[% HTML.escape(comment) %]"></td>

    </tr>

   </table>

  </p>

  <p>

   <input type="submit" class="submit" name="action" id="update_button" value="<translate>Update</translate>">

   [%- IF parts_id %]

   <input type="submit" class="submit" name="action" value="<translate>Create Assembly</translate>">

   [%- END %]

  </p>

 </form>

</body>

</html>