From: Metabox Date: Wed, 15 May 2019 19:16:09 +0000 (+1000) Subject: Data fix front end implemented. X-Git-Url: https://lifelog.hopto.org/gitweb/?a=commitdiff_plain;h=9874ea79539565fbd1aa42501b340d801e8c1ef3;p=LifeLog.git Data fix front end implemented. --- diff --git a/htdocs/cgi-bin/config.cgi b/htdocs/cgi-bin/config.cgi index b482ff0..8fefa0e 100755 --- a/htdocs/cgi-bin/config.cgi +++ b/htdocs/cgi-bin/config.cgi @@ -70,10 +70,7 @@ my $csvp = $cgi->param('csv'); &importCatCSV; }elsif($cgi->param('data_log')){ &importLogCSV; - } - - - + } ##################### &getConfiguration; @@ -96,9 +93,9 @@ my $status = "Ready for change!"; &processSubmit; ############### -my $tbl = ' +my $tbl = '
- + '; while(my @row = $dbs->fetchrow_array()) { @@ -106,7 +103,7 @@ my $tbl = '
* CATEGORIES CONFIGURATION *
IDCategoryDescription
IDCategoryDescription
- + '; } } @@ -116,11 +113,11 @@ my $frm = qq( - + - +
'.$row[0].'
↡   Log Configuration In -> $dbname Categories Configuration In -> $dbname 
WARNING! @@ -133,10 +130,14 @@ my $frm = qq(

); -$tbl = ' - - - '; +$tbl = qq(
* SYSTEM CONFIGURATION *
VariableValue
+ + + + + + + ); my $stm = 'SELECT * FROM CONFIG;'; $dbs = $db->prepare( $stm ); $rv = $dbs->execute() or die or die "

Error->"& $DBI::errstri &"

"; @@ -169,50 +170,77 @@ while(my @row = $dbs->fetchrow_array()) { $v = ''; } $tbl = $tbl. - ' + ' - + + '; } + my $frmVars = qq( ).$tbl.qq( - +
* SYSTEM CONFIGURATION *
VariableValueDescription
'.$n.''.$v.''.$v.'
System Settings In -> $dbname 

); + + +$tbl = qq( + + ); +my $frmDB = qq( + ).$tbl.qq( + + + + + + + + + + + +
* DATA FIX *
Extra ActionDescription
Reset CategoriesWipes Categories for recreation (will initiate logoff).
Reset SettingsResets system settings to default values.
Wipe SettingsWipes system settings for migration (will initiate logoff).
Data maintenance for -> $dbname 
Perform this change/check in the event when experiencing data problems.
+ WARNING! Checking any of the above extra actions will cause loss + of your changes. Please, export/backup first.

+ ); + # #Page printout from here! # my $prc_hdr = $PRC_WIDTH-2; - print '
'; - print "\n
\n" . $frm ."\n
\n"; - print "\n
\n" . $frmVars."\n
\n"; - print "\n
\nSTATUS:" .$status. "\n
\n"; - print qq( -
-
\n - - - \n - \n - \n - \n - \n - \n - \n - \n - \n - -

CSV File Format

\n - Import Categories:
-

\n - Import Log:
\n -

To Server -> $sys -> $dbname

- + print qq( +
+
$frm
+
$frmVars
+
$frmDB
+
+ ↟ Configuration status -> $status ↡
+
+
\n + + + \n + \n + \n + \n + \n + \n + \n + \n + \n + +

CSV File Format

\n + Import Categories:
+

\n + Import Log:
\n +

To Server -> $sys -> $dbname

+
↟   [Export Log to CSV]   [View the Log in CSV Format]
\n @@ -268,7 +296,7 @@ my $prc_hdr = $PRC_WIDTH-2; ↟ or ↡ - Jump links to top or bottom of page respectivelly.

-
+
↟
); diff --git a/htdocs/cgi-bin/wsrc/main.css b/htdocs/cgi-bin/wsrc/main.css index ef586c2..92d8504 100644 --- a/htdocs/cgi-bin/wsrc/main.css +++ b/htdocs/cgi-bin/wsrc/main.css @@ -94,7 +94,6 @@ div { background-color: #e6ffff; vertical-align: top; align-self: baseline; - width: 60%; height: auto; padding: 2%; margin: 0px auto; @@ -106,9 +105,8 @@ div#rz { background-color: #e6ffff; vertical-align: top; align-self: baseline; - width: 60%; height: auto; - padding: 2%; + padding: 2px; margin: 0px auto; }