/* global React, Icon, Modal, window */ // ============================================================================ // MELR · Diagnostics GFP — moteur générique (TADAT, DeMPA ; PIMA/MAPS à venir) // ---------------------------------------------------------------------------- // Phase 4d du module ÉVALUATIONS. Un seul écran piloté par les catalogues // statiques window.GFP_DIAG_CATALOGS (gfp-diag-catalog.jsx) : // - TADAT (Field Guide 2019) : 9 POA / 32 indicateurs / 55 dimensions, // notes A-D, agrégation M1/M2 (réutilise window.pefaAggregate — la table // de conversion TADAT est identique à celle de PEFA). // - DeMPA (édition 2021) : 5 domaines / 15 DPI / 31 dimensions, notes // A-D + N/R, notation par dimension uniquement (pas d'agrégat). // // Données : registre `evaluations` (type 'gfp_diag', cadre choisi à la // création) + feuilles `evaluation_sheets` (framing / scores). // ============================================================================ (function () { const { useState, useEffect, useMemo } = React; const sec = (c, extra) => (window.MelrSection ? window.MelrSection.style(c, extra) : { marginBottom: 14, ...(extra || {}) }); const secT = (c) => (window.MelrSection ? window.MelrSection.title(c) : { fontSize: 13, fontWeight: 700, marginBottom: 8 }); const xbtn = (bg) => (window.MelrSection ? window.MelrSection.btn(bg) : {}); const CATS = () => window.GFP_DIAG_CATALOGS || {}; const TABS = [ { key: "overview", fr: "Vue d'ensemble", en: "Overview", es: "Visión general", hue: 230 }, { key: "framing", fr: "Cadrage", en: "Framing", es: "Encuadre", hue: 50 }, { key: "scoring", fr: "Notation", en: "Scoring", es: "Puntuación", hue: 150 }, { key: "synthesis", fr: "Synthèse & rapport", en: "Synthesis & report", es: "Síntesis e informe", hue: 285 }, ]; const FRAMING_FIELDS = [ { key: "object", fr: "Objet et périmètre", en: "Object and scope", es: "Objeto y alcance", hint_fr: "Administration / institution évaluée, période, couverture.", hint_en: "Administration / institution assessed, period, coverage." }, { key: "team", fr: "Équipe et gouvernance", en: "Team and governance", es: "Equipo y gobernanza", hint_fr: "Évaluateurs accrédités, organisation commanditaire, autorités.", hint_en: "Trained assessors, sponsoring organization, authorities." }, { key: "calendar", fr: "Calendrier", en: "Timeline", es: "Calendario", hint_fr: "Phases : lancement, mission de terrain, projets de rapport, rapport final.", hint_en: "Phases: initiation, field mission, draft reports, final report." }, { key: "sources", fr: "Sources et données", en: "Sources and data", es: "Fuentes y datos", hint_fr: "Questionnaires, données quantitatives, documents consultés.", hint_en: "Questionnaires, quantitative data, documents reviewed." }, ]; function scorePillStyle(score, cat) { // Échelles personnalisées (PIMA faible/moyenne/élevée, MAPS écarts) if (cat && cat.labels && cat.labels[score]) { return { background: cat.labels[score].fill, color: cat.labels[score].color }; } const l = (score || "").charAt(0); if (l === "A") return { background: "#dcfce7", color: "#15803d" }; if (l === "B") return { background: "#dbeafe", color: "#1d4ed8" }; if (l === "C") return { background: "#fef3c7", color: "#b45309" }; if (l === "D") return { background: "#fee2e2", color: "#b91c1c" }; return { background: "#f3f4f6", color: "#6b7280" }; } function scoreLabel(cat, score, lang) { if (!score) return ""; if (cat && cat.labels && cat.labels[score]) { return (lang === "es" ? (cat.labels[score].es != null ? cat.labels[score].es : cat.labels[score].en) : lang === "fr" ? cat.labels[score].fr : cat.labels[score].en); } return score; } function Pill({ score, cat, lang }) { if (!score) return —; return {scoreLabel(cat, score, lang) || score}; } // Note agrégée d'un indicateur (TADAT) : override sinon M1/M2 via la table // officielle (les notes N/R ou NA sont exclues par pefaAggregate). function aggScore(cat, ind, scores) { if (!cat.aggregate) return null; const ov = (scores.overrides || {})[ind.code]; if (ov) return ov; if (!window.pefaAggregate) return null; return window.pefaAggregate(ind.method || "M1", ind.dims.map((dd) => ((scores.dims || {})[dd.code] || {}).score || null)); } // ── Export Word / PDF ──────────────────────────────────────────────────── function exportDiagWord(lang, evaluation, cat, framing, scores) { const D = window.docx; if (!D) { window.alert(window.L("Bibliothèque Word indisponible.", "Word library unavailable.", "Biblioteca Word no disponible.")); return; } const L = (fr, en) => (lang === "fr" ? fr : en); const title = lang === "fr" ? (evaluation.title_fr || "Diagnostic") : (evaluation.title_en || evaluation.title_fr || "Diagnostic"); const P = (text, o) => new D.Paragraph({ children: [new D.TextRun({ text, size: (o && o.size) || 21, bold: !!(o && o.bold), color: (o && o.color) || "111827", font: "Arial", italics: !!(o && o.italics) })], spacing: { after: (o && o.after) != null ? o.after : 100 }, }); const H1 = (t) => P(t, { size: 25, bold: true, color: "0F2740", after: 130 }); const H2 = (t) => P(t, { size: 21, bold: true, color: "1D4ED8", after: 80 }); const block = (text) => ((text || "").trim() || L("(à compléter)", "(to be completed)")).split(/\n+/).map((line) => P(line)); const border = { style: D.BorderStyle.DOTTED, size: 2, color: "94A3B8" }; const borders = { top: border, bottom: border, left: border, right: border }; const cell = (t, opts) => new D.TableCell({ borders, margins: { top: 30, bottom: 30, left: 80, right: 80 }, shading: opts && opts.head ? { type: D.ShadingType.CLEAR, fill: "1D4ED8" } : undefined, children: [new D.Paragraph({ children: [new D.TextRun({ text: String(t), size: 17, font: "Arial", bold: !!(opts && (opts.head || opts.bold)), color: opts && opts.head ? "FFFFFF" : "111827", })] })], }); const children = [ P(((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)).toUpperCase() + " — " + L("RAPPORT D'ÉVALUATION", "ASSESSMENT REPORT"), { size: 26, bold: true, color: "0F2740", after: 80 }), P(title, { size: 24, bold: true, color: "1D4ED8", after: 60 }), P(L("Cadre : ", "Framework: ") + ((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)) + " (" + cat.version + ")" + L(" · Période : ", " · Period: ") + (evaluation.period_start || "—") + (evaluation.period_end ? " → " + evaluation.period_end : ""), { size: 18, color: "64748B", after: 240 }), H1(L("1. Cadrage", "1. Framing")), ]; FRAMING_FIELDS.forEach((f) => { children.push(H2((lang === "es" ? (f.es != null ? f.es : f.en) : lang === "fr" ? f.fr : f.en))); children.push(...block(framing[f.key])); }); children.push(H1(L("2. Notation détaillée", "2. Detailed scoring"))); cat.areas.forEach((a) => { children.push(H2((a.num ? a.num + " · " : "") + ((lang === "es" ? (a.es != null ? a.es : a.en) : lang === "fr" ? a.fr : a.en)))); a.inds.forEach((ind) => { const agg = aggScore(cat, ind, scores); children.push(P(ind.code + " — " + ((lang === "es" ? (ind.es != null ? ind.es : ind.en) : lang === "fr" ? ind.fr : ind.en)) + (cat.aggregate ? L(" · Note : ", " · Score: ") + (agg || "—") + (ind.method ? " (" + ind.method + ")" : "") : ""), { size: 20, bold: true, after: 50 })); ind.dims.forEach((dd) => { const row = (scores.dims || {})[dd.code] || {}; const sa = scoreLabel(cat, row.score, lang) || row.score || "—"; const scoreTxt = cat.dual ? ((lang === "es" ? (cat.dual.a.es != null ? cat.dual.a.es : cat.dual.a.en) : lang === "fr" ? cat.dual.a.fr : cat.dual.a.en)) + " : " + sa + " · " + ((lang === "es" ? (cat.dual.b.es != null ? cat.dual.b.es : cat.dual.b.en) : lang === "fr" ? cat.dual.b.fr : cat.dual.b.en)) + " : " + (scoreLabel(cat, row.score2, lang) || row.score2 || "—") : sa; children.push(P(dd.code + " (" + scoreTxt + ")" + (cat.flags && row.flag ? L(" [DRAPEAU ROUGE]", " [RED FLAG]") : "") + " — " + ((lang === "es" ? (dd.es != null ? dd.es : dd.en) : lang === "fr" ? dd.fr : dd.en)), { size: 18, after: 30 })); if (row.note) row.note.split(/\n+/).forEach((line) => children.push(P(line, { size: 18, italics: true, after: 50 }))); }); children.push(P("", { after: 50 })); }); }); children.push(H1(L("3. Tableau récapitulatif", "3. Summary table"))); const rows = [new D.TableRow({ tableHeader: true, children: [ cell(L("Indicateur", "Indicator"), { head: true }), cell(L("Intitulé", "Name"), { head: true }), cell(L("Dimensions", "Dimensions"), { head: true }), cell(cat.aggregate ? L("Note globale", "Overall score") : L("Notes", "Scores"), { head: true }), ]})]; cat.areas.forEach((a) => a.inds.forEach((ind) => { const dimScores = ind.dims.map((dd) => { const row = (scores.dims || {})[dd.code] || {}; const sa = scoreLabel(cat, row.score, lang) || row.score || "—"; return (cat.dual ? sa + "/" + (scoreLabel(cat, row.score2, lang) || row.score2 || "—") : sa) + (cat.flags && row.flag ? " 🚩" : ""); }).join(" · "); rows.push(new D.TableRow({ children: [ cell(ind.code, { bold: true }), cell((lang === "es" ? (ind.es != null ? ind.es : ind.en) : lang === "fr" ? ind.fr : ind.en)), cell(dimScores), cell(cat.aggregate ? (aggScore(cat, ind, scores) || "—") : dimScores, { bold: true }), ]})); })); children.push(new D.Table({ width: { size: 100, type: D.WidthType.PERCENTAGE }, rows })); const doc = new D.Document({ sections: [{ children }] }); const fname = cat.code.toUpperCase() + "_" + (evaluation.title_fr || "rapport").replace(/[^\wÀ-ſ-]+/g, "_") + ".docx"; D.Packer.toBlob(doc).then((blob) => { const url = URL.createObjectURL(blob); const a = document.createElement("a"); a.href = url; a.download = fname; a.click(); setTimeout(() => URL.revokeObjectURL(url), 4000); }); } function exportDiagPdf(lang, evaluation, cat, framing, scores) { if (!window.jspdf || !window.jspdf.jsPDF) { window.alert(window.L("Bibliothèque PDF indisponible.", "PDF library unavailable.", "Biblioteca PDF no disponible.")); return; } const L = (fr, en) => (lang === "fr" ? fr : en); const { jsPDF } = window.jspdf; const doc = new jsPDF({ unit: "pt", format: "a4" }); const W = 595, M = 48; let y = 56; const ensure = (h) => { if (y + h > 800) { doc.addPage(); y = 56; } }; const text = (str, size, o) => { o = o || {}; doc.setFont("helvetica", o.bold ? "bold" : (o.italics ? "italic" : "normal")); doc.setFontSize(size); const c = o.color || [17, 24, 39]; doc.setTextColor(c[0], c[1], c[2]); doc.splitTextToSize(String(str || ""), W - 2 * M).forEach((line) => { ensure(size * 1.5); doc.text(line, M, y); y += size * 1.35; }); y += o.after != null ? o.after : 5; }; const H1 = (t) => text(t, 13, { bold: true, color: [15, 39, 64], after: 6 }); const title = lang === "fr" ? (evaluation.title_fr || "Diagnostic") : (evaluation.title_en || evaluation.title_fr || "Diagnostic"); text(((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)).toUpperCase() + " — " + L("RAPPORT D'ÉVALUATION", "ASSESSMENT REPORT"), 14, { bold: true, color: [15, 39, 64], after: 3 }); text(title, 12, { bold: true, color: [29, 78, 216], after: 3 }); text(L("Cadre ", "Framework ") + ((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)) + " (" + cat.version + ") · " + (evaluation.period_start || "—") + (evaluation.period_end ? " → " + evaluation.period_end : ""), 9, { color: [100, 116, 139], after: 12 }); H1(L("1. Cadrage", "1. Framing")); FRAMING_FIELDS.forEach((f) => { text((lang === "es" ? (f.es != null ? f.es : f.en) : lang === "fr" ? f.fr : f.en), 10, { bold: true, color: [29, 78, 216], after: 2 }); text((framing[f.key] || "").trim() || L("(à compléter)", "(to be completed)"), 10, { after: 8 }); }); H1(L("2. Notation détaillée", "2. Detailed scoring")); cat.areas.forEach((a) => { text((a.num ? a.num + " · " : "") + ((lang === "es" ? (a.es != null ? a.es : a.en) : lang === "fr" ? a.fr : a.en)), 11, { bold: true, color: [29, 78, 216], after: 3 }); a.inds.forEach((ind) => { const agg = aggScore(cat, ind, scores); text(ind.code + " — " + ((lang === "es" ? (ind.es != null ? ind.es : ind.en) : lang === "fr" ? ind.fr : ind.en)) + (cat.aggregate ? L(" · Note : ", " · Score: ") + (agg || "—") : ""), 10, { bold: true, after: 1 }); ind.dims.forEach((dd) => { const row = (scores.dims || {})[dd.code] || {}; const sa = scoreLabel(cat, row.score, lang) || row.score || "—"; const scoreTxt = cat.dual ? ((lang === "es" ? (cat.dual.a.es != null ? cat.dual.a.es : cat.dual.a.en) : lang === "fr" ? cat.dual.a.fr : cat.dual.a.en)) + ": " + sa + " · " + ((lang === "es" ? (cat.dual.b.es != null ? cat.dual.b.es : cat.dual.b.en) : lang === "fr" ? cat.dual.b.fr : cat.dual.b.en)) + ": " + (scoreLabel(cat, row.score2, lang) || row.score2 || "—") : sa; text(dd.code + " (" + scoreTxt + ")" + (cat.flags && row.flag ? L(" [DRAPEAU ROUGE]", " [RED FLAG]") : "") + " — " + ((lang === "es" ? (dd.es != null ? dd.es : dd.en) : lang === "fr" ? dd.fr : dd.en)), 9, { after: 1 }); if (row.note) text(row.note, 9, { italics: true, color: [75, 85, 99], after: 3 }); }); y += 3; }); }); doc.save(cat.code.toUpperCase() + "_" + (evaluation.title_fr || "rapport").replace(/[^\wÀ-ſ-]+/g, "_") + ".pdf"); } // ── Modale de création ─────────────────────────────────────────────────── function NewDiagModal({ lang, effectiveOrgId, onClose, onCreated }) { const [framework, setFramework] = useState("tadat"); const [titleFr, setTitleFr] = useState(""); const [titleEn, setTitleEn] = useState(""); const [periodStart, setPeriodStart] = useState(""); const [periodEnd, setPeriodEnd] = useState(""); const [busy, setBusy] = useState(false); const [err, setErr] = useState(null); const L = (fr, en) => (lang === "fr" ? fr : en); const lbl = { fontSize: 12, fontWeight: 600, display: "block", marginBottom: 4 }; const cats = CATS(); const submit = async (e) => { e.preventDefault(); if (!titleFr.trim()) { setErr(L("Le titre (FR) est requis.", "Title (FR) is required.")); return; } setBusy(true); setErr(null); try { const ev = await window.melr.evaluationsCrud.create({ organization_id: effectiveOrgId, type: "gfp_diag", title_fr: titleFr.trim(), title_en: titleEn.trim() || titleFr.trim(), status: "planning", period_start: periodStart || null, period_end: periodEnd || null, }); await window.melr.saveEvaluationSheet(ev.id, "framing", { framework }); if (onCreated) onCreated(ev); } catch (ex) { setErr(ex.message); setBusy(false); } }; return ( )}>
setTitleFr(e.target.value)} placeholder={L("ex. TADAT Sénégal 2026", "e.g. TADAT Senegal 2026")} style={{ width: "100%" }} />
setTitleEn(e.target.value)} style={{ width: "100%" }} />
setPeriodStart(e.target.value)} style={{ width: "100%" }} />
setPeriodEnd(e.target.value)} style={{ width: "100%" }} />
{err &&
{err}
} ); } // ── Écran principal ────────────────────────────────────────────────────── function GfpDiagScreen({ lang, effectiveOrgId, isSuperAdmin, hasPerm }) { const L = (fr, en) => (lang === "fr" ? fr : en); const { data: allEvals, refresh } = window.melr.useEvaluations ? window.melr.useEvaluations(effectiveOrgId) : { data: [], refresh: () => {} }; const evals = useMemo(() => (allEvals || []).filter((e) => e.type === "gfp_diag"), [allEvals]); const [tab, setTab] = useState("overview"); const [selectedId, setSelectedId] = useState(() => { try { return localStorage.getItem("melr.gfpdiag.selected") || null; } catch (_) { return null; } }); const selected = useMemo( () => evals.find((e) => e.id === selectedId) || evals[0] || null, [evals, selectedId] ); useEffect(() => { if (selected && selected.id !== selectedId) { setSelectedId(selected.id); try { localStorage.setItem("melr.gfpdiag.selected", selected.id); } catch (_) {} } }, [selected, selectedId]); const canManage = isSuperAdmin || (typeof hasPerm === "function" && (hasPerm("users.manage") || hasPerm("evaluations.manage"))); const [sheets, setSheets] = useState({ framing: {}, scores: {} }); const [dirty, setDirty] = useState(false); const [busy, setBusy] = useState(false); const [msg, setMsg] = useState(null); useEffect(() => { let cancelled = false; setSheets({ framing: {}, scores: {} }); setDirty(false); setMsg(null); if (!selected) return; Promise.all(["framing", "scores"].map((s) => window.melr.fetchEvaluationSheet(selected.id, s))) .then(([f, s]) => { if (cancelled) return; setSheets({ framing: (f && f.data) || {}, scores: (s && s.data) || {} }); }) .catch((e) => { if (!cancelled) setMsg(e.message); }); return () => { cancelled = true; }; }, [selected && selected.id]); const patch = (sheet, data) => { setSheets({ ...sheets, [sheet]: data }); setDirty(true); }; const saveAll = async () => { if (!selected) return; setBusy(true); setMsg(null); try { await window.melr.saveEvaluationSheet(selected.id, "framing", sheets.framing || {}); await window.melr.saveEvaluationSheet(selected.id, "scores", sheets.scores || {}); setDirty(false); setMsg(L("Diagnostic enregistré.", "Diagnostic saved.")); } catch (e) { setMsg(L("Erreur : ", "Error: ") + e.message); } finally { setBusy(false); } }; const [newOpen, setNewOpen] = useState(false); const [openAreas, setOpenAreas] = useState({}); const framing = sheets.framing || {}; const scores = sheets.scores || {}; const cat = CATS()[framing.framework] || null; const STATUS_META = window.EVALUATION_STATUS_META || {}; const setDim = (code, p) => patch("scores", { ...scores, dims: { ...(scores.dims || {}), [code]: { ...((scores.dims || {})[code] || {}), ...p } }, }); const setOverride = (indCode, v) => { const overrides = { ...(scores.overrides || {}) }; if (v) overrides[indCode] = v; else delete overrides[indCode]; patch("scores", { ...scores, overrides }); }; const allDims = cat ? cat.areas.reduce((n, a) => n + a.inds.reduce((m, i) => m + i.dims.length, 0), 0) : 0; const scoredDims = cat ? cat.areas.reduce((n, a) => n + a.inds.reduce((m, i) => m + i.dims.filter((dd) => ((scores.dims || {})[dd.code] || {}).score).length, 0), 0) : 0; return (
{L("ÉVALUATIONS · DIAGNOSTICS GFP", "EVALUATIONS · PFM DIAGNOSTICS")}

{L("Diagnostics GFP", "PFM diagnostics")} {selected && {" — "}{(lang === "es" ? (selected.title_es != null ? selected.title_es : selected.title_en || selected.title_fr) : lang === "fr" ? selected.title_fr : selected.title_en || selected.title_fr)} {cat && " (" + ((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)).split(" — ")[0] + ")"} }

{L("TADAT (administration fiscale), DeMPA (gestion de la dette), PIMA (investissement public) et MAPS (marchés publics) — un moteur de notation commun, fidèle à chaque cadre officiel.", "TADAT (tax administration), DeMPA (debt management), PIMA (public investment) and MAPS (procurement) — one scoring engine, faithful to each official framework.")}
{canManage && ( )}
{evals.length > 1 && (
{L("Diagnostic :", "Diagnostic:")}
)}
{TABS.map((tb) => ( ))}
{tab !== "overview" && selected && (
{canManage && ( )} {cat && ( <> )} {dirty && {L("Modifications non enregistrées", "Unsaved changes")}} {msg && {msg}}
)} {tab !== "overview" && !selected && (
{L("Créez d'abord un diagnostic (bouton en haut à droite).", "Create a diagnostic first (top-right button).")}
)} {/* ═ Vue d'ensemble ═ */} {tab === "overview" && (
{evals.length === 0 && ( )} {evals.map((e) => { const sm = STATUS_META[e.status] || { fr: e.status, en: e.status, color: "#6b7280", fill: "#f3f4f6" }; return ( ); })}
{L("Titre", "Title")}{L("Cadre", "Framework")} {L("Période", "Period")}{L("Statut", "Status")}
{L("Aucun diagnostic GFP pour le moment.", "No PFM diagnostic yet.")}
{(lang === "es" ? (e.title_es != null ? e.title_es : e.title_en || e.title_fr) : lang === "fr" ? e.title_fr : e.title_en || e.title_fr)} {selected && selected.id === e.id && cat ? {((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)).split(" — ")[0]} : "…"} {(e.period_start || "—")}{e.period_end ? " → " + e.period_end : ""} {(lang === "es" ? (sm.es != null ? sm.es : sm.en) : lang === "fr" ? sm.fr : sm.en)}
)} {/* ═ Cadrage ═ */} {tab === "framing" && selected && (
{L("Cadre du diagnostic :", "Diagnostic framework:")} {cat ? ((lang === "es" ? (cat.es != null ? cat.es : cat.en) : lang === "fr" ? cat.fr : cat.en)) + " (" + cat.version + ")" : "—"} {cat && ( {cat.areas.length} {lang === "fr" ? cat.areaLabel.fr.toLowerCase() + "s" : cat.areaLabel.en.toLowerCase() + "s"} {" · "}{cat.areas.reduce((n, a) => n + a.inds.length, 0)} {L("indicateurs", "indicators")} {" · "}{allDims} {L("dimensions", "dimensions")} )} {cat && cat.crossRef && ( ↔ {lang === "es" ? (cat.crossRef.es || cat.crossRef.en) : lang === "fr" ? cat.crossRef.fr : cat.crossRef.en} )}
{FRAMING_FIELDS.map((f) => (
{(lang === "es" ? (f.es != null ? f.es : f.en) : lang === "fr" ? f.fr : f.en)}
{(lang === "es" ? (f.hint_es != null ? f.hint_es : f.hint_en) : lang === "fr" ? f.hint_fr : f.hint_en)}