From 12869f6bccfa2ca26c81c76d9e48a4f7866dd25a Mon Sep 17 00:00:00 2001
From: wbudic <vilijanac@gmail.com>
Date: Thu, 30 Aug 2018 15:43:44 +1000
Subject: [PATCH] Implemented Updating, editing records, and provided row
 background colours.

---
 htdocs/cgi-bin/main.cgi           |  24 ++++++++++++++++++------
 htdocs/cgi-bin/wsrc/.main.css.swp | Bin 12288 -> 0 bytes
 htdocs/cgi-bin/wsrc/.main.js.swp  | Bin 12288 -> 0 bytes
 htdocs/cgi-bin/wsrc/main.css      |  10 ++++++++++
 htdocs/cgi-bin/wsrc/main.js       |   2 +-
 5 files changed, 29 insertions(+), 7 deletions(-)
 delete mode 100644 htdocs/cgi-bin/wsrc/.main.css.swp
 delete mode 100644 htdocs/cgi-bin/wsrc/.main.js.swp

diff --git a/htdocs/cgi-bin/main.cgi b/htdocs/cgi-bin/main.cgi
index 33fe7c5..1a01b15 100755
--- a/htdocs/cgi-bin/main.cgi
+++ b/htdocs/cgi-bin/main.cgi
@@ -34,6 +34,7 @@ my $rv;
 my $today = DateTime->now;
 $today->set_time_zone( 'Australia/Sydney' );
 
+
 my $sth = $dbh->prepare("SELECT name FROM sqlite_master WHERE type='table' AND name='LOG';");
 $sth->execute();
 
@@ -117,14 +118,21 @@ if($rv < 0) {
 	     print "<p>Error->"& $DBI::errstri &"</p>";
 }
 
-
+my $tfId = 1;
 
  while(my @row = $sth->fetchrow_array()) {
 
 	 my $ct = $hshCats{@row[1]};
 	 my $dt = DateTime::Format::SQLite->parse_datetime( $row[2] );
-
-	         $tbl = $tbl . '<tr class="tbl"><td id="y'.$row[0].'">'. $dt->ymd . '</td>' . 
+	 
+	 if($tfId==1){
+		 $tfId = 0;
+	 }else{
+		 $tfId = 1;
+	 }
+
+	         $tbl = $tbl . '<tr class="tbl" id="r'.$tfId.'"><td id="y'.$row[0].'">'. 
+		 	$dt->ymd . '</td>' . 
 		          '<td id="t'.$row[0].'">' . $dt->hms . "</td>" . '<td id="v'.$row[0].'" class="log">' . $row[3] . "</td>".
 			  '<td id="c'.$row[0].'">' . $ct .
 			  '</td>
@@ -170,9 +178,13 @@ sub processSubmit {
 	my $cat = $q->param('cat');
 	my $edit_mode =  $q->param('submit_is_edit');
 
-	if($edit_mode == "1"){
-	 print "<h2>Sorry Editing Not Implemented Yet</h2>";
-	 return;
+	if($edit_mode != "0"){
+		#Update
+
+		my $stm = "UPDATE LOG SET ID_CAT='".$cat."', DATE='".$date ."' , LOG='".$log."' WHERE rowid=".$edit_mode.";"; 
+		my $sth = $dbh->prepare($stm); 
+			  $sth->execute();
+		return;
 	}
 
 	if($log && $date && $cat){
diff --git a/htdocs/cgi-bin/wsrc/.main.css.swp b/htdocs/cgi-bin/wsrc/.main.css.swp
deleted file mode 100644
index 9c0e07bfbb7c5561327c5ba049d9cb59e5b5557a..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 12288
zcmeI1F>ljA6vwX}kRs87K%j0Mse~AC;<V5dhfYig!Gg*_Rgmqw#0MAKvafYR)v^^a
zcLKpDU@8d2M_}uM*pL_)5fdXq{B0*~RU}fz!n^1v$9M1Ez4x=1D4u=$+6~^UU1S)?
z8GChZV`1Aq&o+-RmMN|C>0#sM{8h_t42xoHJx^FSfibbTC**QHFe38Py5CWjr^0%c
zCVsu^s<7s#>F{(EK?cacK@BXKwlzD(rl%TqzGbp{mY+N^f6(0&M+V3M86X2>fDDiU
zGC&5%z&~KX#3Sqx`WWr^Qtw|!_Fen8bRh#|fDDiUGC&5%02v?yWPl8i0Wv@a4xs^8
zF!tjpV;{y)JpTV5{Qm!TjIqz)J$MJ+f;V6byZ}$YW3U0%!CkNj7Qh{F9b5rbz`+?X
z0e+6-Jn$8K0^8s<*a9!XbMOp21)E?4#NZaV3?{&7a0-lrQScqLe*qss(Z?Zt4pcH3
zAOmE843GgbKnBPF86X4yrGZL23XPSjhtg^O%~;zRtl~w9kjb25$15$iH(_jWAG<=R
zu)`b0YS&FVDs;HrVl^q0S!HaE@%}J!#aPj@Oxili94@t1ajMeRPQdP3poEa&?n)LY
zBds)ced+Kp$`Uum*+oKEs}4@Qzmyu)?qN1l!UWFjR9?`ejygpRgE}34shDpk-POFb
zvN_9-w07eZ$p_zXcDaUT@*TWP%V%ba+nNkb(!0P-0K}eDPHuvykye6x+Vvm6gz+>l
zO$<{07PBwCaXl?}v!ha0$u0h&++s_4O!<&9sXBpiuty7MDIblcWgBzNqKSBKc=3`n
nU~LeJP7uXye5Q-=im#=cI6P0$Vhg4h%eiX0<aL#)E+W-0i|6}S

diff --git a/htdocs/cgi-bin/wsrc/.main.js.swp b/htdocs/cgi-bin/wsrc/.main.js.swp
deleted file mode 100644
index 23820d50cd59bc8c23dc1d74ff80398491e45639..0000000000000000000000000000000000000000
GIT binary patch
literal 0
HcmV?d00001

literal 12288
zcmeI2&u<$=6vw9sAuVkHfrQlCWGk9oxn4UIsi?+15E>e(>7_{#jVf!s`)p5G?^?UF
zb|VxxfZz|{4p;sFxPgR(I3lhfpa&#QNc;(i@9dAnNmQpCBi>pct@q7)Z{GXPjFrgl
zx9@Fi%4^<h0@n*d{C)qEo%OaOK6^%pnTjG~KJB`*z1D26p5`UQ2PR=lkF=hIy^yA@
zkq(m}YXw8q?5nsn%hI4V_EqfdW~XOk4_1H`cwz-|J!rnZB(A=?+BPwl>}C1Vi`!2e
z&W@}AE5Hh{0;~WlzzVPetN<%;_7%{RbK*m^@l@4Hr@EgzcCQ}!#tN_ktN<&(3a|pK
z04u->umY?AE5Hh{0%uSGKNR8zONbwzMe+FlzyAOK&*z2s1AGU*0G|T|MqmI4Y=Udx
zpXczq0q_@i1bzd*g73lC;482X#$Xpb06XA5cpI#POJE6nyd=a&AO{&pK@Z#jUGOyc
z<$@4DgD=4ptb?0i4O{@<o)_X9@F{o)Tm`Ryi{NGO2)+IeegZ|`XK>xPWLAI`U<FtK
zR)7^?1^zDz>@U1TN;*$tIq;*5@TaVW-<RfNinTW+eKR8S_RYPG(6O_;KUTV@vL1y>
z+pahDqnu<{+N*X)So^|~^@aDi@YGMqe-DGjLp@4?mr+E4rf?$;=^;`m_|(H{;J_o9
zXqCj-j(Xs!IHvU0*5+;5?RF&vy{RkT7uFz2ovEKnh4}Urxr^IjoEK3%)T0hY-;lc<
z*=Q&ew4gl-=USq$H!bJgqK8^Gq>WcYO49Ro6#ZDWD4I_<Jr;&SOz8wW%6@E;sojui
zGIKk!^2hX$X+eZO9)U&{`R^V2S5pLwC!oM~(RWcjR$@`^pvrwHq}g945<MZ1A}@xz
zcU3=9@vz)Z9Wlt`z%0EqyUd};#j5R}+@-#zgAEuKn{_>pqIbzp9k*dO?M7+bOkzDc
zV%gqWdkevid$6jd=dC19v(kFqtaTNy;#^Z<x3AYp?^2M&A&iv}p++|`&19Llwqllf
zc?RjY7bQb4gdIX0^qG;qlgykWed;uak2zD;(er6penhEu?AysuHg8Cr&U8-(e!QY(
zpCpYZdhbg0TprkEvtGi&slw#lu5DwYgSl~pRftq(>^~M@dNmcSlw!$-y&_d6H{v4a
z$r4Nj%O=R1_-RH?sNEBl6#8MHSn_(!i+tsXi7q~MTzUDjoG-pIqf@iL(9MxkQcDke
gr*H^O@pH$hb};sikn&I=e9DaP8I^pqDa|VV3-pBXcmMzZ

diff --git a/htdocs/cgi-bin/wsrc/main.css b/htdocs/cgi-bin/wsrc/main.css
index 41b1dde..bb0dd1d 100644
--- a/htdocs/cgi-bin/wsrc/main.css
+++ b/htdocs/cgi-bin/wsrc/main.css
@@ -21,7 +21,17 @@ table, th, td{
 
 .tbl {
  border: 1px solid black;
+	background-color: #e6fff2;
 }
+
+#r0{
+	background-color: #e6ffff;
+}
+
+#r1{
+	background-color: #ccffff;
+}
+
 .entry, th, td{
  width: 660px;
  border: 0px;
diff --git a/htdocs/cgi-bin/wsrc/main.js b/htdocs/cgi-bin/wsrc/main.js
index faa7505..4f83a2a 100644
--- a/htdocs/cgi-bin/wsrc/main.js
+++ b/htdocs/cgi-bin/wsrc/main.js
@@ -53,7 +53,7 @@ function edit(el){
 				   break;
 	         }
 	}
-	document.getElementById("submit_is_edit").value = "1";
+	document.getElementById("submit_is_edit").value = row;
 
 return false;
 }
-- 
2.34.1