-
-sub company_logo {
- $lxdebug->enter_sub();
-
- require "$userspath/$form->{login}.conf";
- $locale = new Locale $myconfig{countrycode}, "login" unless ($language eq $myconfig{countrycode});
-
- $myconfig{address} =~ s/\\n/<br>/g;
- $myconfig{dbhost} = $locale->text('localhost') unless $myconfig{dbhost};
-
- map { $form->{$_} = $myconfig{$_} } qw(charset stylesheet);
-
- $form->{title} = $locale->text('About');
-
-
- # create the logo screen
- $form->header unless $form->{noheader};
-
- print qq|
-<body>
-<center>
-<a href="http://www.lx-office.org" target=_top><img src="image/lx-office-erp.png" border=0></a>
-<h2 class=login>|.$locale->text('Version').qq| $form->{version}</h2>
-
-|.$locale->text('Licensed to').qq|
-<p>
-<b>
-$myconfig{company}
-<br>$myconfig{address}
-</b>
-
-
-<br>
-<table border=0>
- <tr>
- <th align=left>|.$locale->text('User').qq|</th>
- <td>$myconfig{name}</td>
- </tr>
- <tr>
- <th align=left>|.$locale->text('Dataset').qq|</th>
- <td>$myconfig{dbname}</td>
- </tr>
- <tr>
- <th align=left>|.$locale->text('Database Host').qq|</th>
- <td>$myconfig{dbhost}</td>
- </tr>
- <tr>
- </tr>
- <tr>
- </tr>
- <tr>
- <th colspan="2" align="center"><a href="http://lx-office.org" target="blank">http://lx-office.org</a></th>
- </tr>
- <tr>
- <th colspan="2" align="center"><a href="mailto:info@lx-office.org" target="blank">info@lx-office.org</a></th>
- </tr>
-</table>
-
-</center>
-
-</body>
-</html>
-|;
-
- $lxdebug->leave_sub();
-}