/*
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 "hama.h"
#include "common/textconst.h"
#include "maths/mathfunc.h"
#include "lib/stringfunc.h"
#include "questionnairelib/namevaluepair.h"
#include "questionnairelib/questionnaire.h"
#include "questionnairelib/qumcq.h"
#include "questionnairelib/qutext.h"
#include "tasklib/taskfactory.h"
using mathfunc::noneNull;
using mathfunc::sumInt;
using mathfunc::totalScorePhrase;
using stringfunc::standardResult;
using stringfunc::strnum;
using stringfunc::strseq;
const int FIRST_Q = 1;
const int N_QUESTIONS = 14;
const int MAX_QUESTION_SCORE = 56;
const QString QPREFIX("q");
const QString HamA::HAMA_TABLENAME("hama");
void initializeHamA(TaskFactory& factory)
{
static TaskRegistrar<HamA> registered(factory);
}
HamA::HamA(CamcopsApp& app, DatabaseManager& db, const int load_pk) :
Task(app, db, HAMA_TABLENAME, false, true, false) // ... anon, clin, resp
{
addFields(strseq(QPREFIX, FIRST_Q, N_QUESTIONS), QVariant::Int);
load(load_pk); // MUST ALWAYS CALL from derived Task constructor.
}
// ============================================================================
// Class info
// ============================================================================
QString HamA::shortname() const
{
return "HAM-A";
}
QString HamA::longname() const
{
return tr("Hamilton Rating Scale for Anxiety");
}
QString HamA::description() const
{
return tr("14-item clinician-administered scale.");
}
// ============================================================================
// Instance info
// ============================================================================
bool HamA::isComplete() const
{
return noneNull(values(strseq(QPREFIX, FIRST_Q, N_QUESTIONS)));
}
QStringList HamA::summary() const
{
return QStringList{totalScorePhrase(totalScore(), MAX_QUESTION_SCORE)};
}
QStringList HamA::detail() const
{
const int score = totalScore();
const QString severity = score >= 31
? TextConst::verySevere()
: (score >= 25 ? TextConst::moderateToSevere()
: score >= 18 ? TextConst::mildToModerate()
: TextConst::mild());
QStringList lines = completenessInfo();
lines += fieldSummaries("q", "_s", " ", QPREFIX, FIRST_Q, N_QUESTIONS);
lines.append("");
lines += summary();
lines.append("");
lines.append(standardResult(xstring("symptom_severity"),
severity));
return lines;
}
OpenableWidget* HamA::editor(const bool read_only)
{
QVector<QuPagePtr> pages;
auto addpage = [this, &pages](int n) -> void {
NameValueOptions options;
for (int i = 0; i <= 4; ++i) {
const QString name = xstring(QString("q%1_option%2").arg(n).arg(i));
options.append(NameValuePair(name, i));
}
const QString pagetitle = xstring(QString("q%1_title").arg(n));
const QString question = xstring(QString("q%1_question").arg(n));
const QString fieldname = strnum(QPREFIX, n);
QuPagePtr page((new QuPage{
new QuText(question),
new QuMcq(fieldRef(fieldname), options),
})->setTitle(pagetitle));
pages.append(page);
};
pages.append(getClinicianDetailsPage());
for (int n = FIRST_Q; n <= N_QUESTIONS; ++n) {
addpage(n);
}
auto questionnaire = new Questionnaire(m_app, pages);
questionnaire->setType(QuPage::PageType::Clinician);
questionnaire->setReadOnly(read_only);
return questionnaire;
}
// ============================================================================
// Task-specific calculations
// ============================================================================
int HamA::totalScore() const
{
return sumInt(values(strseq(QPREFIX, FIRST_Q, N_QUESTIONS)));
}