From: Myles English <mylesenglish@gmail.com>
To: Sebastien Vauban <wxhgmqzgwmuf@spammotel.com>
Cc: emacs-orgmode Mode <emacs-orgmode@gnu.org>
Subject: Re: Remaining Work Report
Date: Thu, 22 Mar 2012 14:33:28 +0000 [thread overview]
Message-ID: <87limshfif.fsf@gmail.com> (raw)
In-Reply-To: <80ehsog1gi.fsf@somewhere.org> (Sebastien Vauban's message of "Mon, 19 Mar 2012 14:33:17 +0100")
Hi Sebastian,
>> On Mon, 19 Mar 2012 14:33:17 +0100, Sebastien Vauban said:
> #+COLUMNS: %40ITEM(Task) %6Effort(Estim.){:} * Context
> The question I'm trying to give an answer to is: *what's the
> remaining number of hours (or days) to finish my project*?
I have just been through this myself so I hope I will be able to help.
To exclude DONE items from the columnview I moved the Effort property
out of the way to the Old_Effort property when the state changes to
DONE:
,-----------------------------------------------------------------------------------------------
| (require 'org)
| (defun my-move-effort-if-done ()
| "For TOC style columnview table. Don't want to include DONE
| items in the TODO Effort column so copy Effort to Old_Effort
| property"
| (interactive)
| ( when (string= (org-get-todo-state) "DONE")
| (member (org-get-todo-state) org-done-keywords)
| ;; check if changing to DONE
| (org-entry-put nil "Old_Effort" (org-get-effort))
| ;; get the :Effort: property
| ;(message (format "Got: %s when changin to %s" ( org-get-effort ) (org-get-todo-state)))
| (setq org-clock-effort (org-get-effort))
| (org-entry-delete nil "Effort")))
|
| (setq org-after-todo-state-change-hook nil)
|
| (add-hook 'org-after-todo-state-change-hook
| 'my-move-effort-if-done)
`-----------------------------------------------------------------------------------------------
Unlike your example I made heavy use of inline tasks and also wanted
heading numbers instead of asterisks, so that the final table looks like
a table of contents with estimated times remaining. I had to do some
more things to achieve this and can elaborate if you like.
Myles
next prev parent reply other threads:[~2012-03-22 14:29 UTC|newest]
Thread overview: 7+ messages / expand[flat|nested] mbox.gz Atom feed top
2012-03-19 13:33 Remaining Work Report Sebastien Vauban
2012-03-22 14:33 ` Myles English [this message]
2012-03-24 14:28 ` Manish
2012-03-26 10:49 ` Myles English
2012-03-26 13:03 ` Sebastien Vauban
2012-05-03 14:38 ` Sebastien Vauban
[not found] ` <87havhk5qn.fsf@gmail.com>
2012-05-15 14:39 ` Myles English
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.orgmode.org/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=87limshfif.fsf@gmail.com \
--to=mylesenglish@gmail.com \
--cc=emacs-orgmode@gnu.org \
--cc=wxhgmqzgwmuf@spammotel.com \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs/org-mode.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).