[modularise] (gnucash locale)

This commit is contained in:
Christopher Lam 2020-12-05 00:48:04 +08:00
parent 59ec912928
commit 5bd65a6b22
6 changed files with 59 additions and 47 deletions

View File

@ -19,29 +19,7 @@
(define-module (gnucash locale de_DE tax)) (define-module (gnucash locale de_DE tax))
(use-modules (gnucash engine)) (use-modules (gnucash core-utils))
(use-modules (gnucash app-utils))
(export gnc:txf-get-payer-name-source) (load-and-reexport (gnucash locale de_DE tax txf)
(export gnc:txf-get-form) (gnucash locale de_DE tax txf-help))
(export gnc:txf-get-description)
(export gnc:txf-get-format)
(export gnc:txf-get-multiple)
(export gnc:txf-get-category-key)
(export gnc:txf-get-line-data)
(export gnc:txf-get-last-year)
(export gnc:txf-get-help)
(export gnc:txf-get-codes)
(export gnc:txf-get-tax-entity-type)
(export gnc:txf-get-tax-entity-type-description)
(export gnc:txf-get-tax-entity-type-codes)
(export gnc:txf-get-code-info)
(export txf-help-categories)
(export txf-income-categories)
(export txf-expense-categories)
(export txf-asset-categories)
(export txf-liab-eq-categories)
(load-from-path "gnucash/locale/de_DE/tax/txf")
(load-from-path "gnucash/locale/de_DE/tax/txf-help")

View File

@ -32,6 +32,9 @@
;; Boston, MA 02110-1301, USA gnu@gnu.org ;; Boston, MA 02110-1301, USA gnu@gnu.org
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-module (gnucash locale de_DE tax txf-help))
(export txf-help-strings)
(define txf-help-strings (define txf-help-strings
'( '(

View File

@ -44,9 +44,33 @@
;; Boston, MA 02110-1301, USA gnu@gnu.org ;; Boston, MA 02110-1301, USA gnu@gnu.org
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-module (gnucash locale de_DE tax txf))
(use-modules (gnucash app-utils)) (use-modules (gnucash app-utils))
(use-modules (srfi srfi-2)) (use-modules (srfi srfi-2))
(use-modules (gnucash locale de_DE tax txf-help))
(export gnc:tax-type-txf-get-code-info)
(export gnc:txf-get-category-key)
(export gnc:txf-get-code-info)
(export gnc:txf-get-codes)
(export gnc:txf-get-description)
(export gnc:txf-get-form)
(export gnc:txf-get-format)
(export gnc:txf-get-help)
(export gnc:txf-get-last-year)
(export gnc:txf-get-line-data)
(export gnc:txf-get-multiple)
(export gnc:txf-get-payer-name-source)
(export gnc:txf-get-tax-entity-type)
(export gnc:txf-get-tax-entity-type-codes)
(export gnc:txf-get-tax-entity-type-description)
(export txf-asset-categories)
(export txf-expense-categories)
(export txf-help-categories)
(export txf-income-categories)
(export txf-liab-eq-categories)
(export txf-tax-entity-types)
(define txf-tax-entity-types (define txf-tax-entity-types
(list (list

View File

@ -19,26 +19,7 @@
(define-module (gnucash locale us tax)) (define-module (gnucash locale us tax))
(export gnc:txf-get-payer-name-source) (use-modules (gnucash core-utils))
(export gnc:txf-get-form)
(export gnc:txf-get-description)
(export gnc:txf-get-format)
(export gnc:txf-get-multiple)
(export gnc:txf-get-category-key)
(export gnc:txf-get-line-data)
(export gnc:txf-get-last-year)
(export gnc:txf-get-help)
(export gnc:txf-get-codes)
(export gnc:txf-get-tax-entity-type)
(export gnc:txf-get-tax-entity-type-description)
(export gnc:txf-get-tax-entity-type-codes)
(export gnc:txf-get-code-info)
(export txf-help-categories)
(export txf-income-categories) (load-and-reexport (gnucash locale us tax txf)
(export txf-expense-categories) (gnucash locale us tax txf-help))
(export txf-asset-categories)
(export txf-liab-eq-categories)
(load-from-path "gnucash/locale/us/tax/txf")
(load-from-path "gnucash/locale/us/tax/txf-help")

View File

@ -26,7 +26,9 @@
;; Boston, MA 02110-1301, USA gnu@gnu.org ;; Boston, MA 02110-1301, USA gnu@gnu.org
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-module (gnucash locale us tax txf-help))
(export txf-help-strings)
(define txf-help-strings (define txf-help-strings
'( '(
(H001 . "Categories marked with a \"<\" or a \"^\", require a Payer identification to be exported. \"<\" indicates that the name of this account is exported as this Payer ID. Typically, this is a bank, stock, or mutual fund name.") (H001 . "Categories marked with a \"<\" or a \"^\", require a Payer identification to be exported. \"<\" indicates that the name of this account is exported as this Payer ID. Typically, this is a bank, stock, or mutual fund name.")

View File

@ -39,11 +39,35 @@
;; Boston, MA 02110-1301, USA gnu@gnu.org ;; Boston, MA 02110-1301, USA gnu@gnu.org
;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;; ;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;;
(define-module (gnucash locale us tax txf))
(use-modules (gnucash engine)) (use-modules (gnucash engine))
(use-modules (gnucash core-utils)) (use-modules (gnucash core-utils))
(use-modules (gnucash app-utils)) (use-modules (gnucash app-utils))
(use-modules (srfi srfi-2)) (use-modules (srfi srfi-2))
(use-modules (gnucash locale us tax txf-help))
(export gnc:tax-type-txf-get-code-info)
(export gnc:txf-get-category-key)
(export gnc:txf-get-code-info)
(export gnc:txf-get-codes)
(export gnc:txf-get-description)
(export gnc:txf-get-form)
(export gnc:txf-get-format)
(export gnc:txf-get-help)
(export gnc:txf-get-last-year)
(export gnc:txf-get-line-data)
(export gnc:txf-get-multiple)
(export gnc:txf-get-payer-name-source)
(export gnc:txf-get-tax-entity-type)
(export gnc:txf-get-tax-entity-type-codes)
(export gnc:txf-get-tax-entity-type-description)
(export txf-asset-categories)
(export txf-expense-categories)
(export txf-help-categories)
(export txf-income-categories)
(export txf-liab-eq-categories)
(export txf-tax-entity-types)
(define txf-tax-entity-types (define txf-tax-entity-types
(list (list