The Omni Group Forums

The Omni Group Forums (http://forums.omnigroup.com/index.php)
-   OmniFocus Extras (http://forums.omnigroup.com/forumdisplay.php?f=44)
-   -   Mass de-flag in context/perspective script. (http://forums.omnigroup.com/showthread.php?t=22954)

roadtrip 2011-12-26 09:07 PM

Mass de-flag in context/perspective script.
 
Ho-ho-hello. Getting ready for 012. My desperate daily workflow requires a script that will un-flag ALL items in a given Context/Perspective. Willing to fund a PayPal account. pls help. thx.

RobTrew 2011-12-26 11:50 PM

I think you should be able to deflag everything that is shown in a particular perspective with something like this.

[CODE]tell application id "OFOC"
tell front document window of front document
set refTrees to a reference to trees of content

-- UN-FLAG ANY VISIBLE PROJECTS
repeat with oProj in (value of refTrees where class of its value is project) as list
set flagged of oProj to false
end repeat

-- TOP LEVEL TASKS
repeat with oValue in (value of refTrees where class of its value is task) as list
my ClearFlag(oValue)
end repeat

-- AND CHILD TASKS
-- if we are grouping by flag, the Flagged tree may vanish at run time
repeat with i from (count of refTrees) to 1 by -1
set oTree to item i of refTrees
repeat with oTask in (value of descendant trees of oTree) as list
my ClearFlag(oTask)
end repeat
end repeat

-- WORKING AROUND AN OMNIFOCUS GUI BUG ...
-- Note a bug in the GUI: project flags will not appear as cleared until the window is closed & reopened
-- the following simply the view mode back and forth to force a repaint
-- a time-waster, but works around the GUI bug
set lstView to available view mode identifiers
if item 1 of lstView = selected view mode identifier then set lstView to reverse of lstView
repeat with oView in lstView
set selected view mode identifier to oView
end repeat
end tell
end tell

on ClearFlag(oTask)
tell application id "OFOC"
set flagged of oTask to false
set oParent to container of oTask
repeat while class of oParent is in {task, project}
set flagged of oParent to false
set oParent to container of oParent
end repeat
end tell
end ClearFlag

[/CODE]

Note that OmniFocus still seems to have a screen refresh bug - when the flagging of a Project is cleared by script, the flag icon is not immediately repainted/cleared - you have to close and reopen the window to see what has really happened.
Flags on cleared tasks, however, should immediately vanish.

I remember this bug from years ago, so I am a bit surprised to notice that it is still there. Certainly worth a bug report through OF > [B]Help > Send Feedback ...[/B]

[COLOR="White"]--[/COLOR]

roadtrip 2012-01-17 02:26 PM

Thank you!!!

roadtrip 2012-01-23 12:25 PM

Hi there! Thank you again for providing this script.

Since I use the script almost exclusively in context mode, I thought I would offer a little feedback on its usage.

- The script indeed successfully de-flags tasks in my context/perspective. I immediately see the flag disappear, and all I have to do is "clean up" and I get the result I desire. I am curious if we can script the "clean up" part?

- However, the script does not de-flag Projects. It also does not de-flag tasks inside Projects that are flagged (auto-flagged tasks). Again, I am operating from context mode.

Do you have any additional suggestions on how I can achieve a full de-flagging of all objects in a given context/perspective?

Thank you! RT

RobTrew 2012-01-23 03:33 PM

Thanks for pointing that out.

Amended above, and should now clear project flags from Context view as well.

RobTrew 2012-01-26 12:57 PM

Further amended above - thanks to some very thoughtful and ingenious debugging by whpalmer4.


All times are GMT -8. The time now is 02:32 PM.

Powered by vBulletin® Version 3.8.7
Copyright ©2000 - 2024, vBulletin Solutions, Inc.