Auto-updating "Start No Earlier Than" time?

Can Anyone point Me in the direction of how to automatically update tasks with 0% complete to have a “Start No Earlier Than” time of whatever the current point in time is? While I can do it manually on a daily basis, for sufficiently large projects it gets quite tedious.

I seem to have found a solution using AppleScript. Presuming the document I want to update is the only document open in OmniPlan, this should work:

tell application "OmniPlan"
	set allTasks to every task in document 1
	repeat with eachTask in allTasks
		set theCompleted to completed of eachTask
		if theCompleted is 0.0 then
			set start after date of eachTask to current date
		end if
	end repeat
end tell