Implement a shiny module that adds ReportCards to Report

[kpagacz]

linked to insightsengineering/NEST-roadmap#11

Marked add_report_card_server and add_report_card_ui on the diagram: https://app.diagrams.net/#G1MOUaQWakvtz0D_S6VlhHY8j8qzDu1qCW

This task includes implementing two functions returning the said shiny modules. It does not include creating a module for rendering or storing a report.

Its functionality should be limited to just adding a ReportCard object to Report. Here are some wireframes specifying what it should look like: https://balsamiq.cloud/st5j94y/pkhl0a6/r80A7

A general idea is:

• from the UI perspective - a button that opens a modal with a question for confirmation of adding a report card and optionally additional information passed to the ReportCard (OOP instance) (comments? etc...)
• from the server perspective - it should add a copy of the ReportCard (OOP instance) object to Report (singleton instance).

Each teal module in the app (like tm_g_scatterplot, tm_crosstable, .. ) shares the Report (singleton instance).
And each teal module will have in the server/ui part this (addCard) module. The server part will be reactive to the UI part and will add a new ReportCard (OOP instance) to the Report (singleton instance).

The UI part is located in each teal module UI/(or one global), and has to be conditional. So if we are not using the Reporter the UI should not be included. Button per each module seems to be a better choice?

UI:

Design: https://getbootstrap.com/docs/4.0/components/modal/#modal-components

Server (snippet) - idea:

    # inside tm_g_   server 
    # observe addCard ui clicked
    observe 
    {
    CustomreportCard <- NESTreportCard$new() # vs BASEreportCard (object, title and footnote)
    CustomreportCard$add_plot(plot_r(), plot_height = NULL, plot_width = NULL) # reactive
    CustomreportCard$add_title(title = "Custom per module title")

    # it will add comment to CustomreportCard
    # add card to reporter (singleton instance)
    srv_addbutton(
      reporter,
      CustomreportCard
    )
   }

Edit: @Polkas