15.1.636. tablet_qt/tasks/chit.cpp

/*
    Copyright (C) 2012, University of Cambridge, Department of Psychiatry.
    Created by Rudolf Cardinal (rnc1001@cam.ac.uk).

    This file is part of CamCOPS.

    CamCOPS 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.

    CamCOPS 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 CamCOPS. If not, see <https://www.gnu.org/licenses/>.
*/

#include "chit.h"
#include "maths/mathfunc.h"
#include "lib/stringfunc.h"
#include "lib/uifunc.h"
#include "lib/version.h"
#include "questionnairelib/namevaluepair.h"
#include "questionnairelib/questionnaire.h"
#include "questionnairelib/qumcqgrid.h"
#include "tasklib/taskfactory.h"
#include "tasklib/taskregistrar.h"
using mathfunc::anyNull;
using mathfunc::sumInt;
using mathfunc::totalScorePhrase;
using stringfunc::strnum;
using stringfunc::strseq;

const int FIRST_Q = 1;
const int LAST_Q = 15;
const int MIN_SCORE = 0;
const int MAX_SCORE = 4;
const int MAX_TOTAL_SCORE = MAX_SCORE * LAST_Q;
const QString QPREFIX("q");

const QString Chit::CHIT_TABLENAME("chit");

void initializeChit(TaskFactory& factory)
{
    static TaskRegistrar<Chit> registered(factory);
}


Chit::Chit(CamcopsApp& app, DatabaseManager& db, const int load_pk) :
    Task(app, db, CHIT_TABLENAME, false, false, false),  // ... anon, clin, resp
    m_questionnaire(nullptr)
{
    addFields(strseq(QPREFIX, FIRST_Q, LAST_Q), QMetaType::fromType<int>());

    load(load_pk);  // MUST ALWAYS CALL from derived Task constructor.
}


// ============================================================================
// Class info
// ============================================================================

QString Chit::shortname() const
{
    return "CHI-T";
}


QString Chit::longname() const
{
    return tr("Cambridge–Chicago Compulsivity Trait Scale");
}


QString Chit::description() const
{
    return tr("A scale designed to measure transdiagnostic compulsivity.");
}


QStringList Chit::scoredFieldNames() const
{
    return strseq(QPREFIX, FIRST_Q, LAST_Q);
}

Version Chit::minimumServerVersion() const
{
    return Version(2, 4, 15);
}


// ============================================================================
// Instance info
// ============================================================================


bool Chit::isComplete() const
{
    if (anyNull(values(scoredFieldNames()))) {
        return false;
    }

    return true;
}


int Chit::totalScore() const
{
    return sumInt(values(scoredFieldNames()));
}


QStringList Chit::summary() const
{
    return QStringList{totalScorePhrase(totalScore(), MAX_TOTAL_SCORE)};
}


QStringList Chit::detail() const
{
    QStringList lines = completenessInfo();
    const QString spacer = " ";
    const QString suffix = QLatin1String("");
    lines += fieldSummaries("q", suffix, spacer, QPREFIX, FIRST_Q, LAST_Q);
    lines.append("");
    lines += summary();

    return lines;
}


OpenableWidget* Chit::editor(const bool read_only)
{
    NameValueOptions agreement_options;

    for (int i = MIN_SCORE; i <= MAX_SCORE; i++) {
        auto name = QString("a%1").arg(i);

        agreement_options.append({xstring(name), i});
    }

    QVector<QuestionWithOneField> q_field_pairs;

    for (const QString& fieldname : scoredFieldNames()) {
        const QString& description = xstring(fieldname);
        q_field_pairs.append(QuestionWithOneField(description,
                                                  fieldRef(fieldname)));
    }
    auto grid = new QuMcqGrid(q_field_pairs, agreement_options);

    const int question_width = 4;
    const QVector<int> option_widths = {1, 1, 1, 1, 1};
    grid->setWidth(question_width, option_widths);
    const int min_width_px = 100;
    const QVector<int> min_option_widths_px = {100, 100, 100, 100, 100};
    grid->setMinimumWidthInPixels(min_width_px, min_option_widths_px);

    QuPagePtr page((new QuPage{grid})->setTitle(xstring("title_main")));

    m_questionnaire = new Questionnaire(m_app, {page});
    m_questionnaire->setType(QuPage::PageType::Patient);
    m_questionnaire->setReadOnly(read_only);

    return m_questionnaire;
}