547c547,548
< 	lappend PgAcVar(mw,$wn,newrec_values) '$fldval'
---
> 	regsub -all {'} $fldval '' fldvalfixed
> 	lappend PgAcVar(mw,$wn,newrec_values) '$fldvalfixed'