I am trying to set up a capture template to record personal contact information for sales lead management. I want to have some properties preset to defaults in the capture template

I have created an org file with each person as a top level entry. Below is a shortened example.

* Last Name, First Name
        :SCHEDULED:  <2012-01-01 .+2w>
        :PROPERTIES:
        :Spouse:  Spouse Name
        :Status:  New
        :Group:  Prospect
        :STYLE:  habit
        :END:
** Organization
*** Name
        :PROPERTIES:
        :Organization-Name:  True Homes, Inc.
        :END
**** Title
        :PROPERTIES:
        :Title: Owner
        :end:
** Phone Numbers
*** cell
        :PROPERTIES:
        :Number: 222-222-2222
        :end:
*** home
*** fax
** Email Addresses
*** Primary
        :PROPERTIES:
        :Email:  j...@gmail.com
        :end:
** Addresses
*** home
*** work
*** condo
        :PROPERTIES:
        :Street1:  2833 Beach Blvd.
        :City:  Orange Beach
        :State:  AL
        :Zip-Code:  36561
        :end:
** Activities
**** <2011-12-13 Tue> Called in with a referral to sell his property.

I want to use org-capture to create this entry with it's subtree and all the properties. The capture template expansion mechanism supports using %^{Property}p . I want some properties to be created with a default without prompting the user. (e.g. :STYLE: habits). I would also like to support completion on some of the properties while creating a new contact. {e.g. the file people.org already exist and is the target for capture to file to and (#+PROPERTY: Status_ALL New Incubating Active Purchased Dead) is at the top of the file.}

I have attempted to use the expansion %(SEXP) along with the property api as in the following but it does not work because Emacs-Lisp doesn't support nested strings (right?) I am just learning emacs-lisp, so I'm am sure my lack of knowledge is at work here.

        (setq org-capture-templates
                '(
                  ("t" "Test adding property" entry (file "~/people.org")
                    "* Test Entry %(org-entry-put (point) "STYLE" "habit")"
                   )
                   ( another template
                   )
                  ))


David Coate
"Coate Connection"
www.coateconnection.com
Re/Max Paradise
www.AlabamaParadise.com
Licensed in AL and FL
23525 Perdido Beach Blvd.
Orange Beach, Al 36561
251-213-8811 cell
251-948-8888 fax
1-800-339-2836 direct toll free

Reply via email to