;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Balance Sheet" (let ((options (gnc:report-template-new-options/name "Balance Sheet"))) ; Section: Display ; Section: Accounts ; Section: General (gnc:restore-report 0 "Balance Sheet" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Investment Portfolio" (let ((options (gnc:report-template-new-options/name "Investment Portfolio"))) ; Section: Accounts ; Section: General (gnc:restore-report 1 "Investment Portfolio" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Advanced Portfolio" (let ((options (gnc:report-template-new-options/name "Advanced Portfolio"))) ; Section: Accounts ; Section: General (gnc:restore-report 2 "Advanced Portfolio" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "PBDIX U.S. Bond Index" (let ((options (gnc:report-template-new-options/name "Price"))) ; Section: Price (let ((option (gnc:lookup-option options "Price" "Price Source"))) ((lambda (option) (if option ((gnc:option-setter option) 'pricedb))) option)) (let ((option (gnc:lookup-option options "Price" "Price of Commodity"))) ((lambda (option) (if option ((gnc:option-setter option) '(commodity-scm "FUND" "PBDIX")))) option)) ; Section: Display ; Section: General (let ((option (gnc:lookup-option options "General" "Step Size"))) ((lambda (option) (if option ((gnc:option-setter option) 'DayDelta))) option)) (let ((option (gnc:lookup-option options "General" "Report name"))) ((lambda (option) (if option ((gnc:option-setter option) "PBDIX U.S. Bond Index"))) option)) (let ((option (gnc:lookup-option options "General" "From"))) ((lambda (option) (if option ((gnc:option-setter option) '(absolute 1136091600 . 0)))) option)) (gnc:restore-report 3 "Price" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "PRFDX Equity Income" (let ((options (gnc:report-template-new-options/name "Price"))) ; Section: Price (let ((option (gnc:lookup-option options "Price" "Price Source"))) ((lambda (option) (if option ((gnc:option-setter option) 'pricedb))) option)) (let ((option (gnc:lookup-option options "Price" "Price of Commodity"))) ((lambda (option) (if option ((gnc:option-setter option) '(commodity-scm "FUND" "PRFDX")))) option)) ; Section: Display ; Section: General (let ((option (gnc:lookup-option options "General" "Step Size"))) ((lambda (option) (if option ((gnc:option-setter option) 'DayDelta))) option)) (let ((option (gnc:lookup-option options "General" "Report name"))) ((lambda (option) (if option ((gnc:option-setter option) "PRFDX Equity Income"))) option)) (let ((option (gnc:lookup-option options "General" "From"))) ((lambda (option) (if option ((gnc:option-setter option) '(absolute 1136091600 . 0)))) option)) (gnc:restore-report 4 "Price" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "PRGFX Growth Stock" (let ((options (gnc:report-template-new-options/name "Price"))) ; Section: Price (let ((option (gnc:lookup-option options "Price" "Price Source"))) ((lambda (option) (if option ((gnc:option-setter option) 'pricedb))) option)) (let ((option (gnc:lookup-option options "Price" "Price of Commodity"))) ((lambda (option) (if option ((gnc:option-setter option) '(commodity-scm "FUND" "PRGFX")))) option)) ; Section: Display ; Section: General (let ((option (gnc:lookup-option options "General" "Step Size"))) ((lambda (option) (if option ((gnc:option-setter option) 'DayDelta))) option)) (let ((option (gnc:lookup-option options "General" "Report name"))) ((lambda (option) (if option ((gnc:option-setter option) "PRGFX Growth Stock"))) option)) (let ((option (gnc:lookup-option options "General" "From"))) ((lambda (option) (if option ((gnc:option-setter option) '(absolute 1136091600 . 0)))) option)) (gnc:restore-report 5 "Price" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "PRGMX GNMA" (let ((options (gnc:report-template-new-options/name "Price"))) ; Section: Price (let ((option (gnc:lookup-option options "Price" "Price Source"))) ((lambda (option) (if option ((gnc:option-setter option) 'pricedb))) option)) (let ((option (gnc:lookup-option options "Price" "Price of Commodity"))) ((lambda (option) (if option ((gnc:option-setter option) '(commodity-scm "FUND" "PRGMX")))) option)) ; Section: Display ; Section: General (let ((option (gnc:lookup-option options "General" "Step Size"))) ((lambda (option) (if option ((gnc:option-setter option) 'DayDelta))) option)) (let ((option (gnc:lookup-option options "General" "Report name"))) ((lambda (option) (if option ((gnc:option-setter option) "PRGMX GNMA"))) option)) (let ((option (gnc:lookup-option options "General" "From"))) ((lambda (option) (if option ((gnc:option-setter option) '(absolute 1136091600 . 0)))) option)) (gnc:restore-report 6 "Price" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Expense Minimums" (let ((options (gnc:report-template-new-options/name "Expense Accounts"))) ; Section: Display ; Section: Accounts (let ((option (gnc:lookup-option options "Accounts" "Accounts"))) ((lambda (option) (if option ((gnc:option-setter option) '("da438bc58e5bd9d27f4aa8cab1e370c2" "2f79c15f605ecd54d7043171c183a2ae" "07937564c0c54882963dd8ab158e4762" "2187c8b518d15d71fde8a5e81ea1c4c1" "a220684f043f9af974e819a9d40d5e1d" "831d8ac0ca462d2c7181e7bf6579339f" "3fbae28185c2523d46edf0a920999a1c" "5356e96db18a892c1541d47ad168d688" "6acdb1c693e31f6b5a49a52e69e05628" "d9d05f24c7dd252958ed84fb1c578f03" "81e7e7e71ee0e1651ff5584d54724a5d" "10209ee3e40f955748d7fc9e8acbe6cf" "8a4cc158701a1dbad044aa2c506e4cae" "a653d058b6b7a88dbb737a271fb815e4" "fb67199c9dd7a59cf3a3a68b6fa389b8" "8089dcb4fc15ae7ad3627b3a8330bb9b" "d3034b343730f8bc9ff54384d96245a0" "2d78a83a159bc7c3f48272febf3293cc" "54dd8dbf4050de4fa37fd6a7af71b29c" "fdc77b0a661bd87853f8119ca92440f5" "ef684a635bd22cd1d102f1bc3d70e4b6")))) option)) ; Section: __report ; Section: General (let ((option (gnc:lookup-option options "General" "Report name"))) ((lambda (option) (if option ((gnc:option-setter option) "Expense Minimums"))) option)) (gnc:restore-report 30 "Expense Accounts" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Profit And Loss" (let ((options (gnc:report-template-new-options/name "Profit And Loss"))) ; Section: Display ; Section: Accounts ; Section: General (gnc:restore-report 7 "Profit And Loss" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Expense Accounts" (let ((options (gnc:report-template-new-options/name "Expense Accounts"))) ; Section: Display (let ((option (gnc:lookup-option options "Display" "Maximum Slices"))) ((lambda (option) (if option ((gnc:option-setter option) 7.0))) option)) ; Section: Accounts ; Section: __report ; Section: General (let ((option (gnc:lookup-option options "General" "From"))) ((lambda (option) (if option ((gnc:option-setter option) '(absolute 1136091600 . 0)))) option)) (gnc:restore-report 8 "Expense Accounts" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Portfolio Diversification" (let ((options (gnc:report-template-new-options/name "Assets"))) ; Section: Display ; Section: Accounts (let ((option (gnc:lookup-option options "Accounts" "Accounts"))) ((lambda (option) (if option ((gnc:option-setter option) '("8b656c01b6d091c8c55e8d0248153fca" "6812be1f12a10516cd78ee73f4b90593" "c39aafeaf37a8468605be8aa65f1af4e" "160344f0019f877c7096ce42218dd3ed" "de82fccfc5e7dec5e88a306ec882fc5a")))) option)) (let ((option (gnc:lookup-option options "Accounts" "Show Accounts until level"))) ((lambda (option) (if option ((gnc:option-setter option) '4))) option)) ; Section: __report ; Section: General (let ((option (gnc:lookup-option options "General" "Report name"))) ((lambda (option) (if option ((gnc:option-setter option) "Portfolio Diversification"))) option)) (gnc:restore-report 15 "Assets" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for report "Expense Accounts" (let ((options (gnc:report-template-new-options/name "Expense Accounts"))) ; Section: Display ; Section: Accounts (let ((option (gnc:lookup-option options "Accounts" "Accounts"))) ((lambda (option) (if option ((gnc:option-setter option) '("4ad87de4bfcbc06021f0b6a0b7be9043" "ae1263abd4a614144834fb462390ebab" "df279f86f38a3b76c15bb7f9ec28fefb" "a9ef17f618ad1a3c401329fb5a1b873e" "cf3856fe213b96ff45b7defc55391c5b" "da438bc58e5bd9d27f4aa8cab1e370c2" "180480721189b949897973ff10f25af6" "b4acfbc233a6c6af2bacbbca0af3bfd4" "98060dab2128aca523c30e35a7b2bd2c" "f07e2c25ebdd3fdb18cfbd6a103f64fd" "14558f62e103fd1b623e9f36c49b6802" "58309f013688b56d498d3e2db22e98a4" "fe27e3498ce208e5fe70eb4653a6924e" "5399239cc4d097b25b1ec7b7de52cd98" "3d808d62ad4bf12712f4d42145f4dcaa" "7ce2250ed68c4e8ec330afa4ff58d7c9" "9f56a66624442ddc843540ef1a7b86a8" "66e3ddcdc2120aa81dd870bc3bfc79f6" "2f79c15f605ecd54d7043171c183a2ae" "3fe1fe482d99ab1aa12227e72579dceb" "a32bc43d09bb4ae710fda85162aae91c" "dc5b0855b278e1d3310dbdd4460edd62" "07937564c0c54882963dd8ab158e4762" "d9d05f24c7dd252958ed84fb1c578f03" "2d78a83a159bc7c3f48272febf3293cc" "54dd8dbf4050de4fa37fd6a7af71b29c" "fdc77b0a661bd87853f8119ca92440f5")))) option)) (let ((option (gnc:lookup-option options "Accounts" "Show Accounts until level"))) ((lambda (option) (if option ((gnc:option-setter option) '4))) option)) ; Section: __report ; Section: General (gnc:restore-report 22 "Expense Accounts" options)) ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;; options for account tree id=2 (let ((options (gnc:make-acct-tree-window-options))) ; Section: Account Tree (hash-set! gnc:*acct-tree-options* 2 options) "gnc-acct-tree:2")