changeset 773331648a15 in modules/marketing_campaign:default
details: 
https://hg.tryton.org/modules/marketing_campaign?cmd=changeset&node=773331648a15
description:
        Add marketing_campaign module

        issue11587
        review425381003
diffstat:

 .drone.yml                                                 |   78 +
 .flake8                                                    |    2 +
 .isort.cfg                                                 |    3 +
 COPYRIGHT                                                  |   15 +
 LICENSE                                                    |  674 +++++++++++++
 MANIFEST.in                                                |    5 +
 README.rst                                                 |    1 +
 __init__.py                                                |   52 +
 doc/conf.py                                                |   61 +
 doc/design.rst                                             |   29 +
 doc/index.rst                                              |   11 +
 doc/reference.rst                                          |   34 +
 marketing.py                                               |  121 ++
 marketing.xml                                              |  103 +
 message.xml                                                |   19 +
 sale.py                                                    |   26 +
 sale.xml                                                   |   26 +
 sale_opportunity_reporting.py                              |   98 +
 sale_opportunity_reporting.xml                             |   41 +
 sale_reporting.py                                          |  109 ++
 sale_reporting.xml                                         |   41 +
 setup.py                                                   |  160 +++
 tests/__init__.py                                          |    2 +
 tests/scenario_marketing_campaign_sale.rst                 |  186 +++
 tests/test_module.py                                       |   12 +
 tests/test_scenario.py                                     |    8 +
 tox.ini                                                    |   17 +
 tryton.cfg                                                 |   15 +
 view/campaign_mixin_form.xml                               |   17 +
 view/parameter_form.xml                                    |    9 +
 view/parameter_list.xml                                    |    6 +
 view/sale_opportunity_reporting_context_form.xml           |   15 +
 view/sale_opportunity_reporting_marketing_context_form.xml |   25 +
 view/sale_opportunity_reporting_marketing_list.xml         |   11 +
 view/sale_reporting_context_form.xml                       |   15 +
 view/sale_reporting_marketing_context_form.xml             |   27 +
 view/sale_reporting_marketing_list.xml                     |   11 +
 37 files changed, 2085 insertions(+), 0 deletions(-)

diffs (2234 lines):

diff -r 000000000000 -r 773331648a15 .drone.yml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/.drone.yml        Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,78 @@
+clone:
+    hg:
+        image: plugins/hg
+        environment:
+            - HG_SHARE_POOL=/root/.cache/hg
+        volumes:
+            - cache:/root/.cache
+
+pipeline:
+    tox:
+        image: ${IMAGE}
+        environment:
+            - CFLAGS=-O0
+            - DB_CACHE=/cache
+            - TOX_TESTENV_PASSENV=CFLAGS DB_CACHE CI_BUILD_NUMBER 
CI_JOB_NUMBER CI_JOB_ID
+            - POSTGRESQL_URI=postgresql://postgres@postgresql:5432/
+        commands:
+            - echo "[extensions]" >> /root/.hgrc
+            - echo "hgext.share =" >> /root/.hgrc
+            - echo "[share]" >> /root/.hgrc
+            - echo "pool = /root/.cache/hg" >> /root/.hgrc
+            - pip install tox
+            - tox -e "${TOXENV}-${DATABASE}"
+        volumes:
+            - cache:/root/.cache
+    check_dist:
+        image: ${IMAGE}
+        commands:
+            - pip install twine
+            - python setup.py sdist
+            - twine check dist/*
+        volumes:
+            - cache:/root/.cache
+    check_doc:
+        image: ${IMAGE}
+        commands:
+            - pip install sphinx
+            - python -m sphinx -T -E -W -n -b html doc _build/html
+            - python -m sphinx -T -E -W -n -b linkcheck doc _build
+        volumes:
+            - cache:/root/.cache
+
+services:
+    postgresql:
+        image: postgres
+        environment:
+            - POSTGRES_HOST_AUTH_METHOD=trust
+        command: "-c fsync=off -c synchronous_commit=off -c 
full_page_writes=off"
+        when:
+            matrix:
+                DATABASE: postgresql
+
+matrix:
+    include:
+        - IMAGE: python:3.7
+          TOXENV: py37
+          DATABASE: sqlite
+        - IMAGE: python:3.7
+          TOXENV: py37
+          DATABASE: postgresql
+        - IMAGE: python:3.8
+          TOXENV: py38
+          DATABASE: sqlite
+        - IMAGE: python:3.8
+          TOXENV: py38
+          DATABASE: postgresql
+        - IMAGE: python:3.9
+          TOXENV: py39
+          DATABASE: sqlite
+        - IMAGE: python:3.9
+          TOXENV: py39
+          DATABASE: postgresql
+        - IMAGE: python:3.10
+          TOXENV: py310
+          DATABASE: sqlite
+        - IMAGE: python:3.10
+          TOXENV: py310
+          DATABASE: postgresql
diff -r 000000000000 -r 773331648a15 .flake8
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/.flake8   Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,2 @@
+[flake8]
+ignore=E123,E124,E126,E128,E741,W503
diff -r 000000000000 -r 773331648a15 .isort.cfg
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/.isort.cfg        Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,3 @@
+[settings]
+multi_line_output=4
+known_first_party=trytond
diff -r 000000000000 -r 773331648a15 COPYRIGHT
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/COPYRIGHT Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,15 @@
+Copyright (C) 2022 B2CK
+Copyright (C) 2022 Cédric Krier
+
+This program is free software: you can redistribute it and/or modify
+it under the terms of the GNU General Public License as published by
+the Free Software Foundation, either version 3 of the License, or
+(at your option) any later version.
+
+This program is distributed in the hope that it will be useful,
+but WITHOUT ANY WARRANTY; without even the implied warranty of
+MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+GNU General Public License for more details.
+
+You should have received a copy of the GNU General Public License
+along with this program.  If not, see <http://www.gnu.org/licenses/>.
diff -r 000000000000 -r 773331648a15 LICENSE
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/LICENSE   Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,674 @@
+                    GNU GENERAL PUBLIC LICENSE
+                       Version 3, 29 June 2007
+
+ Copyright (C) 2007 Free Software Foundation, Inc. <http://fsf.org/>
+ Everyone is permitted to copy and distribute verbatim copies
+ of this license document, but changing it is not allowed.
+
+                            Preamble
+
+  The GNU General Public License is a free, copyleft license for
+software and other kinds of works.
+
+  The licenses for most software and other practical works are designed
+to take away your freedom to share and change the works.  By contrast,
+the GNU General Public License is intended to guarantee your freedom to
+share and change all versions of a program--to make sure it remains free
+software for all its users.  We, the Free Software Foundation, use the
+GNU General Public License for most of our software; it applies also to
+any other work released this way by its authors.  You can apply it to
+your programs, too.
+
+  When we speak of free software, we are referring to freedom, not
+price.  Our General Public Licenses are designed to make sure that you
+have the freedom to distribute copies of free software (and charge for
+them if you wish), that you receive source code or can get it if you
+want it, that you can change the software or use pieces of it in new
+free programs, and that you know you can do these things.
+
+  To protect your rights, we need to prevent others from denying you
+these rights or asking you to surrender the rights.  Therefore, you have
+certain responsibilities if you distribute copies of the software, or if
+you modify it: responsibilities to respect the freedom of others.
+
+  For example, if you distribute copies of such a program, whether
+gratis or for a fee, you must pass on to the recipients the same
+freedoms that you received.  You must make sure that they, too, receive
+or can get the source code.  And you must show them these terms so they
+know their rights.
+
+  Developers that use the GNU GPL protect your rights with two steps:
+(1) assert copyright on the software, and (2) offer you this License
+giving you legal permission to copy, distribute and/or modify it.
+
+  For the developers' and authors' protection, the GPL clearly explains
+that there is no warranty for this free software.  For both users' and
+authors' sake, the GPL requires that modified versions be marked as
+changed, so that their problems will not be attributed erroneously to
+authors of previous versions.
+
+  Some devices are designed to deny users access to install or run
+modified versions of the software inside them, although the manufacturer
+can do so.  This is fundamentally incompatible with the aim of
+protecting users' freedom to change the software.  The systematic
+pattern of such abuse occurs in the area of products for individuals to
+use, which is precisely where it is most unacceptable.  Therefore, we
+have designed this version of the GPL to prohibit the practice for those
+products.  If such problems arise substantially in other domains, we
+stand ready to extend this provision to those domains in future versions
+of the GPL, as needed to protect the freedom of users.
+
+  Finally, every program is threatened constantly by software patents.
+States should not allow patents to restrict development and use of
+software on general-purpose computers, but in those that do, we wish to
+avoid the special danger that patents applied to a free program could
+make it effectively proprietary.  To prevent this, the GPL assures that
+patents cannot be used to render the program non-free.
+
+  The precise terms and conditions for copying, distribution and
+modification follow.
+
+                       TERMS AND CONDITIONS
+
+  0. Definitions.
+
+  "This License" refers to version 3 of the GNU General Public License.
+
+  "Copyright" also means copyright-like laws that apply to other kinds of
+works, such as semiconductor masks.
+
+  "The Program" refers to any copyrightable work licensed under this
+License.  Each licensee is addressed as "you".  "Licensees" and
+"recipients" may be individuals or organizations.
+
+  To "modify" a work means to copy from or adapt all or part of the work
+in a fashion requiring copyright permission, other than the making of an
+exact copy.  The resulting work is called a "modified version" of the
+earlier work or a work "based on" the earlier work.
+
+  A "covered work" means either the unmodified Program or a work based
+on the Program.
+
+  To "propagate" a work means to do anything with it that, without
+permission, would make you directly or secondarily liable for
+infringement under applicable copyright law, except executing it on a
+computer or modifying a private copy.  Propagation includes copying,
+distribution (with or without modification), making available to the
+public, and in some countries other activities as well.
+
+  To "convey" a work means any kind of propagation that enables other
+parties to make or receive copies.  Mere interaction with a user through
+a computer network, with no transfer of a copy, is not conveying.
+
+  An interactive user interface displays "Appropriate Legal Notices"
+to the extent that it includes a convenient and prominently visible
+feature that (1) displays an appropriate copyright notice, and (2)
+tells the user that there is no warranty for the work (except to the
+extent that warranties are provided), that licensees may convey the
+work under this License, and how to view a copy of this License.  If
+the interface presents a list of user commands or options, such as a
+menu, a prominent item in the list meets this criterion.
+
+  1. Source Code.
+
+  The "source code" for a work means the preferred form of the work
+for making modifications to it.  "Object code" means any non-source
+form of a work.
+
+  A "Standard Interface" means an interface that either is an official
+standard defined by a recognized standards body, or, in the case of
+interfaces specified for a particular programming language, one that
+is widely used among developers working in that language.
+
+  The "System Libraries" of an executable work include anything, other
+than the work as a whole, that (a) is included in the normal form of
+packaging a Major Component, but which is not part of that Major
+Component, and (b) serves only to enable use of the work with that
+Major Component, or to implement a Standard Interface for which an
+implementation is available to the public in source code form.  A
+"Major Component", in this context, means a major essential component
+(kernel, window system, and so on) of the specific operating system
+(if any) on which the executable work runs, or a compiler used to
+produce the work, or an object code interpreter used to run it.
+
+  The "Corresponding Source" for a work in object code form means all
+the source code needed to generate, install, and (for an executable
+work) run the object code and to modify the work, including scripts to
+control those activities.  However, it does not include the work's
+System Libraries, or general-purpose tools or generally available free
+programs which are used unmodified in performing those activities but
+which are not part of the work.  For example, Corresponding Source
+includes interface definition files associated with source files for
+the work, and the source code for shared libraries and dynamically
+linked subprograms that the work is specifically designed to require,
+such as by intimate data communication or control flow between those
+subprograms and other parts of the work.
+
+  The Corresponding Source need not include anything that users
+can regenerate automatically from other parts of the Corresponding
+Source.
+
+  The Corresponding Source for a work in source code form is that
+same work.
+
+  2. Basic Permissions.
+
+  All rights granted under this License are granted for the term of
+copyright on the Program, and are irrevocable provided the stated
+conditions are met.  This License explicitly affirms your unlimited
+permission to run the unmodified Program.  The output from running a
+covered work is covered by this License only if the output, given its
+content, constitutes a covered work.  This License acknowledges your
+rights of fair use or other equivalent, as provided by copyright law.
+
+  You may make, run and propagate covered works that you do not
+convey, without conditions so long as your license otherwise remains
+in force.  You may convey covered works to others for the sole purpose
+of having them make modifications exclusively for you, or provide you
+with facilities for running those works, provided that you comply with
+the terms of this License in conveying all material for which you do
+not control copyright.  Those thus making or running the covered works
+for you must do so exclusively on your behalf, under your direction
+and control, on terms that prohibit them from making any copies of
+your copyrighted material outside their relationship with you.
+
+  Conveying under any other circumstances is permitted solely under
+the conditions stated below.  Sublicensing is not allowed; section 10
+makes it unnecessary.
+
+  3. Protecting Users' Legal Rights From Anti-Circumvention Law.
+
+  No covered work shall be deemed part of an effective technological
+measure under any applicable law fulfilling obligations under article
+11 of the WIPO copyright treaty adopted on 20 December 1996, or
+similar laws prohibiting or restricting circumvention of such
+measures.
+
+  When you convey a covered work, you waive any legal power to forbid
+circumvention of technological measures to the extent such circumvention
+is effected by exercising rights under this License with respect to
+the covered work, and you disclaim any intention to limit operation or
+modification of the work as a means of enforcing, against the work's
+users, your or third parties' legal rights to forbid circumvention of
+technological measures.
+
+  4. Conveying Verbatim Copies.
+
+  You may convey verbatim copies of the Program's source code as you
+receive it, in any medium, provided that you conspicuously and
+appropriately publish on each copy an appropriate copyright notice;
+keep intact all notices stating that this License and any
+non-permissive terms added in accord with section 7 apply to the code;
+keep intact all notices of the absence of any warranty; and give all
+recipients a copy of this License along with the Program.
+
+  You may charge any price or no price for each copy that you convey,
+and you may offer support or warranty protection for a fee.
+
+  5. Conveying Modified Source Versions.
+
+  You may convey a work based on the Program, or the modifications to
+produce it from the Program, in the form of source code under the
+terms of section 4, provided that you also meet all of these conditions:
+
+    a) The work must carry prominent notices stating that you modified
+    it, and giving a relevant date.
+
+    b) The work must carry prominent notices stating that it is
+    released under this License and any conditions added under section
+    7.  This requirement modifies the requirement in section 4 to
+    "keep intact all notices".
+
+    c) You must license the entire work, as a whole, under this
+    License to anyone who comes into possession of a copy.  This
+    License will therefore apply, along with any applicable section 7
+    additional terms, to the whole of the work, and all its parts,
+    regardless of how they are packaged.  This License gives no
+    permission to license the work in any other way, but it does not
+    invalidate such permission if you have separately received it.
+
+    d) If the work has interactive user interfaces, each must display
+    Appropriate Legal Notices; however, if the Program has interactive
+    interfaces that do not display Appropriate Legal Notices, your
+    work need not make them do so.
+
+  A compilation of a covered work with other separate and independent
+works, which are not by their nature extensions of the covered work,
+and which are not combined with it such as to form a larger program,
+in or on a volume of a storage or distribution medium, is called an
+"aggregate" if the compilation and its resulting copyright are not
+used to limit the access or legal rights of the compilation's users
+beyond what the individual works permit.  Inclusion of a covered work
+in an aggregate does not cause this License to apply to the other
+parts of the aggregate.
+
+  6. Conveying Non-Source Forms.
+
+  You may convey a covered work in object code form under the terms
+of sections 4 and 5, provided that you also convey the
+machine-readable Corresponding Source under the terms of this License,
+in one of these ways:
+
+    a) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by the
+    Corresponding Source fixed on a durable physical medium
+    customarily used for software interchange.
+
+    b) Convey the object code in, or embodied in, a physical product
+    (including a physical distribution medium), accompanied by a
+    written offer, valid for at least three years and valid for as
+    long as you offer spare parts or customer support for that product
+    model, to give anyone who possesses the object code either (1) a
+    copy of the Corresponding Source for all the software in the
+    product that is covered by this License, on a durable physical
+    medium customarily used for software interchange, for a price no
+    more than your reasonable cost of physically performing this
+    conveying of source, or (2) access to copy the
+    Corresponding Source from a network server at no charge.
+
+    c) Convey individual copies of the object code with a copy of the
+    written offer to provide the Corresponding Source.  This
+    alternative is allowed only occasionally and noncommercially, and
+    only if you received the object code with such an offer, in accord
+    with subsection 6b.
+
+    d) Convey the object code by offering access from a designated
+    place (gratis or for a charge), and offer equivalent access to the
+    Corresponding Source in the same way through the same place at no
+    further charge.  You need not require recipients to copy the
+    Corresponding Source along with the object code.  If the place to
+    copy the object code is a network server, the Corresponding Source
+    may be on a different server (operated by you or a third party)
+    that supports equivalent copying facilities, provided you maintain
+    clear directions next to the object code saying where to find the
+    Corresponding Source.  Regardless of what server hosts the
+    Corresponding Source, you remain obligated to ensure that it is
+    available for as long as needed to satisfy these requirements.
+
+    e) Convey the object code using peer-to-peer transmission, provided
+    you inform other peers where the object code and Corresponding
+    Source of the work are being offered to the general public at no
+    charge under subsection 6d.
+
+  A separable portion of the object code, whose source code is excluded
+from the Corresponding Source as a System Library, need not be
+included in conveying the object code work.
+
+  A "User Product" is either (1) a "consumer product", which means any
+tangible personal property which is normally used for personal, family,
+or household purposes, or (2) anything designed or sold for incorporation
+into a dwelling.  In determining whether a product is a consumer product,
+doubtful cases shall be resolved in favor of coverage.  For a particular
+product received by a particular user, "normally used" refers to a
+typical or common use of that class of product, regardless of the status
+of the particular user or of the way in which the particular user
+actually uses, or expects or is expected to use, the product.  A product
+is a consumer product regardless of whether the product has substantial
+commercial, industrial or non-consumer uses, unless such uses represent
+the only significant mode of use of the product.
+
+  "Installation Information" for a User Product means any methods,
+procedures, authorization keys, or other information required to install
+and execute modified versions of a covered work in that User Product from
+a modified version of its Corresponding Source.  The information must
+suffice to ensure that the continued functioning of the modified object
+code is in no case prevented or interfered with solely because
+modification has been made.
+
+  If you convey an object code work under this section in, or with, or
+specifically for use in, a User Product, and the conveying occurs as
+part of a transaction in which the right of possession and use of the
+User Product is transferred to the recipient in perpetuity or for a
+fixed term (regardless of how the transaction is characterized), the
+Corresponding Source conveyed under this section must be accompanied
+by the Installation Information.  But this requirement does not apply
+if neither you nor any third party retains the ability to install
+modified object code on the User Product (for example, the work has
+been installed in ROM).
+
+  The requirement to provide Installation Information does not include a
+requirement to continue to provide support service, warranty, or updates
+for a work that has been modified or installed by the recipient, or for
+the User Product in which it has been modified or installed.  Access to a
+network may be denied when the modification itself materially and
+adversely affects the operation of the network or violates the rules and
+protocols for communication across the network.
+
+  Corresponding Source conveyed, and Installation Information provided,
+in accord with this section must be in a format that is publicly
+documented (and with an implementation available to the public in
+source code form), and must require no special password or key for
+unpacking, reading or copying.
+
+  7. Additional Terms.
+
+  "Additional permissions" are terms that supplement the terms of this
+License by making exceptions from one or more of its conditions.
+Additional permissions that are applicable to the entire Program shall
+be treated as though they were included in this License, to the extent
+that they are valid under applicable law.  If additional permissions
+apply only to part of the Program, that part may be used separately
+under those permissions, but the entire Program remains governed by
+this License without regard to the additional permissions.
+
+  When you convey a copy of a covered work, you may at your option
+remove any additional permissions from that copy, or from any part of
+it.  (Additional permissions may be written to require their own
+removal in certain cases when you modify the work.)  You may place
+additional permissions on material, added by you to a covered work,
+for which you have or can give appropriate copyright permission.
+
+  Notwithstanding any other provision of this License, for material you
+add to a covered work, you may (if authorized by the copyright holders of
+that material) supplement the terms of this License with terms:
+
+    a) Disclaiming warranty or limiting liability differently from the
+    terms of sections 15 and 16 of this License; or
+
+    b) Requiring preservation of specified reasonable legal notices or
+    author attributions in that material or in the Appropriate Legal
+    Notices displayed by works containing it; or
+
+    c) Prohibiting misrepresentation of the origin of that material, or
+    requiring that modified versions of such material be marked in
+    reasonable ways as different from the original version; or
+
+    d) Limiting the use for publicity purposes of names of licensors or
+    authors of the material; or
+
+    e) Declining to grant rights under trademark law for use of some
+    trade names, trademarks, or service marks; or
+
+    f) Requiring indemnification of licensors and authors of that
+    material by anyone who conveys the material (or modified versions of
+    it) with contractual assumptions of liability to the recipient, for
+    any liability that these contractual assumptions directly impose on
+    those licensors and authors.
+
+  All other non-permissive additional terms are considered "further
+restrictions" within the meaning of section 10.  If the Program as you
+received it, or any part of it, contains a notice stating that it is
+governed by this License along with a term that is a further
+restriction, you may remove that term.  If a license document contains
+a further restriction but permits relicensing or conveying under this
+License, you may add to a covered work material governed by the terms
+of that license document, provided that the further restriction does
+not survive such relicensing or conveying.
+
+  If you add terms to a covered work in accord with this section, you
+must place, in the relevant source files, a statement of the
+additional terms that apply to those files, or a notice indicating
+where to find the applicable terms.
+
+  Additional terms, permissive or non-permissive, may be stated in the
+form of a separately written license, or stated as exceptions;
+the above requirements apply either way.
+
+  8. Termination.
+
+  You may not propagate or modify a covered work except as expressly
+provided under this License.  Any attempt otherwise to propagate or
+modify it is void, and will automatically terminate your rights under
+this License (including any patent licenses granted under the third
+paragraph of section 11).
+
+  However, if you cease all violation of this License, then your
+license from a particular copyright holder is reinstated (a)
+provisionally, unless and until the copyright holder explicitly and
+finally terminates your license, and (b) permanently, if the copyright
+holder fails to notify you of the violation by some reasonable means
+prior to 60 days after the cessation.
+
+  Moreover, your license from a particular copyright holder is
+reinstated permanently if the copyright holder notifies you of the
+violation by some reasonable means, this is the first time you have
+received notice of violation of this License (for any work) from that
+copyright holder, and you cure the violation prior to 30 days after
+your receipt of the notice.
+
+  Termination of your rights under this section does not terminate the
+licenses of parties who have received copies or rights from you under
+this License.  If your rights have been terminated and not permanently
+reinstated, you do not qualify to receive new licenses for the same
+material under section 10.
+
+  9. Acceptance Not Required for Having Copies.
+
+  You are not required to accept this License in order to receive or
+run a copy of the Program.  Ancillary propagation of a covered work
+occurring solely as a consequence of using peer-to-peer transmission
+to receive a copy likewise does not require acceptance.  However,
+nothing other than this License grants you permission to propagate or
+modify any covered work.  These actions infringe copyright if you do
+not accept this License.  Therefore, by modifying or propagating a
+covered work, you indicate your acceptance of this License to do so.
+
+  10. Automatic Licensing of Downstream Recipients.
+
+  Each time you convey a covered work, the recipient automatically
+receives a license from the original licensors, to run, modify and
+propagate that work, subject to this License.  You are not responsible
+for enforcing compliance by third parties with this License.
+
+  An "entity transaction" is a transaction transferring control of an
+organization, or substantially all assets of one, or subdividing an
+organization, or merging organizations.  If propagation of a covered
+work results from an entity transaction, each party to that
+transaction who receives a copy of the work also receives whatever
+licenses to the work the party's predecessor in interest had or could
+give under the previous paragraph, plus a right to possession of the
+Corresponding Source of the work from the predecessor in interest, if
+the predecessor has it or can get it with reasonable efforts.
+
+  You may not impose any further restrictions on the exercise of the
+rights granted or affirmed under this License.  For example, you may
+not impose a license fee, royalty, or other charge for exercise of
+rights granted under this License, and you may not initiate litigation
+(including a cross-claim or counterclaim in a lawsuit) alleging that
+any patent claim is infringed by making, using, selling, offering for
+sale, or importing the Program or any portion of it.
+
+  11. Patents.
+
+  A "contributor" is a copyright holder who authorizes use under this
+License of the Program or a work on which the Program is based.  The
+work thus licensed is called the contributor's "contributor version".
+
+  A contributor's "essential patent claims" are all patent claims
+owned or controlled by the contributor, whether already acquired or
+hereafter acquired, that would be infringed by some manner, permitted
+by this License, of making, using, or selling its contributor version,
+but do not include claims that would be infringed only as a
+consequence of further modification of the contributor version.  For
+purposes of this definition, "control" includes the right to grant
+patent sublicenses in a manner consistent with the requirements of
+this License.
+
+  Each contributor grants you a non-exclusive, worldwide, royalty-free
+patent license under the contributor's essential patent claims, to
+make, use, sell, offer for sale, import and otherwise run, modify and
+propagate the contents of its contributor version.
+
+  In the following three paragraphs, a "patent license" is any express
+agreement or commitment, however denominated, not to enforce a patent
+(such as an express permission to practice a patent or covenant not to
+sue for patent infringement).  To "grant" such a patent license to a
+party means to make such an agreement or commitment not to enforce a
+patent against the party.
+
+  If you convey a covered work, knowingly relying on a patent license,
+and the Corresponding Source of the work is not available for anyone
+to copy, free of charge and under the terms of this License, through a
+publicly available network server or other readily accessible means,
+then you must either (1) cause the Corresponding Source to be so
+available, or (2) arrange to deprive yourself of the benefit of the
+patent license for this particular work, or (3) arrange, in a manner
+consistent with the requirements of this License, to extend the patent
+license to downstream recipients.  "Knowingly relying" means you have
+actual knowledge that, but for the patent license, your conveying the
+covered work in a country, or your recipient's use of the covered work
+in a country, would infringe one or more identifiable patents in that
+country that you have reason to believe are valid.
+
+  If, pursuant to or in connection with a single transaction or
+arrangement, you convey, or propagate by procuring conveyance of, a
+covered work, and grant a patent license to some of the parties
+receiving the covered work authorizing them to use, propagate, modify
+or convey a specific copy of the covered work, then the patent license
+you grant is automatically extended to all recipients of the covered
+work and works based on it.
+
+  A patent license is "discriminatory" if it does not include within
+the scope of its coverage, prohibits the exercise of, or is
+conditioned on the non-exercise of one or more of the rights that are
+specifically granted under this License.  You may not convey a covered
+work if you are a party to an arrangement with a third party that is
+in the business of distributing software, under which you make payment
+to the third party based on the extent of your activity of conveying
+the work, and under which the third party grants, to any of the
+parties who would receive the covered work from you, a discriminatory
+patent license (a) in connection with copies of the covered work
+conveyed by you (or copies made from those copies), or (b) primarily
+for and in connection with specific products or compilations that
+contain the covered work, unless you entered into that arrangement,
+or that patent license was granted, prior to 28 March 2007.
+
+  Nothing in this License shall be construed as excluding or limiting
+any implied license or other defenses to infringement that may
+otherwise be available to you under applicable patent law.
+
+  12. No Surrender of Others' Freedom.
+
+  If conditions are imposed on you (whether by court order, agreement or
+otherwise) that contradict the conditions of this License, they do not
+excuse you from the conditions of this License.  If you cannot convey a
+covered work so as to satisfy simultaneously your obligations under this
+License and any other pertinent obligations, then as a consequence you may
+not convey it at all.  For example, if you agree to terms that obligate you
+to collect a royalty for further conveying from those to whom you convey
+the Program, the only way you could satisfy both those terms and this
+License would be to refrain entirely from conveying the Program.
+
+  13. Use with the GNU Affero General Public License.
+
+  Notwithstanding any other provision of this License, you have
+permission to link or combine any covered work with a work licensed
+under version 3 of the GNU Affero General Public License into a single
+combined work, and to convey the resulting work.  The terms of this
+License will continue to apply to the part which is the covered work,
+but the special requirements of the GNU Affero General Public License,
+section 13, concerning interaction through a network will apply to the
+combination as such.
+
+  14. Revised Versions of this License.
+
+  The Free Software Foundation may publish revised and/or new versions of
+the GNU General Public License from time to time.  Such new versions will
+be similar in spirit to the present version, but may differ in detail to
+address new problems or concerns.
+
+  Each version is given a distinguishing version number.  If the
+Program specifies that a certain numbered version of the GNU General
+Public License "or any later version" applies to it, you have the
+option of following the terms and conditions either of that numbered
+version or of any later version published by the Free Software
+Foundation.  If the Program does not specify a version number of the
+GNU General Public License, you may choose any version ever published
+by the Free Software Foundation.
+
+  If the Program specifies that a proxy can decide which future
+versions of the GNU General Public License can be used, that proxy's
+public statement of acceptance of a version permanently authorizes you
+to choose that version for the Program.
+
+  Later license versions may give you additional or different
+permissions.  However, no additional obligations are imposed on any
+author or copyright holder as a result of your choosing to follow a
+later version.
+
+  15. Disclaimer of Warranty.
+
+  THERE IS NO WARRANTY FOR THE PROGRAM, TO THE EXTENT PERMITTED BY
+APPLICABLE LAW.  EXCEPT WHEN OTHERWISE STATED IN WRITING THE COPYRIGHT
+HOLDERS AND/OR OTHER PARTIES PROVIDE THE PROGRAM "AS IS" WITHOUT WARRANTY
+OF ANY KIND, EITHER EXPRESSED OR IMPLIED, INCLUDING, BUT NOT LIMITED TO,
+THE IMPLIED WARRANTIES OF MERCHANTABILITY AND FITNESS FOR A PARTICULAR
+PURPOSE.  THE ENTIRE RISK AS TO THE QUALITY AND PERFORMANCE OF THE PROGRAM
+IS WITH YOU.  SHOULD THE PROGRAM PROVE DEFECTIVE, YOU ASSUME THE COST OF
+ALL NECESSARY SERVICING, REPAIR OR CORRECTION.
+
+  16. Limitation of Liability.
+
+  IN NO EVENT UNLESS REQUIRED BY APPLICABLE LAW OR AGREED TO IN WRITING
+WILL ANY COPYRIGHT HOLDER, OR ANY OTHER PARTY WHO MODIFIES AND/OR CONVEYS
+THE PROGRAM AS PERMITTED ABOVE, BE LIABLE TO YOU FOR DAMAGES, INCLUDING ANY
+GENERAL, SPECIAL, INCIDENTAL OR CONSEQUENTIAL DAMAGES ARISING OUT OF THE
+USE OR INABILITY TO USE THE PROGRAM (INCLUDING BUT NOT LIMITED TO LOSS OF
+DATA OR DATA BEING RENDERED INACCURATE OR LOSSES SUSTAINED BY YOU OR THIRD
+PARTIES OR A FAILURE OF THE PROGRAM TO OPERATE WITH ANY OTHER PROGRAMS),
+EVEN IF SUCH HOLDER OR OTHER PARTY HAS BEEN ADVISED OF THE POSSIBILITY OF
+SUCH DAMAGES.
+
+  17. Interpretation of Sections 15 and 16.
+
+  If the disclaimer of warranty and limitation of liability provided
+above cannot be given local legal effect according to their terms,
+reviewing courts shall apply local law that most closely approximates
+an absolute waiver of all civil liability in connection with the
+Program, unless a warranty or assumption of liability accompanies a
+copy of the Program in return for a fee.
+
+                     END OF TERMS AND CONDITIONS
+
+            How to Apply These Terms to Your New Programs
+
+  If you develop a new program, and you want it to be of the greatest
+possible use to the public, the best way to achieve this is to make it
+free software which everyone can redistribute and change under these terms.
+
+  To do so, attach the following notices to the program.  It is safest
+to attach them to the start of each source file to most effectively
+state the exclusion of warranty; and each file should have at least
+the "copyright" line and a pointer to where the full notice is found.
+
+    <one line to give the program's name and a brief idea of what it does.>
+    Copyright (C) <year>  <name of author>
+
+    This program is free software: you can redistribute it and/or modify
+    it under the terms of the GNU General Public License as published by
+    the Free Software Foundation, either version 3 of the License, or
+    (at your option) any later version.
+
+    This program is distributed in the hope that it will be useful,
+    but WITHOUT ANY WARRANTY; without even the implied warranty of
+    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
+    GNU General Public License for more details.
+
+    You should have received a copy of the GNU General Public License
+    along with this program.  If not, see <http://www.gnu.org/licenses/>.
+
+Also add information on how to contact you by electronic and paper mail.
+
+  If the program does terminal interaction, make it output a short
+notice like this when it starts in an interactive mode:
+
+    <program>  Copyright (C) <year>  <name of author>
+    This program comes with ABSOLUTELY NO WARRANTY; for details type `show w'.
+    This is free software, and you are welcome to redistribute it
+    under certain conditions; type `show c' for details.
+
+The hypothetical commands `show w' and `show c' should show the appropriate
+parts of the General Public License.  Of course, your program's commands
+might be different; for a GUI interface, you would use an "about box".
+
+  You should also get your employer (if you work as a programmer) or school,
+if any, to sign a "copyright disclaimer" for the program, if necessary.
+For more information on this, and how to apply and follow the GNU GPL, see
+<http://www.gnu.org/licenses/>.
+
+  The GNU General Public License does not permit incorporating your program
+into proprietary programs.  If your program is a subroutine library, you
+may consider it more useful to permit linking proprietary applications with
+the library.  If this is what you want to do, use the GNU Lesser General
+Public License instead of this License.  But first, please read
+<http://www.gnu.org/philosophy/why-not-lgpl.html>.
diff -r 000000000000 -r 773331648a15 MANIFEST.in
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/MANIFEST.in       Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,5 @@
+include CHANGELOG
+include COPYRIGHT
+include LICENSE
+include README.rst
+graft doc
diff -r 000000000000 -r 773331648a15 README.rst
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/README.rst        Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,1 @@
+doc/index.rst
\ No newline at end of file
diff -r 000000000000 -r 773331648a15 __init__.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/__init__.py       Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,52 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+from trytond.pool import Pool
+
+try:
+    from trytond.modules.sale.sale_reporting import Abstract as SaleAbstract
+except ImportError:
+    SaleAbstract = None
+try:
+    from trytond.modules.sale_opportunity.opportunity_reporting import \
+        Abstract as OpportunityAbstract
+except ImportError:
+    OpportunityAbstract = None
+
+from . import marketing, sale, sale_opportunity_reporting, sale_reporting
+from .marketing import MarketingCampaignMixin, Parameter
+
+__all__ = ['register', 'Parameter', 'MarketingCampaignMixin']
+
+
+def register():
+    Pool.register(
+        marketing.Campaign,
+        marketing.Medium,
+        marketing.Source,
+        module='marketing_campaign', type_='model')
+    Pool.register(
+        sale.Sale,
+        sale_reporting.Context,
+        sale_reporting.MarketingContext,
+        sale_reporting.Marketing,
+        module='marketing_campaign', type_='model', depends=['sale'])
+    Pool.register(
+        sale.Opportunity,
+        sale_opportunity_reporting.Context,
+        sale_opportunity_reporting.MarketingContext,
+        sale_opportunity_reporting.Marketing,
+        module='marketing_campaign', type_='model',
+        depends=['sale_opportunity'])
+    Pool.register(
+        sale.POSSale,
+        module='marketing_campaign', type_='model', depends=['sale_point'])
+    if SaleAbstract:
+        Pool.register_mixin(
+            sale_reporting.AbstractMarketingCampaign, SaleAbstract,
+            module='marketing_campaign')
+    if OpportunityAbstract:
+        Pool.register_mixin(
+            sale_opportunity_reporting.AbstractMarketingCampaign,
+            OpportunityAbstract,
+            module='marketing_campaign')
diff -r 000000000000 -r 773331648a15 doc/conf.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/doc/conf.py       Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,61 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+modules_url = 'https://docs.tryton.org/projects/modules-{module}/en/{series}/'
+trytond_url = 'https://docs.tryton.org/projects/server/en/{series}/'
+
+
+def get_info():
+    import configparser
+    import os
+    import subprocess
+    import sys
+
+    module_dir = os.path.dirname(os.path.dirname(__file__))
+
+    config = configparser.ConfigParser()
+    config.read_file(open(os.path.join(module_dir, 'tryton.cfg')))
+    info = dict(config.items('tryton'))
+
+    result = subprocess.run(
+        [sys.executable, 'setup.py', '--name'],
+        stdout=subprocess.PIPE, check=True, cwd=module_dir)
+    info['name'] = result.stdout.decode('utf-8').strip()
+
+    result = subprocess.run(
+        [sys.executable, 'setup.py', '--version'],
+        stdout=subprocess.PIPE, check=True, cwd=module_dir)
+    version = result.stdout.decode('utf-8').strip()
+    if 'dev' in version:
+        info['series'] = 'latest'
+    else:
+        info['series'] = '.'.join(version.split('.', 2)[:2])
+
+    for key in {'depends', 'extras_depend'}:
+        info[key] = info.get(key, '').strip().splitlines()
+    info['modules'] = set(info['depends'] + info['extras_depend'])
+    info['modules'] -= {'ir', 'res'}
+
+    return info
+
+
+info = get_info()
+
+master_doc = 'index'
+project = info['name']
+release = version = info['series']
+default_role = 'ref'
+highlight_language = 'none'
+extensions = [
+    'sphinx.ext.intersphinx',
+    ]
+intersphinx_mapping = {
+    'trytond': (trytond_url.format(series=version), None),
+    }
+intersphinx_mapping.update({
+        m: (modules_url.format(
+                module=m.replace('_', '-'), series=version), None)
+        for m in info['modules']
+        })
+
+del get_info, info, modules_url, trytond_url
diff -r 000000000000 -r 773331648a15 doc/design.rst
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/doc/design.rst    Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,29 @@
+******
+Design
+******
+
+The *Marketing Campaign Module* introduces concepts useful to collect
+information about marketing campaigns.
+
+.. _model-marketing.campaign:
+
+Campaign
+========
+
+The *Campaign* concept stores the names of a specific product promotion or
+strategic campaign.
+
+.. _model-marketing.medium:
+
+Medium
+======
+
+The *Medium* concept stores the names of medium used, such as click or email.
+
+.. _model-marketing.source:
+
+Source
+======
+
+The *Source* concept stores the names to identify from where came the
+customers.
diff -r 000000000000 -r 773331648a15 doc/index.rst
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/doc/index.rst     Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,11 @@
+#########################
+Marketing Campaign Module
+#########################
+
+The *Marketing Campaign Module* helps collecting data about marketing 
campaigns.
+
+.. toctree::
+   :maxdepth: 2
+
+   design
+   reference
diff -r 000000000000 -r 773331648a15 doc/reference.rst
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/doc/reference.rst Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,34 @@
+*************
+API Reference
+*************
+
+Parameter
+=========
+
+.. class:: Parameter
+
+   The *Parameter* is a mixin_ to define marketing parameters like `Campaign
+   <model-marketing.campaign>`.
+
+.. classmethod:: Parameter.from_name(name[, create])
+
+   Return the parameter instance for the name.
+   If ``create`` is set and no instance is found, a new instance is created.
+
+Campaign
+========
+
+.. class:: MarketingCampaignMixin
+
+   The *MarketingCampaignMixin* is a mixin_ to add marketing parameters to a
+   :class:`~trytond:trytond.model.Model`.
+   They are filled by default using
+   the string value from the
+   :attr:`~trytond:trytond.transaction.Transaction.context` key of the same
+   name.
+
+.. classmethod:: MarketingCampaignMixin.marketing_campaign_fields
+
+   Yield the field names of the :class:`Parameter` fields.
+
+.. _mixin: https://en.wikipedia.org/wiki/Mixin
diff -r 000000000000 -r 773331648a15 marketing.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/marketing.py      Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,121 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+from sql.functions import Lower
+from sql.operators import Equal
+
+from trytond.i18n import lazy_gettext
+from trytond.model import (
+    DeactivableMixin, Exclude, Model, ModelSQL, ModelView, fields)
+from trytond.transaction import Transaction
+
+
+class Parameter(DeactivableMixin, ModelSQL, ModelView):
+
+    name = fields.Char("Name", required=True)
+
+    @classmethod
+    def __setup__(cls):
+        t = cls.__table__()
+        super().__setup__()
+        cls._sql_constraints += [
+            ('name_unique', Exclude(t, (Lower(t.name), Equal)),
+                'marketing_campaign.msg_parameter_name_unique'),
+            ]
+        # TODO: index on name
+
+    def get_rec_name(self, name):
+        return self.name.title()
+
+    @classmethod
+    def create(cls, vlist):
+        vlist = [v.copy() for v in vlist]
+        for values in vlist:
+            if values.get('name'):
+                values['name'] = values['name'].lower()
+        return super().create(vlist)
+
+    @classmethod
+    def write(cls, *args):
+        actions = iter(args)
+        args = []
+        for parameters, values in zip(actions, actions):
+            if values.get('name'):
+                values = values.copy()
+                values['name'] = values['name'].lower()
+            args.extend((parameters, values))
+        super().write(*args)
+
+    @classmethod
+    def from_name(cls, name, create=True):
+        name = name.strip().lower()
+        with Transaction().set_context(active_test=False):
+            records = cls.search([
+                    ('name', '=', name),
+                    ])
+        if records:
+            record, = records
+        elif create:
+            record = cls(name=name)
+            record.save()
+        else:
+            record = None
+        return record
+
+
+class Campaign(Parameter):
+    "Marketing Campaign"
+    __name__ = 'marketing.campaign'
+
+
+class Medium(Parameter):
+    "Marketing Medium"
+    __name__ = 'marketing.medium'
+
+
+class Source(Parameter):
+    "Marketing Source"
+    __name__ = 'marketing.source'
+
+
+class MarketingCampaignMixin(Model):
+
+    marketing_campaign = fields.Many2One(
+        'marketing.campaign',
+        lazy_gettext('marketing_campaign.msg_marketing_campaign'),
+        ondelete='RESTRICT')
+    marketing_medium = fields.Many2One(
+        'marketing.medium',
+        lazy_gettext('marketing_campaign.msg_marketing_medium'),
+        ondelete='RESTRICT')
+    marketing_source = fields.Many2One(
+        'marketing.source',
+        lazy_gettext('marketing_campaign.msg_marketing_source'),
+        ondelete='RESTRICT')
+
+    @classmethod
+    def marketing_campaign_fields(cls):
+        for fname, field in cls._fields.items():
+            if field._type == 'many2one':
+                Target = field.get_target()
+                if issubclass(Target, Parameter):
+                    yield fname
+
+    @classmethod
+    def default_get(cls, fields_names, with_rec_name=True):
+        transaction = Transaction()
+        context = transaction.context
+        default = super().default_get(
+            fields_names, with_rec_name=with_rec_name)
+        for fname in cls.marketing_campaign_fields():
+            if isinstance(context.get(fname), str) and not default.get(fname):
+                field = getattr(cls, fname)
+                Target = field.get_target()
+                target = Target.from_name(
+                    context[fname], not transaction.readonly)
+                if target:
+                    default[fname] = target.id
+                    if with_rec_name:
+                        default.setdefault(
+                            fname + '.', {})['rec_name'] = target.rec_name
+        return default
diff -r 000000000000 -r 773331648a15 marketing.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/marketing.xml     Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,103 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<tryton>
+    <data>
+        <record model="ir.ui.view" id="campaign_view_list">
+            <field name="model">marketing.campaign</field>
+            <field name="type">tree</field>
+            <field name="name">parameter_list</field>
+        </record>
+
+        <record model="ir.ui.view" id="campaign_view_form">
+            <field name="model">marketing.campaign</field>
+            <field name="type">form</field>
+            <field name="name">parameter_form</field>
+        </record>
+
+        <record model="ir.action.act_window" id="act_campaign_form">
+            <field name="name">Campaigns</field>
+            <field name="res_model">marketing.campaign</field>
+        </record>
+        <record model="ir.action.act_window.view" id="act_campaign_form_view1">
+            <field name="sequence" eval="10"/>
+            <field name="view" ref="campaign_view_list"/>
+            <field name="act_window" ref="act_campaign_form"/>
+        </record>
+        <record model="ir.action.act_window.view" id="act_campaign_form_view2">
+            <field name="sequence" eval="20"/>
+            <field name="view" ref="campaign_view_form"/>
+            <field name="act_window" ref="act_campaign_form"/>
+        </record>
+        <menuitem
+            parent="marketing.menu_marketing"
+            action="act_campaign_form"
+            sequence="50"
+            id="menu_campaign_form"/>
+
+        <record model="ir.ui.view" id="medium_view_list">
+            <field name="model">marketing.medium</field>
+            <field name="type">tree</field>
+            <field name="name">parameter_list</field>
+        </record>
+
+        <record model="ir.ui.view" id="medium_view_form">
+            <field name="model">marketing.medium</field>
+            <field name="type">form</field>
+            <field name="name">parameter_form</field>
+        </record>
+
+        <record model="ir.action.act_window" id="act_medium_form">
+            <field name="name">Mediums</field>
+            <field name="res_model">marketing.medium</field>
+        </record>
+        <record model="ir.action.act_window.view" id="act_medium_form_view1">
+            <field name="sequence" eval="10"/>
+            <field name="view" ref="medium_view_list"/>
+            <field name="act_window" ref="act_medium_form"/>
+        </record>
+        <record model="ir.action.act_window.view" id="act_medium_form_view2">
+            <field name="sequence" eval="20"/>
+            <field name="view" ref="medium_view_form"/>
+            <field name="act_window" ref="act_medium_form"/>
+        </record>
+        <menuitem
+            parent="marketing.menu_marketing"
+            action="act_medium_form"
+            sequence="50"
+            id="menu_medium_form"/>
+
+        <record model="ir.ui.view" id="source_view_list">
+            <field name="model">marketing.source</field>
+            <field name="type">tree</field>
+            <field name="name">parameter_list</field>
+        </record>
+
+        <record model="ir.ui.view" id="source_view_form">
+            <field name="model">marketing.source</field>
+            <field name="type">form</field>
+            <field name="name">parameter_form</field>
+        </record>
+
+        <record model="ir.action.act_window" id="act_source_form">
+            <field name="name">Sources</field>
+            <field name="res_model">marketing.source</field>
+        </record>
+        <record model="ir.action.act_window.view" id="act_source_form_view1">
+            <field name="sequence" eval="10"/>
+            <field name="view" ref="source_view_list"/>
+            <field name="act_window" ref="act_source_form"/>
+        </record>
+        <record model="ir.action.act_window.view" id="act_source_form_view2">
+            <field name="sequence" eval="20"/>
+            <field name="view" ref="source_view_form"/>
+            <field name="act_window" ref="act_source_form"/>
+        </record>
+        <menuitem
+            parent="marketing.menu_marketing"
+            action="act_source_form"
+            sequence="50"
+            id="menu_source_form"/>
+
+    </data>
+</tryton>
diff -r 000000000000 -r 773331648a15 message.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/message.xml       Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,19 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<tryton>
+    <data grouped="1">
+        <record model="ir.message" id="msg_parameter_name_unique">
+            <field name="text">Name of active marketing parameter must be 
unique.</field>
+        </record>
+        <record model="ir.message" id="msg_marketing_campaign">
+            <field name="text">Marketing Campaign</field>
+        </record>
+        <record model="ir.message" id="msg_marketing_medium">
+            <field name="text">Marketing Medium</field>
+        </record>
+        <record model="ir.message" id="msg_marketing_source">
+            <field name="text">Marketing Source</field>
+        </record>
+    </data>
+</tryton>
diff -r 000000000000 -r 773331648a15 sale.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sale.py   Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,26 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+from trytond.pool import PoolMeta
+
+from .marketing import MarketingCampaignMixin, Parameter
+
+
+class Sale(MarketingCampaignMixin, metaclass=PoolMeta):
+    __name__ = 'sale.sale'
+
+
+class Opportunity(MarketingCampaignMixin, metaclass=PoolMeta):
+    __name__ = 'sale.opportunity'
+
+    def _get_sale_opportunity(self):
+        sale = super()._get_sale_opportunity()
+        for fname, field in self._fields.items():
+            if (field._type == 'many2one'
+                    and isinstance(field.get_target(), Parameter)):
+                setattr(sale, fname, getattr(self, fname))
+        return sale
+
+
+class POSSale(MarketingCampaignMixin, metaclass=PoolMeta):
+    __name__ = 'sale.point.sale'
diff -r 000000000000 -r 773331648a15 sale.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sale.xml  Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,26 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<tryton>
+    <data depends="sale">
+        <record model="ir.ui.view" id="sale_sale_view_form">
+            <field name="model">sale.sale</field>
+            <field name="inherit" ref="sale.sale_view_form"/>
+            <field name="name">campaign_mixin_form</field>
+        </record>
+    </data>
+    <data depends="sale_opportunity">
+        <record model="ir.ui.view" id="sale_opportunity_view_form">
+            <field name="model">sale.opportunity</field>
+            <field name="inherit" 
ref="sale_opportunity.opportunity_view_form"/>
+            <field name="name">campaign_mixin_form</field>
+        </record>
+    </data>
+    <data depends="sale_point">
+        <record model="ir.ui.view" id="sale_point_sale_view_form">
+            <field name="model">sale.point.sale</field>
+            <field name="inherit" ref="sale_point.sale_view_form"/>
+            <field name="name">campaign_mixin_form</field>
+        </record>
+    </data>
+</tryton>
diff -r 000000000000 -r 773331648a15 sale_opportunity_reporting.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sale_opportunity_reporting.py     Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,98 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+from sql import Column, Literal
+
+from trytond.i18n import lazy_gettext
+from trytond.model import ModelView, fields
+from trytond.pool import Pool, PoolMeta
+from trytond.transaction import Transaction
+
+try:
+    from trytond.modules.sale_opportunity.opportunity_reporting import Abstract
+    from trytond.modules.sale_opportunity.opportunity_reporting import \
+        Context as BaseContext
+except ImportError:
+    Abstract = object
+    BaseContext = object
+
+from .marketing import MarketingCampaignMixin
+
+
+class AbstractMarketingCampaign:
+    __slots__ = ()
+
+    @classmethod
+    def _marketing_campaign_fields(cls):
+        pool = Pool()
+        Context = pool.get('sale.opportunity.reporting.context')
+        if hasattr(Context, 'marketing_campaign_fields'):
+            yield from Context.marketing_campaign_fields()
+
+    @classmethod
+    def _columns(cls, tables, withs):
+        context = Transaction().context
+        opportunity = tables['opportunity']
+        return super()._columns(tables, withs) + [
+            (Column(opportunity, fname)
+                if context.get('group_by_%s' % fname)
+                else Literal(None)).as_(fname)
+            for fname in cls._marketing_campaign_fields()]
+
+    @classmethod
+    def _where(cls, tables, withs):
+        context = Transaction().context
+        where = super()._where(tables, withs)
+        opportunity = tables['opportunity']
+        for fname in cls._marketing_campaign_fields():
+            value = context.get(fname)
+            if value:
+                where &= Column(opportunity, fname) == value
+        return where
+
+
+class Context(MarketingCampaignMixin, metaclass=PoolMeta):
+    __name__ = 'sale.opportunity.reporting.context'
+
+    @classmethod
+    def default_get(cls, fields_names, with_rec_name=True):
+        transaction = Transaction()
+        context = transaction.context
+        default = super().default_get(
+            fields_names, with_rec_name=with_rec_name)
+        for fname in cls.marketing_campaign_fields():
+            if isinstance(context.get(fname), (int, float)):
+                default.setdefault(fname, int(context[fname]))
+        return default
+
+
+class MarketingContext(BaseContext):
+    "Sale Opportunity Reporting Context"
+    __name__ = 'sale.opportunity.reporting.marketing.context'
+
+    group_by_marketing_campaign = fields.Boolean(
+        lazy_gettext('marketing_campaign.msg_marketing_campaign'))
+    group_by_marketing_medium = fields.Boolean(
+        lazy_gettext('marketing_campaign.msg_marketing_medium'))
+    group_by_marketing_source = fields.Boolean(
+        lazy_gettext('marketing_campaign.msg_marketing_source'))
+
+
+class Marketing(MarketingCampaignMixin, Abstract, ModelView):
+    "Sale Opportunity Reporting per Marketing"
+    __name__ = 'sale.opportunity.reporting.marketing'
+
+    @classmethod
+    def _group_by(cls, tables, withs):
+        context = Transaction().context
+        opportunity = tables['opportunity']
+        return super()._group_by(tables, withs) + [
+            Column(opportunity, fname).as_(fname)
+            for fname in cls._marketing_campaign_fields()
+            if context.get('group_by_%s' % fname)]
+
+    def get_rec_name(self, name):
+        return ', '.join(
+            getattr(self, fname).rec_name
+            for fname in self._marketing_campaign_fields()
+            if getattr(self, fname))
diff -r 000000000000 -r 773331648a15 sale_opportunity_reporting.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sale_opportunity_reporting.xml    Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,41 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<tryton>
+    <data depends="sale_opportunity">
+        <record model="ir.ui.view" 
id="sale_opportunity_reporting_context_view_form">
+            <field name="model">sale.opportunity.reporting.context</field>
+            <field name="inherit" 
ref="sale_opportunity.reporting_context_view_form"/>
+            <field name="name">sale_opportunity_reporting_context_form</field>
+        </record>
+
+        <record model="ir.ui.view" 
id="sale_opportunity_reporting_marketing_context_view_form">
+            <field 
name="model">sale.opportunity.reporting.marketing.context</field>
+            <field name="type">form</field>
+            <field 
name="name">sale_opportunity_reporting_marketing_context_form</field>
+        </record>
+
+        <record model="ir.ui.view" 
id="sale_opportunity_reporting_marketing_view_list">
+            <field name="model">sale.opportunity.reporting.marketing</field>
+            <field name="type" eval="None"/>
+            <field name="inherit" 
ref="sale_opportunity.reporting_main_view_list"/>
+            <field 
name="name">sale_opportunity_reporting_marketing_list</field>
+        </record>
+
+        <record model="ir.action.act_window" 
id="act_sale_opportunity_reporting_marketing">
+            <field name="name">Opportunities per Marketing</field>
+            <field 
name="res_model">sale.opportunity.reporting.marketing</field>
+            <field 
name="context_model">sale.opportunity.reporting.marketing.context</field>
+        </record>
+        <record model="ir.action.act_window.view" 
id="act_sale_opportunity_reporting_marketing_view1">
+            <field name="sequence" eval="10"/>
+            <field name="view" 
ref="sale_opportunity_reporting_marketing_view_list"/>
+            <field name="act_window" 
ref="act_sale_opportunity_reporting_marketing"/>
+        </record>
+        <record model="ir.action.keyword" 
id="act_sale_opportunity_reporting_marketing_keyword1">
+            <field name="keyword">tree_open</field>
+            <field name="model" 
ref="sale_opportunity.menu_reporting_opportunity"/>
+            <field name="action" 
ref="act_sale_opportunity_reporting_marketing"/>
+        </record>
+    </data>
+</tryton>
diff -r 000000000000 -r 773331648a15 sale_reporting.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sale_reporting.py Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,109 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+from sql import Column, Literal
+
+from trytond.i18n import lazy_gettext
+from trytond.model import ModelView, fields
+from trytond.pool import Pool, PoolMeta
+from trytond.transaction import Transaction
+
+try:
+    from trytond.modules.sale.sale_reporting import Abstract
+    from trytond.modules.sale.sale_reporting import Context as BaseContext
+except ImportError:
+    Abstract = object
+    BaseContext = object
+
+from .marketing import MarketingCampaignMixin
+
+
+class AbstractMarketingCampaign:
+    __slots__ = ()
+
+    @classmethod
+    def _marketing_campaign_fields(cls):
+        pool = Pool()
+        Context = pool.get('sale.reporting.context')
+        if hasattr(Context, 'marketing_campaign_fields'):
+            yield from Context.marketing_campaign_fields()
+
+    @classmethod
+    def _sale_line_columns(cls, line, sale):
+        return super()._sale_line_columns(line, sale) + [
+            Column(sale, fname).as_(fname)
+            for fname in cls._marketing_campaign_fields()]
+
+    @classmethod
+    def _pos_sale_line_columns(cls, line, point, sale, currency):
+        return super()._pos_sale_line_columns(line, point, sale, currency) + [
+            Column(sale, fname).as_(fname)
+            for fname in cls._marketing_campaign_fields()]
+
+    @classmethod
+    def _where(cls, tables, withs):
+        context = Transaction().context
+        where = super()._where(tables, withs)
+        line = tables['line']
+        for fname in cls._marketing_campaign_fields():
+            value = context.get(fname)
+            if value:
+                where &= Column(line, fname) == value
+        return where
+
+
+class Context(MarketingCampaignMixin, metaclass=PoolMeta):
+    __name__ = 'sale.reporting.context'
+
+    @classmethod
+    def default_get(cls, fields_names, with_rec_name=True):
+        transaction = Transaction()
+        context = transaction.context
+        default = super().default_get(
+            fields_names, with_rec_name=with_rec_name)
+        for fname in cls.marketing_campaign_fields():
+            if isinstance(context.get(fname), (int, float)):
+                default.setdefault(fname, int(context[fname]))
+        return default
+
+
+class MarketingContext(BaseContext):
+    "Sale Reporting Context"
+    __name__ = 'sale.reporting.marketing.context'
+
+    group_by_marketing_campaign = fields.Boolean(
+        lazy_gettext('marketing_campaign.msg_marketing_campaign'))
+    group_by_marketing_medium = fields.Boolean(
+        lazy_gettext('marketing_campaign.msg_marketing_medium'))
+    group_by_marketing_source = fields.Boolean(
+        lazy_gettext('marketing_campaign.msg_marketing_source'))
+
+
+class Marketing(MarketingCampaignMixin, Abstract, ModelView):
+    "Sale Reporting per Marketing"
+    __name__ = 'sale.reporting.marketing'
+
+    @classmethod
+    def _columns(cls, tables, withs):
+        context = Transaction().context
+        line = tables['line']
+        return super()._columns(tables, withs) + [
+            (Column(line, fname)
+                if context.get('group_by_%s' % fname)
+                else Literal(None)).as_(fname)
+            for fname in cls._marketing_campaign_fields()]
+
+    @classmethod
+    def _group_by(cls, tables, withs):
+        context = Transaction().context
+        line = tables['line']
+        return super()._group_by(tables, withs) + [
+            Column(line, fname).as_(fname)
+            for fname in cls._marketing_campaign_fields()
+            if context.get('group_by_%s' % fname)]
+
+    def get_rec_name(self, name):
+        return ', '.join(
+            getattr(self, fname).rec_name
+            for fname in self._marketing_campaign_fields()
+            if getattr(self, fname))
diff -r 000000000000 -r 773331648a15 sale_reporting.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/sale_reporting.xml        Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,41 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<tryton>
+    <data depends="sale">
+        <record model="ir.ui.view" id="sale_reporting_context_view_form">
+            <field name="model">sale.reporting.context</field>
+            <field name="inherit" ref="sale.reporting_context_view_form"/>
+            <field name="name">sale_reporting_context_form</field>
+        </record>
+
+        <record model="ir.ui.view" 
id="sale_reporting_marketing_context_view_form">
+            <field name="model">sale.reporting.marketing.context</field>
+            <field name="type">form</field>
+            <field name="name">sale_reporting_marketing_context_form</field>
+        </record>
+
+        <record model="ir.ui.view" id="sale_reporting_marketing_view_list">
+            <field name="model">sale.reporting.marketing</field>
+            <field name="type" eval="None"/>
+            <field name="inherit" ref="sale.reporting_main_view_list"/>
+            <field name="name">sale_reporting_marketing_list</field>
+        </record>
+
+        <record model="ir.action.act_window" id="act_sale_reporting_marketing">
+            <field name="name">Sales per Marketing</field>
+            <field name="res_model">sale.reporting.marketing</field>
+            <field 
name="context_model">sale.reporting.marketing.context</field>
+        </record>
+        <record model="ir.action.act_window.view" 
id="act_sale_reporting_marketing_view1">
+            <field name="sequence" eval="10"/>
+            <field name="view" ref="sale_reporting_marketing_view_list"/>
+            <field name="act_window" ref="act_sale_reporting_marketing"/>
+        </record>
+        <record model="ir.action.keyword" 
id="act_sale_reporting_marketing_keyword1">
+            <field name="keyword">tree_open</field>
+            <field name="model" ref="sale.menu_reporting_sale"/>
+            <field name="action" ref="act_sale_reporting_marketing"/>
+        </record>
+    </data>
+</tryton>
diff -r 000000000000 -r 773331648a15 setup.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/setup.py  Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,160 @@
+#!/usr/bin/env python3
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+import io
+import os
+import re
+from configparser import ConfigParser
+
+from setuptools import find_packages, setup
+
+
+def read(fname):
+    content = io.open(
+        os.path.join(os.path.dirname(__file__), fname),
+        'r', encoding='utf-8').read()
+    content = re.sub(
+        r'(?m)^\.\. toctree::\r?\n((^$|^\s.*$)\r?\n)*', '', content)
+    return content
+
+
+def get_require_version(name):
+    if minor_version % 2:
+        require = '%s >= %s.%s.dev0, < %s.%s'
+    else:
+        require = '%s >= %s.%s, < %s.%s'
+    require %= (name, major_version, minor_version,
+        major_version, minor_version + 1)
+    return require
+
+
+config = ConfigParser()
+config.read_file(open(os.path.join(os.path.dirname(__file__), 'tryton.cfg')))
+info = dict(config.items('tryton'))
+for key in ('depends', 'extras_depend', 'xml'):
+    if key in info:
+        info[key] = info[key].strip().splitlines()
+version = info.get('version', '0.0.1')
+major_version, minor_version, _ = version.split('.', 2)
+major_version = int(major_version)
+minor_version = int(minor_version)
+name = 'trytond_marketing_campaign'
+
+download_url = 'http://downloads.tryton.org/%s.%s/' % (
+    major_version, minor_version)
+if minor_version % 2:
+    version = '%s.%s.dev0' % (major_version, minor_version)
+    download_url = (
+        'hg+http://hg.tryton.org/modules/%s#egg=%s-%s' % (
+            name[8:], name, version))
+
+local_version = []
+if os.environ.get('CI_JOB_ID'):
+    local_version.append(os.environ['CI_JOB_ID'])
+else:
+    for build in ['CI_BUILD_NUMBER', 'CI_JOB_NUMBER']:
+        if os.environ.get(build):
+            local_version.append(os.environ[build])
+        else:
+            local_version = []
+            break
+if local_version:
+    version += '+' + '.'.join(local_version)
+requires = ['python-sql']
+for dep in info.get('depends', []):
+    if not re.match(r'(ir|res)(\W|$)', dep):
+        requires.append(get_require_version('trytond_%s' % dep))
+requires.append(get_require_version('trytond'))
+
+tests_require = [
+    get_require_version('proteus'),
+    get_require_version('trytond_sale'),
+    get_require_version('trytond_sale_opportunity'),
+    get_require_version('trytond_sale_point'),
+    ]
+dependency_links = []
+if minor_version % 2:
+    dependency_links.append(
+        'https://trydevpi.tryton.org/?local_version='
+        + '.'.join(local_version)
+        )
+
+setup(name=name,
+    version=version,
+    description='Tryton module to manage marketing campaign',
+    long_description=read('README.rst'),
+    author='Tryton',
+    author_email='[email protected]',
+    url='http://www.tryton.org/',
+    download_url=download_url,
+    project_urls={
+        "Bug Tracker": 'https://bugs.tryton.org/',
+        "Documentation": (
+            'https://docs.tryton.org/projects/modules-marketing-campaign'),
+        "Forum": 'https://www.tryton.org/forum',
+        "Source Code": 'https://hg.tryton.org/modules/marketing_campaign',
+        },
+    keywords='tryton marketing campaign sale UTM',
+    package_dir={'trytond.modules.marketing_campaign': '.'},
+    packages=(
+        ['trytond.modules.marketing_campaign']
+        + ['trytond.modules.marketing_campaign.%s' % p
+            for p in find_packages()]
+        ),
+    package_data={
+        'trytond.modules.marketing_campaign': (info.get('xml', [])
+            + ['tryton.cfg', 'view/*.xml', 'locale/*.po', '*.fodt',
+                'icons/*.svg', 'tests/*.rst']),
+        },
+    classifiers=[
+        'Development Status :: 5 - Production/Stable',
+        'Environment :: Plugins',
+        'Framework :: Tryton',
+        'Intended Audience :: Developers',
+        'Intended Audience :: Financial and Insurance Industry',
+        'Intended Audience :: Legal Industry',
+        'License :: OSI Approved :: '
+        'GNU General Public License v3 or later (GPLv3+)',
+        'Natural Language :: Bulgarian',
+        'Natural Language :: Catalan',
+        'Natural Language :: Chinese (Simplified)',
+        'Natural Language :: Czech',
+        'Natural Language :: Dutch',
+        'Natural Language :: English',
+        'Natural Language :: Finnish',
+        'Natural Language :: French',
+        'Natural Language :: German',
+        'Natural Language :: Hungarian',
+        'Natural Language :: Indonesian',
+        'Natural Language :: Italian',
+        'Natural Language :: Persian',
+        'Natural Language :: Polish',
+        'Natural Language :: Portuguese (Brazilian)',
+        'Natural Language :: Romanian',
+        'Natural Language :: Russian',
+        'Natural Language :: Slovenian',
+        'Natural Language :: Spanish',
+        'Natural Language :: Turkish',
+        'Operating System :: OS Independent',
+        'Programming Language :: Python :: 3',
+        'Programming Language :: Python :: 3.7',
+        'Programming Language :: Python :: 3.8',
+        'Programming Language :: Python :: 3.9',
+        'Programming Language :: Python :: 3.10',
+        'Programming Language :: Python :: Implementation :: CPython',
+        'Topic :: Office/Business',
+        ],
+    license='GPL-3',
+    python_requires='>=3.7',
+    install_requires=requires,
+    extras_require={
+        'test': tests_require,
+        },
+    dependency_links=dependency_links,
+    zip_safe=False,
+    entry_points="""
+    [trytond.modules]
+    marketing_campaign = trytond.modules.marketing_campaign
+    """,  # noqa: E501
+    )
diff -r 000000000000 -r 773331648a15 tests/__init__.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/__init__.py Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,2 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
diff -r 000000000000 -r 773331648a15 tests/scenario_marketing_campaign_sale.rst
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/scenario_marketing_campaign_sale.rst        Sat Oct 01 15:12:38 
2022 +0200
@@ -0,0 +1,186 @@
+================================
+Marketing Campaign Sale Scenario
+================================
+
+Imports::
+
+    >>> from decimal import Decimal
+
+    >>> from proteus import Model, Wizard
+
+    >>> from trytond.modules.account.tests.tools import (
+    ...     create_fiscalyear, create_chart, get_accounts)
+    >>> from trytond.modules.account_invoice.tests.tools import (
+    ...     set_fiscalyear_invoice_sequences)
+    >>> from trytond.modules.company.tests.tools import (
+    ...     create_company, get_company)
+    >>> from trytond.tests.tools import activate_modules
+
+Activate modules::
+
+    >>> config = activate_modules(
+    ...     ['marketing_campaign', 'sale', 'sale_opportunity'])
+
+    >>> Category = Model.get('product.category')
+    >>> Employee = Model.get('company.employee')
+    >>> Opportunity = Model.get('sale.opportunity')
+    >>> Party = Model.get('party.party')
+    >>> ProductTemplate = Model.get('product.template')
+    >>> ProductUom = Model.get('product.uom')
+    >>> ReportingMain = Model.get('sale.reporting.main')
+    >>> ReportingMarketing = Model.get('sale.reporting.marketing')
+    >>> Sale = Model.get('sale.sale')
+
+Create company::
+
+    >>> _ = create_company()
+    >>> company = get_company()
+
+Create employee::
+
+    >>> employee = Employee(party=Party(name="Employee"))
+    >>> employee.party.save()
+    >>> employee.save()
+
+Create fiscal year::
+
+    >>> fiscalyear = set_fiscalyear_invoice_sequences(
+    ...     create_fiscalyear(company))
+    >>> fiscalyear.click('create_period')
+
+Create chart of accounts::
+
+    >>> _ = create_chart(company)
+    >>> accounts = get_accounts(company)
+
+Create party::
+
+    >>> customer = Party(name="Customer")
+    >>> customer.save()
+
+Create account category::
+
+    >>> account_category = Category(name="Account Category")
+    >>> account_category.accounting = True
+    >>> account_category.account_revenue = accounts['revenue']
+    >>> account_category.save()
+
+Create product::
+
+    >>> unit, = ProductUom.find([('name', '=', 'Unit')])
+
+    >>> template = ProductTemplate()
+    >>> template.name = "Product"
+    >>> template.default_uom = unit
+    >>> template.type = 'service'
+    >>> template.salable = True
+    >>> template.list_price = Decimal('10')
+    >>> template.account_category = account_category
+    >>> template.save()
+    >>> product, = template.products
+
+Create an opportunity and convert to sale::
+
+    >>> with config.set_context(
+    ...         marketing_campaign='campaign',
+    ...         marketing_medium='web',
+    ...         ):
+    ...     opportunity = Opportunity()
+    >>> opportunity.employee = employee
+    >>> opportunity.party = customer
+    >>> opportunity.address, = customer.addresses
+    >>> opportunity.amount = Decimal(100)
+    >>> line = opportunity.lines.new()
+    >>> line.product = product
+    >>> line.quantity = 10
+    >>> opportunity.save()
+
+    >>> opportunity.marketing_campaign.name
+    'campaign'
+    >>> opportunity.marketing_medium.name
+    'web'
+    >>> opportunity.marketing_source
+
+    >>> opportunity.click('opportunity')
+    >>> opportunity.state
+    'opportunity'
+    >>> opportunity.click('convert')
+    >>> opportunity.state
+    'converted'
+
+Check and confirm sale::
+
+    >>> sale, = opportunity.sales
+    >>> sale.marketing_campaign.name
+    'campaign'
+    >>> sale.marketing_medium.name
+    'web'
+    >>> sale.marketing_source
+    >>> sale.click('quote')
+    >>> sale.click('confirm')
+
+Create a second sale::
+
+    >>> with config.set_context(
+    ...         marketing_campaign='campaign',
+    ...         marketing_medium='phone',
+    ...         ):
+    ...     sale = Sale()
+    >>> sale.party = customer
+    >>> line = sale.lines.new()
+    >>> line.product = product
+    >>> line.quantity = 1
+    >>> sale.save()
+
+    >>> sale.marketing_campaign.name
+    'campaign'
+    >>> sale.marketing_medium.name
+    'phone'
+    >>> sale.marketing_source
+
+    >>> sale.click('quote')
+    >>> sale.click('confirm')
+
+Check sale reporting::
+
+    >>> report, = ReportingMain.find([])
+    >>> report.revenue == Decimal(110)
+    True
+
+    >>> with config.set_context(marketing_medium=sale.marketing_medium.id):
+    ...     report, = ReportingMain.find([])
+    >>> report.revenue == Decimal(10)
+    True
+
+    >>> report, = ReportingMarketing.find([])
+    >>> report.revenue == Decimal(110)
+    True
+    >>> report.marketing_campaign
+    >>> report.marketing_medium
+    >>> report.marketing_source
+
+    >>> with config.set_context(group_by_marketing_medium=True):
+    ...     reports = ReportingMarketing.find([])
+    >>> len(reports)
+    2
+    >>> sorted((r.marketing_medium.name, r.revenue) for r in reports) == (
+    ...     [('phone', Decimal(10)), ('web', Decimal(100))])
+    True
+
+    >>> with config.set_context(
+    ...         group_by_marketing_campaign=True,
+    ...         group_by_marketing_medium=True,
+    ...         ):
+    ...     reports = ReportingMarketing.find([])
+    >>> len(reports)
+    2
+    >>> sorted({r.marketing_campaign.name for r in reports})
+    ['campaign']
+    >>> sorted({r.marketing_medium.name for r in reports})
+    ['phone', 'web']
+
+    >>> with config.set_context(
+    ...         group_by_marketing_campaign=True,
+    ...         group_by_marketing_medium=False,
+    ...         ):
+    ...     report, = ReportingMarketing.find([])
diff -r 000000000000 -r 773331648a15 tests/test_module.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/test_module.py      Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,12 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+from trytond.tests.test_tryton import ModuleTestCase
+
+
+class MarketingCampaignTestCase(ModuleTestCase):
+    "Test Marketing Campaign module"
+    module = 'marketing_campaign'
+    extras = ['sale', 'sale_opportunity', 'sale_point']
+
+
+del ModuleTestCase
diff -r 000000000000 -r 773331648a15 tests/test_scenario.py
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tests/test_scenario.py    Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,8 @@
+# This file is part of Tryton.  The COPYRIGHT file at the top level of
+# this repository contains the full copyright notices and license terms.
+
+from trytond.tests.test_tryton import load_doc_tests
+
+
+def load_tests(*args, **kwargs):
+    return load_doc_tests(__name__, __file__, *args, **kwargs)
diff -r 000000000000 -r 773331648a15 tox.ini
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tox.ini   Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,17 @@
+[tox]
+envlist = {py37,py38,py39,py310}-{sqlite,postgresql}
+
+[testenv]
+extras = test
+commands =
+    coverage run --include=.*/marketing_campaign/* -m unittest discover -s 
tests
+    coverage report --include=.*/marketing_campaign/* --omit=*/tests/*
+deps =
+    coverage
+    postgresql: psycopg2 >= 2.7.0
+setenv =
+    sqlite: TRYTOND_DATABASE_URI={env:SQLITE_URI:sqlite://}
+    postgresql: TRYTOND_DATABASE_URI={env:POSTGRESQL_URI:postgresql://}
+    sqlite: DB_NAME={env:SQLITE_NAME::memory:}
+    postgresql: DB_NAME={env:POSTGRESQL_NAME:test}
+install_command = pip install --pre --find-links 
https://trydevpi.tryton.org/?local_version={env:CI_JOB_ID:{env:CI_BUILD_NUMBER:}.{env:CI_JOB_NUMBER:}}
 {opts} {packages}
diff -r 000000000000 -r 773331648a15 tryton.cfg
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/tryton.cfg        Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,15 @@
+[tryton]
+version=6.5.0
+depends:
+    ir
+    marketing
+extras_depend:
+    sale
+    sale_opportunity
+    sale_point
+xml:
+    marketing.xml
+    sale.xml
+    sale_reporting.xml
+    sale_opportunity_reporting.xml
+    message.xml
diff -r 000000000000 -r 773331648a15 view/campaign_mixin_form.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/campaign_mixin_form.xml      Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,17 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<data>
+    <xpath expr="/form/notebook" position="inside">
+        <page string="Marketing Campaign" id="marketing_campaign" col="2">
+            <label name="marketing_campaign" string="Campaign"/>
+            <field name="marketing_campaign"/>
+
+            <label name="marketing_medium" string="Medium"/>
+            <field name="marketing_medium"/>
+
+            <label name="marketing_source" string="Source"/>
+            <field name="marketing_source"/>
+        </page>
+    </xpath>
+</data>
diff -r 000000000000 -r 773331648a15 view/parameter_form.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/parameter_form.xml   Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,9 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<form>
+    <label name="name"/>
+    <field name="name"/>
+    <label name="active"/>
+    <field name="active"/>
+</form>
diff -r 000000000000 -r 773331648a15 view/parameter_list.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/parameter_list.xml   Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,6 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<tree>
+    <field name="rec_name" expand="1"/>
+</tree>
diff -r 000000000000 -r 773331648a15 
view/sale_opportunity_reporting_context_form.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/sale_opportunity_reporting_context_form.xml  Sat Oct 01 15:12:38 
2022 +0200
@@ -0,0 +1,15 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<data>
+    <xpath expr="/form" position="inside">
+        <group string="Marketing Campaign" id="marketing_campaign" 
expandable="0" col="-1" colspan="6">
+            <label name="marketing_campaign"/>
+            <field name="marketing_campaign"/>
+            <label name="marketing_medium"/>
+            <field name="marketing_medium"/>
+            <label name="marketing_source"/>
+            <field name="marketing_source"/>
+        </group>
+    </xpath>
+</data>
diff -r 000000000000 -r 773331648a15 
view/sale_opportunity_reporting_marketing_context_form.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/sale_opportunity_reporting_marketing_context_form.xml        Sat Oct 
01 15:12:38 2022 +0200
@@ -0,0 +1,25 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<form>
+    <label name="from_date"/>
+    <group id="dates" col="-1">
+        <field name="from_date"/>
+        <label name="to_date"/>
+        <field name="to_date"/>
+    </group>
+    <label name="period"/>
+    <field name="period"/>
+    <label name="company"/>
+    <field name="company"/>
+
+    <label string="Group by:" id="group_by"/>
+    <group colspan="3" col="-1" id="group_by">
+        <label name="group_by_marketing_campaign"/>
+        <field name="group_by_marketing_campaign" xexpand="0" width="25"/>
+        <label name="group_by_marketing_medium"/>
+        <field name="group_by_marketing_medium" xexpand="0" width="25"/>
+        <label name="group_by_marketing_source"/>
+        <field name="group_by_marketing_source" xexpand="0" width="25"/>
+    </group>
+</form>
diff -r 000000000000 -r 773331648a15 
view/sale_opportunity_reporting_marketing_list.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/sale_opportunity_reporting_marketing_list.xml        Sat Oct 01 
15:12:38 2022 +0200
@@ -0,0 +1,11 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<data>
+    <xpath expr="//field[@name='number']" position="before">
+        <field name="marketing_campaign" expand="1"/>
+        <field name="marketing_medium" expand="1"/>
+        <field name="marketing_source" expand="1"/>
+    </xpath>
+    <xpath expr="//field[contains(@name, 'trend')]" position="replace"></xpath>
+</data>
diff -r 000000000000 -r 773331648a15 view/sale_reporting_context_form.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/sale_reporting_context_form.xml      Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,15 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<data>
+    <xpath expr="/form" position="inside">
+        <group string="Marketing Campaign" id="marketing_campaign" 
expandable="0" col="-1" colspan="6">
+            <label name="marketing_campaign"/>
+            <field name="marketing_campaign"/>
+            <label name="marketing_medium"/>
+            <field name="marketing_medium"/>
+            <label name="marketing_source"/>
+            <field name="marketing_source"/>
+        </group>
+    </xpath>
+</data>
diff -r 000000000000 -r 773331648a15 
view/sale_reporting_marketing_context_form.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/sale_reporting_marketing_context_form.xml    Sat Oct 01 15:12:38 
2022 +0200
@@ -0,0 +1,27 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<form>
+    <label name="from_date"/>
+    <group id="dates" col="-1">
+        <field name="from_date"/>
+        <label name="to_date"/>
+        <field name="to_date"/>
+    </group>
+    <label name="period"/>
+    <field name="period"/>
+    <label name="company"/>
+    <field name="company"/>
+    <label name="warehouse"/>
+    <field name="warehouse"/>
+
+    <label string="Group by:" id="group_by"/>
+    <group colspan="3" col="-1" id="group_by">
+        <label name="group_by_marketing_campaign"/>
+        <field name="group_by_marketing_campaign" xexpand="0" width="25"/>
+        <label name="group_by_marketing_medium"/>
+        <field name="group_by_marketing_medium" xexpand="0" width="25"/>
+        <label name="group_by_marketing_source"/>
+        <field name="group_by_marketing_source" xexpand="0" width="25"/>
+    </group>
+</form>
diff -r 000000000000 -r 773331648a15 view/sale_reporting_marketing_list.xml
--- /dev/null   Thu Jan 01 00:00:00 1970 +0000
+++ b/view/sale_reporting_marketing_list.xml    Sat Oct 01 15:12:38 2022 +0200
@@ -0,0 +1,11 @@
+<?xml version="1.0"?>
+<!-- This file is part of Tryton.  The COPYRIGHT file at the top level of
+this repository contains the full copyright notices and license terms. -->
+<data>
+    <xpath expr="//field[@name='number']" position="before">
+        <field name="marketing_campaign" expand="1"/>
+        <field name="marketing_medium" expand="1"/>
+        <field name="marketing_source" expand="1"/>
+    </xpath>
+    <xpath expr="//field[@name='revenue_trend']" position="replace"></xpath>
+</data>


Reply via email to