Update exportRecords.R

adapt field_names to correct underscore codings.