$auth->assert('part_service_assembly_edit');
- if ($form->{item} eq "assembly") {
-
- print qq|
- <tr>
- <td>
- <table width="100%">
- <tr>
- <th colspan=2 align=right>| . $locale->text('Total') . qq| </th>
- <th align=right>| . $form->format_amount(\%myconfig, $form->{assemblytotal}, 2) . qq|</th>
- </tr>
- </table>
- </td>
- </tr>
- <input type=hidden name=assembly_rows value=$form->{assembly_rows}>
-|;
- }
-
- print qq|
- <input type=hidden name=callback value="$form->{callback}">
- <input type=hidden name=previousform value="$form->{previousform}">
- <input type=hidden name=taxaccount2 value="$form->{taxaccount2}">
- <input type=hidden name=vc value=$form->{vc}>
- <tr>
- <td><hr size=3 noshade></td>
- </tr>
-</table>
-
-<br>
-<input class=submit type=submit name=action value="|
- . $locale->text('Update') . qq|">
- |;
-
- unless ($form->{item} eq "service") {
- print qq|
- <input type=hidden name=makemodel_rows value=$form->{makemodel_rows}>
- |;
- }
-
- print qq|
- <input type=hidden name=price_rows value=$form->{price_rows}>|;
-
- print qq|
- <input class=submit type=submit name=action value="|
- . $locale->text('Save') . qq|">|;
-
- if ($form->{id}) {
-
- if (!$form->{previousform}) {
- print qq|
- <input class=submit type=submit name=action value="|
- . $locale->text('Save as new') . qq|">|;
- }
-
- if ($form->{orphaned}) {
- if (!$form->{previousform}) {
- if ($form->{item} eq 'assembly') {
- if (!$form->{onhand}) {
- print qq|
- <input class=submit type=submit name=action value="|
- . $locale->text('Delete') . qq|">|;
- }
- } else {
- print qq|
- <input class=submit type=submit name=action value="|
- . $locale->text('Delete') . qq|">|;
- }
- }
- }
- }
-
- if (!$form->{previousform}) {
- if ($form->{menubar}) {
- require "bin/mozilla/menu.pl";
- &menubar;
- }
- }
-# button for saving history
- if($form->{id} ne "") {
- print qq|
- <input type=button class=submit onclick=set_history_window(|
- . $form->{id}
- . qq|); name=history id=history value=|
- . $locale->text('history')
- . qq|>|;
- }
-# /button for saving history
- print qq|
-
-</form>
-
-<script type="text/javascript" src="js/wz_tooltip.js"></script>
-
-</body>
-</html>
-|;
+ print $form->parse_html_template('ic/form_footer');
$lxdebug->leave_sub();
}
$lxdebug->enter_sub();
my ($numrows) = @_;
- print qq|
- <tr>
- <td>
- <table width=100%>
- <tr>
- <th class="listheading">| . $locale->text('Make') . qq|</th>
- <th class="listheading">| . $locale->text('Model') . qq|</th>
- </tr>
-|;
-
- for my $i (1 .. $numrows) {
- $form->{"make_$i"} =~ s/\"/"/g;
- $form->{"model_$i"} =~ s/\"/"/g;
- print qq|
- <tr>
- <td width=50%><input name="make_$i" size=30 value="$form->{"make_$i"}"></td>
- <td width=50%><input name="model_$i" size=30 value="$form->{"model_$i"}"></td>
- </tr>
-|;
- }
-
- print qq|
- </table>
- </td>
- </tr>
-|;
+ my @mm_data = grep { any { $_ ne '' } @$_{qw(make model)} } map +{ make => $form->{"make_$_"}, model => $form->{"model_$_"} }, 1 .. $numrows;
+ print $form->parse_html_template('ic/makemodel', { MM_DATA => [ @mm_data, {} ], mm_rows => scalar @mm_data + 1 });
$lxdebug->leave_sub();
}