+ $form->{"title"} = $form->{is_vendor} ? $locale->text("Select a vendor") : $locale->text("Select a customer");
+ $form->header();
+ print($form->parse_html_template("generic/cov_selection", { "HEADER" => \@header,
+ "COVS" => $covs,
+ "onload" => $onload }));
+
+ $main::lxdebug->leave_sub();
+}
+
+
+# Functions to call add routines beneath different reports
+
+sub sales_invoice {
+ $main::lxdebug->enter_sub();
+
+ print $::form->redirect_header('is.pl?action=add&type=invoice');
+
+ $main::lxdebug->leave_sub();
+}
+
+sub ar_transaction {
+ $main::lxdebug->enter_sub();
+
+ print $::form->redirect_header('ar.pl?action=add');
+
+ $main::lxdebug->leave_sub();
+}
+
+sub vendor_invoice {
+ $main::lxdebug->enter_sub();
+
+ print $::form->redirect_header('ir.pl?action=add&type=invoice');
+
+ $main::lxdebug->leave_sub();
+}
+
+sub ap_transaction {
+ $main::lxdebug->enter_sub();
+
+ print $::form->redirect_header('ap.pl?action=add');
+
+ $main::lxdebug->leave_sub();
+}
+
+sub gl_transaction {
+ $main::lxdebug->enter_sub();
+
+ print $::form->redirect_header('gl.pl?action=add');
+
+ $main::lxdebug->leave_sub();
+}