# this method adds a new address record
  def saveeventrecord 
   require 'fileutils'
   if @a_eventfilename
   newname = "%s" %   [@a_eventfilename] # grab the new filename to create
   newdata = @a_eventyear.to_s + @a_eventmonth.to_s + @a_eventday.to_s  + "T" + @a_eventbeginhour.to_s  + @a_eventbeginminute.to_s + "00"
   newdata = newdata + "\n" + @a_eventyear.to_s + @a_eventmonth.to_s + @a_eventday.to_s  + "T" + @a_eventendhour.to_s  + @a_eventendminute.to_s  + "00"
   newdata = newdata +"\n" + @a_eventsummary.to_s  + "\n" + @a_eventdescription.to_s  + "\n" + @a_eventlocation.to_s 
  
     
      
    
 	
  fullnewname = newname + ".sch"
        begin # exception trapped block
          fileName = File.join( $rwdschedule_directory, fullnewname )
        	fd = File.open(fileName,"w")
	        fd.print(newdata) # save the record info to the file
	        fd.close
          @neweventresult=newdata # show the record info in the browser
        rescue SystemCallError, StandardError
            $stderr.print "system call error: " + $!
        end # exception rescue
    end
  end