use CGI::Ajax;
use SL::DBUtils;
use SL::Menu;
+use SL::User;
use CGI;
sub _input_to_hash {
$main::lxdebug->leave_sub();
}
+sub get_salesman {
+ $main::lxdebug->enter_sub();
+
+ my ($self, $myconfig, $salesman_id) = @_;
+
+ my $dbh = $self->dbconnect($myconfig);
+
+ my ($login) =
+ selectrow_query($self, $dbh, qq|SELECT login FROM employee WHERE id = ?|,
+ $salesman_id);
+
+ if ($login) {
+ my $user = new User($main::memberfile, $login);
+ map({ $self->{"salesman_$_"} = $user->{$_}; }
+ qw(address businessnumber co_ustid company duns email fax name
+ taxnumber tel));
+ $self->{salesman_login} = $login;
+
+ $self->{salesman_name} = $login
+ if ($self->{salesman_name} eq "");
+
+ map({ $self->{"salesman_$_"} =~ s/\\n/\n/g; } qw(address company));
+ }
+
+ $dbh->disconnect();
+
+ $main::lxdebug->leave_sub();
+}
+
sub get_duedate {
$main::lxdebug->enter_sub();
return $var;
}
-sub get_salesman {
- $main::lxdebug->enter_sub();
-
- my ($self, $myconfig, $salesman) = @_;
-
- my $dbh = $self->dbconnect($myconfig);
- my $query =
- qq|SELECT id, name FROM customer WHERE (customernumber ilike '%$salesman%' OR name ilike '%$salesman%') AND business_id in (SELECT id from business WHERE salesman)|;
- my $sth = $dbh->prepare($query);
- $sth->execute || $self->dberror($query);
-
- my $i = 0;
- while ($ref = $sth->fetchrow_hashref(NAME_lc)) {
- push(@{ $self->{salesman_list} }, $ref);
- $i++;
- }
- $dbh->commit;
- $main::lxdebug->leave_sub();
-
- return $i;
-}
-
sub get_partsgroup {
$main::lxdebug->enter_sub();
$language_saved = $form->{language_id};
$payment_id_saved = $form->{payment_id};
+ $salesman_id_saved = $form->{salesman_id};
&{"$form->{vc}_details"}();
IS->invoice_details(\%myconfig, \%$form, $locale);
}
+ $form->get_salesman(\%myconfig, $salesman_id_saved);
+
if ($form->{shipto_id}) {
$form->get_shipto(\%myconfig);
}
<li><a href="dokumentenvorlagen-und-variablen.html#allgemein_stammdaten">
Stammdaten von Kunden und Lieferanten</a></li>
+ <li><a href="dokumentenvorlagen-und-variablen.html#allgemein_bearbeiter">
+ Informationen über den Bearbeiter</a></li>
+
<li><a href="dokumentenvorlagen-und-variablen.html#allgemein_verkaeufer">
Informationen über den Verkäufer</a></li>
sondern schlicht Kopien der Lieferdatenvariablen sind
(z.B. <code>shiptocontact</code>).</p>
- <h3><a name="allgemein_verkaeufer">
- Informationen über den Verkäufer:</a></h3>
+ <h3><a name="allgemein_bearbeiter">
+ Informationen über den Bearbeiter:</a></h3>
<p>
<table border="1">
</table>
</p>
+ <h3><a name="allgemein_verkaeufer">
+ Informationen über den Verkäfer (nur bei Verkaufsmasken):</a></h3>
+
+ <p>
+ <table border="1">
+ <tr><th>Variablenname</th><th>Bedeutung</th></tr>
+ <tr>
+ <td><code>salesman_address</code></td>
+ <td>Adressfeld</td>
+ </tr>
+ <tr>
+ <td><code>salesman_businessnumber</code></td>
+ <td>Firmennummer</td>
+ </tr>
+ <tr>
+ <td><code>salesman_company</code></td>
+ <td>Firmenname</td>
+ </tr>
+ <tr>
+ <td><code>salesman_co_ustid</code></td>
+ <td>Usatzsteuer-Identifikationsnummer</td>
+ </tr>
+ <tr>
+ <td><code>salesman_duns</code></td>
+ <td>DUNS-Nummer</td>
+ </tr>
+ <tr>
+ <td><code>salesman_email</code></td>
+ <td>Email</td>
+ </tr>
+ <tr>
+ <td><code>salesman_fax</code></td>
+ <td>Fax</td>
+ </tr>
+ <tr>
+ <td><code>salesman_name</code></td>
+ <td>voller Name</td>
+ </tr>
+ <tr>
+ <td><code>salesman_signature</code></td>
+ <td>Signatur</td>
+ </tr>
+ <tr>
+ <td><code>salesman_taxnumber</code></td>
+ <td>Steuernummer</td>
+ </tr>
+ <tr>
+ <td><code>salesman_tel</code></td>
+ <td>Telefonnummer</td>
+ </tr>
+ </table>
+ </p>
+
<h3><a name="allgemein_steuern">
Variablen für die einzelnen Steuern:</a></h3>