tell application id "OFOC"
	tell default document
		-- SET UP TWO PROJECTS
		repeat with strName in {"ProjB", "ProjA"}
			set oProj to make new project with properties {name:strName} at beginning of projects
			repeat with strTask in {"First", "Second"}
				tell oProj to set oTask to make new task at end of tasks with properties {name:strTask & " task of " & name}
			end repeat
		end repeat
		
		-- MOVE A TASK FROM ONE PROJECT TO ANOTHER
		move oTask to end of tasks of second project
	end tell
end tell