summaryrefslogtreecommitdiff
path: root/httemplate/edit/process
diff options
context:
space:
mode:
authorChristopher Burger <burgerc@freeside.biz>2019-02-19 14:42:25 -0500
committerChristopher Burger <burgerc@freeside.biz>2019-02-21 12:41:02 -0500
commit0df2eac272aa26a62431f5cd830c1cb7b1018e32 (patch)
tree294a6df17be7bf18b9584287b49ec8655a2f7f86 /httemplate/edit/process
parentbf62797c5ca86fc7dce62ca2b371bbeb2dacac89 (diff)
RT# 82092 - custom fields now save and fixed so name label is displayed insted of actual field name
Conflicts: FS/FS/Record.pm httemplate/edit/process/cust_main.cgi
Diffstat (limited to 'httemplate/edit/process')
-rwxr-xr-xhttemplate/edit/process/cust_main.cgi5
-rw-r--r--httemplate/edit/process/part_virtual_field.html3
2 files changed, 8 insertions, 0 deletions
diff --git a/httemplate/edit/process/cust_main.cgi b/httemplate/edit/process/cust_main.cgi
index e3fa4e6f8..d277e17b1 100755
--- a/httemplate/edit/process/cust_main.cgi
+++ b/httemplate/edit/process/cust_main.cgi
@@ -113,6 +113,11 @@ my $new = new FS::cust_main ( {
$new->invoice_noemail( ($cgi->param('invoice_email') eq 'Y') ? '' : 'Y' );
+# add any virtual fields to the new cust_main record
+foreach ($new->virtual_fields) {
+ $new->setfield($_, scalar($cgi->param($_)));
+}
+
if ( $duplicate_of ) {
# then negate all changes to the customer; the only change we should
# make is to order a package, if requested
diff --git a/httemplate/edit/process/part_virtual_field.html b/httemplate/edit/process/part_virtual_field.html
index e734d9616..6a8008db7 100644
--- a/httemplate/edit/process/part_virtual_field.html
+++ b/httemplate/edit/process/part_virtual_field.html
@@ -42,6 +42,9 @@
my $act = 'add';
+## make cgi->param("name") lowercase
+$cgi->param('name' => lc $cgi->param('name'));
+
die "access denied"
unless $FS::CurrentUser::CurrentUser->access_right('Configuration');