Read and write to DB from form finally workinggit status

This commit is contained in:
2024-12-01 13:49:42 +00:00
parent bae566758c
commit 918f49eaf2
13 changed files with 190 additions and 133 deletions

View File

@@ -115,8 +115,9 @@ sub get_${tablecontrol[0]} {
my $ret = "";
my $db = $cdb; #maybe one of the others
my $dbkey = 'ChangeThis';
# To make it write to DB as comment, delete this (regex) string in each if statement "TRUE\) \#copy or perform with value: .* e.g."
<tal:block tal:repeat="field fields[panel]">
if (! TRUE) #copy or perform with value: ${field} e.g. $c->setprop($db,$dbkey,$c->param('${field}')))
if (! TRUE) #copy or perform with value: ${field} e.g. $db->set_prop($dbkey,'${field}',$c->param('${field}'),type=>'service'))
{$ret .= 'Perform/save failed for ${field}';}</tal:block>
if ($ret eq "") {$ret = 'ok';}
return $ret;