Revision 71e82116
Von Sven Schöling vor fast 13 Jahren hinzugefügt
| bin/mozilla/am.pl | ||
|---|---|---|
| 1124 | 1124 |
} |
| 1125 | 1125 |
|
| 1126 | 1126 |
sub audit_control {
|
| 1127 |
$main::lxdebug->enter_sub(); |
|
| 1128 |
|
|
| 1129 |
my $form = $main::form; |
|
| 1130 |
my %myconfig = %main::myconfig; |
|
| 1131 |
my $locale = $main::locale; |
|
| 1132 |
|
|
| 1133 |
$main::auth->assert('config');
|
|
| 1134 |
|
|
| 1135 |
$form->{title} = $locale->text('Audit Control');
|
|
| 1136 |
|
|
| 1137 |
AM->closedto(\%myconfig, \%$form); |
|
| 1138 |
|
|
| 1139 |
$form->header; |
|
| 1140 |
|
|
| 1141 |
print qq| |
|
| 1142 |
<body> |
|
| 1143 |
|
|
| 1144 |
<form method=post action=am.pl> |
|
| 1145 |
|
|
| 1146 |
<table width=100%> |
|
| 1147 |
<tr><th class=listtop>$form->{title}</th></tr>
|
|
| 1148 |
<tr height="5"></tr> |
|
| 1149 |
<tr> |
|
| 1150 |
<td> |
|
| 1151 |
<table> |
|
| 1152 |
<tr> |
|
| 1153 |
<th>| . $locale->text('Close Books up to') . qq|</th>
|
|
| 1154 |
<td><input name=closedto size=11 title="$myconfig{dateformat}" value=$form->{closedto}></td>
|
|
| 1155 |
</tr> |
|
| 1156 |
</table> |
|
| 1157 |
</td> |
|
| 1158 |
</tr> |
|
| 1159 |
</table> |
|
| 1160 |
|
|
| 1161 |
<hr size=3 noshade> |
|
| 1162 |
|
|
| 1163 |
<br> |
|
| 1164 |
<input type=hidden name=nextsub value=doclose> |
|
| 1127 |
$::lxdebug->enter_sub; |
|
| 1128 |
$::auth->assert('config');
|
|
| 1165 | 1129 |
|
| 1166 |
<input type=submit class=submit name=action value="| |
|
| 1167 |
. $locale->text('Continue') . qq|">
|
|
| 1130 |
$::form->{title} = $::locale->text('Audit Control');
|
|
| 1168 | 1131 |
|
| 1169 |
</form>
|
|
| 1132 |
AM->closedto(\%::myconfig, $::form);
|
|
| 1170 | 1133 |
|
| 1171 |
</body> |
|
| 1172 |
</html> |
|
| 1173 |
|; |
|
| 1134 |
$::form->header; |
|
| 1135 |
print $::form->parse_html_template('am/audit_control');
|
|
| 1174 | 1136 |
|
| 1175 |
$main::lxdebug->leave_sub();
|
|
| 1137 |
$::lxdebug->leave_sub;
|
|
| 1176 | 1138 |
} |
| 1177 | 1139 |
|
| 1178 | 1140 |
sub doclose {
|
| templates/webpages/am/audit_control.html | ||
|---|---|---|
| 1 |
[%- USE HTML %] |
|
| 2 |
[%- USE LxERP %] |
|
| 3 |
[%- USE T8 %] |
|
| 4 |
[%- USE L %] |
|
| 5 |
<body> |
|
| 6 |
|
|
| 7 |
<h1>[% title | html %]</h1> |
|
| 8 |
|
|
| 9 |
<form method=post action=am.pl> |
|
| 10 |
|
|
| 11 |
<table> |
|
| 12 |
<tr> |
|
| 13 |
<th>[% 'Close Books up to' | $T8 %]</th> |
|
| 14 |
<td>[% L.date_tag('closedto', closedto) %]</td>
|
|
| 15 |
</tr> |
|
| 16 |
</table> |
|
| 17 |
|
|
| 18 |
<hr size=3 noshade> |
|
| 19 |
|
|
| 20 |
<br> |
|
| 21 |
<input type=hidden name=nextsub value=doclose> |
|
| 22 |
<input type=submit class=submit name=action value="[% 'Continue' | $T8 %]"> |
|
| 23 |
|
|
| 24 |
</form> |
|
| 25 |
|
|
| 26 |
</body> |
|
| 27 |
</html> |
|
Auch abrufbar als: Unified diff
am/audit_control auf template umgeschrieben.