Applescript to batch edit contact information

Question

I am using Contacts to manage my addresses. Till not I was using the "Department" field and the "Notes" field to enter Notes to all my Contacts. However, my new Phone does not support syncronizing the "Department" field and I need that information on my phone.
Can someone help me with a script that will add the Information from the "Department" field to a separate line to the "Notes" field?

Answer 1

tell application "Contacts"
          repeat with aperson in people of group "group name"
                    if department of aperson is not missing value then
                              set theDept to department of aperson
                              set the note of aperson to note of aperson & return & theDept
  -- the next line is optional. Remove it if you don't want to delete the department field
                              set department of aperson to missing value
                    end if
          end repeat
  save
end tell
As stated in the comment, remove the "set department" line if you don't want to delete the department field, just move it.
Edit the group name as appropriate, or for all contacts, remove [of group "group name"]