my $tbl = '<form name="frm_log_del" action="remove.cgi" onSubmit="return formDelValidation();">
-<table border="1px"><tr><th>Date</th><th>Time</th><th>Log</th><th>Category</th><th>Del</th></tr>';
+<table class="tbl"><tr class="tbl"><th>Date</th><th>Time</th><th>Log</th><th>Category</th><th>Del</th></tr>';
my $tbl_rc = 0;
##################################
my $ct = $hshCats{@row[1]};
my $dt = DateTime::Format::SQLite->parse_datetime( $row[2] );
- $tbl = $tbl . "<tr><td>". $dt->ymd . "</td>" .
+ $tbl = $tbl . '<tr class="tbl"><td>'. $dt->ymd . '</td>' .
"<td>" . $dt->hms . "</td>" . "<td>" . $row[3] . "</td>".
"<td>" . $ct .
- "</td><td><input name=\"chk\"type=\"checkbox\" value=\"".$row[0]."\"/> </td></tr>\n";
+ "</td><td><input name=\"chk\" type=\"checkbox\" value=\"".$row[0]."\"/> </td></tr>\n";
$tbl_rc +=1;
}
my $frm = qq(
<form name="frm_log" action="main.cgi" onSubmit="return formValidation();">
- <table><tr>
- <td>Date:</td><td><input type="text" name="date" value=") .$today->ymd ." ". $today->hms . qq("></td><td>Category:</td>
+ <table class="entry"><tr>
+ <td>Date:</td><td><input type="text" name="date" value=") .$today->ymd ." ". $today->hms . qq("><button onclick="return setNow();">Now</button></td><td>Category:</td>
</tr>
<tr><td>Log:</td> <td><textarea name="log" rows="2" cols="40"></textarea></td>
<td>).$cats.qq(</td></tr>
my $stmS = "SELECT rowid, ID_CAT, DATE, LOG from LOG WHERE";
my $stmE = " ORDER BY rowid DESC, DATE DESC;";
-my $tbl = '<form name="frm_log_del" action="remove.cgi" onSubmit="return formDelValidation();"><table border="1px" width="580px"><tr><th>Date</th><th>Time</th><th>Log</th><th>Category</th></tr>';
+my $tbl = '<form name="frm_log_del" action="remove.cgi" onSubmit="return formDelValidation();"><table><tr><th class="tbl">Date</th><th class="tbl">Time</th><th>Log</th><th>Category</th></tr>';
my $confirmed = $q->param('confirmed');
if (!$confirmed){
print $q->header(-expires=>"+6os");
my $ct = $hshCats{@row[1]};
my $dt = DateTime::Format::SQLite->parse_datetime( $row[2] );
- $tbl = $tbl . "<tr><td>". $dt->ymd . "</td>" .
- "<td>" . $dt->hms . "</td>" . "<td>" . $row[3] . "</td>\n".
- "<td>" . $ct. '<input type="hidden" name="chk" value="'.$row[0].'"></td></tr>';
+ $tbl = $tbl . "<tr><td>". $dt->ymd . "</td>" .
+ "<td>" . $dt->hms . "</td>" . "<td>" . $row[3] . "</td>\n".
+ "<td>" . $ct. '<input type="hidden" name="chk" value="'.$row[0].'"></td></tr>';
}
$tbl = $tbl . '<tr><td colspan="4">
font-weight: bold;
}
-table{
+table {
+ border-collapse: collapse;
+}
+
+table, th, td{
+ width: 640px;
+ border: 1px solid black;
+}
+
+.tbl {
+ border: 1px solid black;
+}
+.entry, th, td{
width: 640px;
+ border: 0px;
+ border-collapse: collapse;
}
+#frm{
+ padding: 5px;
+}
+
}
return true;
}
+
+function setNow(){
+
+ var date = document.frm_log.date;
+ var dt = new Date();
+ date.value = dt.getFullYear()+"-"+dt.getMonth()+"-"+dt.getUTCDate() + " " + dt.getHours() + ":" dt.getMinutes() +":"+dt.getSeconds();
+
+return false;
+}