some modifications

added procedure: Write_Database_To_File