- # without JavaScript Calendar
- if ($name_1 eq "") {
- $button1 =
- qq|<input name=$name_2 id=$id_2 size=11 title="$myconfig{dateformat}" onBlur=\"check_right_date_format(this)\">|;
- } else {
- $button1 =
- qq|<input name=$name_1 id=$id_1 size=11 title="$myconfig{dateformat}" value="$value_1" onBlur=\"check_right_date_format(this)\">|;
- $button2 =
- qq|<input name=$name_2 id=$id_2 size=11 title="$myconfig{dateformat}" onBlur=\"check_right_date_format(this)\">|;
- }
- }
- $form->{javascript} .= qq|<script type="text/javascript" src="js/common.js"></script>|;
- $form->header;
- my $onload = qq|focus()|;
- $onload .= qq|;setupDateFormat('|. $myconfig{dateformat} .qq|', '|. $locale->text("Falsches Datumsformat!") .qq|')|;
- $onload .= qq|;setupPoints('|. $myconfig{numberformat} .qq|', '|. $locale->text("wrongformat") .qq|')|;
-
-
- $form->header;
-
- $form->{description} =~ s/\"/"/g;
-
- print qq|
-<body onLoad="$onload">
-
-<form method=post action=$form->{script}>
-
-<input type=hidden name=accno value=$form->{accno}>
-<input type=hidden name=description value="$form->{description}">
-<input type=hidden name=sort value=transdate>
-<input type=hidden name=eur value=$main::eur>
-<input type=hidden name=accounttype value=$form->{accounttype}>
-
-<table border=0 width=100%>
- <tr>
- <th class=listtop>$form->{title}</th>
- </tr>
-
-</table>
-<table>
- <tr>
- <th align=left><input name=reporttype class=radio type=radio value="custom" checked> |
- . $locale->text('Customized Report') . qq|</th>
- </tr>
- <tr>
- <th colspan=1>| . $locale->text('Year') . qq|</th>
- <td><input name=year size=11 title="|
- . $locale->text('YYYY') . qq|" value="$year"></td>
- </tr>
-|;
-
- print qq|
- <tr>
- <td align=right>
-<b> | . $locale->text('Yearly') . qq|</b> </td>
- <th align=left>| . $locale->text('Quarterly') . qq|</th>
- <th align=left colspan=3>| . $locale->text('Monthly') . qq|</th>
- </tr>
- <tr>
- <td align=right> <input name=duetyp class=radio type=radio value="13"></td>
- <td><input name=duetyp class=radio type=radio value="A"> 1. | . $locale->text('Quarter') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="1" "checked"> | . $locale->text('January') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="5" > | . $locale->text('May') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="9" > | . $locale->text('September') . qq|</td>
-
- </tr>
- <tr>
- <td align= right> </td>
- <td><input name=duetyp class=radio type=radio value="B"> 2. | . $locale->text('Quarter') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="2" > | . $locale->text('February') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="6" > | . $locale->text('June') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="10" > | . $locale->text('October') . qq|</td>
- </tr>
- <tr>
- <td> </td>
- <td><input name=duetyp class=radio type=radio value="C"> 3. | . $locale->text('Quarter') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="3" > | . $locale->text('March') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="7" > | . $locale->text('July') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="11" > | . $locale->text('November') . qq|</td>
-
- </tr>
- <tr>
- <td> </td>
- <td><input name=duetyp class=radio type=radio value="D"> 4. | . $locale->text('Quarter') . qq| </td>
- <td><input name=duetyp class=radio type=radio value="4" > | . $locale->text('April') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="8" > | . $locale->text('August') . qq|</td>
- <td><input name=duetyp class=radio type=radio value="12" > | . $locale->text('December') . qq|</td>
-
- </tr>
- <tr>
- <td colspan=5><hr size=3 noshade></td>
- </tr>
- <tr>
- <th align=left><input name=reporttype class=radio type=radio value="free"> | . $locale->text('Free report period') . qq|</th>
- <td align=left colspan=4>| . $locale->text('From') . qq|
- $button1
- $button1_2
- | . $locale->text('Bis') . qq|
- $button2
- $button2_2
- </td>
- </tr>
- <tr>
- <td colspan=5><hr size=3 noshade></td>
- </tr>
- <tr>
- <th align=leftt>| . $locale->text('Method') . qq|</th>
- <td colspan=3><input name=method class=radio type=radio value=accrual $accrual>| . $locale->text('Accrual') . qq|
- <input name=method class=radio type=radio value=cash $cash>| . $locale->text('EUR') . qq|</td>
- </tr>
- <tr>
- <th align=right colspan=4>| . $locale->text('Decimalplaces') . qq|</th>
- <td><input name=decimalplaces size=3 value="2"></td>
- </tr>
- <tr>
- <td><input name="subtotal" class=checkbox type=checkbox value=1> | . $locale->text('Subtotal') . qq|</td>
- </tr>
-
-$jsscript
- <tr><td colspan=5 ><hr size=3 noshade></td></tr>
-</table>
-
-<br><input class=submit type=submit name=action value="|
- . $locale->text('List Transactions') . qq|">
-</form>
-
-</body>
-</html>
-|;
-
- $main::lxdebug->leave_sub();