@aehrc/smart-forms-renderer 1.0.0-alpha.42.dev7 → 1.0.0-alpha.42.dev9

package/lib/utils/calculatedExpression.js

@@ -0,0 +1,311 @@
+/*
+ * Copyright 2024 Commonwealth Scientific and Industrial Research
+ * Organisation (CSIRO) ABN 41 687 119 230.
+ *
+ * Licensed under the Apache License, Version 2.0 (the "License");
+ * you may not use this file except in compliance with the License.
+ * You may obtain a copy of the License at
+ *
+ *     http://www.apache.org/licenses/LICENSE-2.0
+ *
+ * Unless required by applicable law or agreed to in writing, software
+ * distributed under the License is distributed on an "AS IS" BASIS,
+ * WITHOUT WARRANTIES OR CONDITIONS OF ANY KIND, either express or implied.
+ * See the License for the specific language governing permissions and
+ * limitations under the License.
+ */
+var __awaiter = (this && this.__awaiter) || function (thisArg, _arguments, P, generator) {
+    function adopt(value) { return value instanceof P ? value : new P(function (resolve) { resolve(value); }); }
+    return new (P || (P = Promise))(function (resolve, reject) {
+        function fulfilled(value) { try { step(generator.next(value)); } catch (e) { reject(e); } }
+        function rejected(value) { try { step(generator["throw"](value)); } catch (e) { reject(e); } }
+        function step(result) { result.done ? resolve(result.value) : adopt(result.value).then(fulfilled, rejected); }
+        step((generator = generator.apply(thisArg, _arguments || [])).next());
+    });
+};
+import fhirpath from 'fhirpath';
+import fhirpath_r4_model from 'fhirpath/fhir-context/r4';
+import { emptyResponse } from './emptyResource';
+import { createFhirPathContext, handleFhirPathResult } from './fhirpath';
+import { getQrItemsIndex, mapQItemsIndex } from './mapItem';
+import { createEmptyQrGroup, updateQrItemsInGroup } from './qrItem';
+import dayjs from 'dayjs';
+import { updateQuestionnaireResponse } from './genericRecursive';
+import isEqual from 'lodash.isequal';
+export function evaluateInitialCalculatedExpressions(params) {
+    return __awaiter(this, void 0, void 0, function* () {
+        const { initialResponse, initialResponseItemMap, calculatedExpressions, variables, existingFhirPathContext, terminologyServerUrl } = params;
+        let { fhirPathTerminologyCache } = params;
+        // Return early if initialResponse is empty or there are no calculated expressions to evaluate
+        if (isEqual(initialResponse, structuredClone(emptyResponse)) ||
+            Object.keys(calculatedExpressions).length === 0) {
+            return {
+                initialCalculatedExpressions: calculatedExpressions,
+                updatedFhirPathContext: existingFhirPathContext,
+                fhirPathTerminologyCache
+            };
+        }
+        const initialCalculatedExpressions = Object.assign({}, calculatedExpressions);
+        const fhirPathEvalResult = yield createFhirPathContext(initialResponse, initialResponseItemMap, variables, existingFhirPathContext, fhirPathTerminologyCache, terminologyServerUrl);
+        const updatedFhirPathContext = fhirPathEvalResult.fhirPathContext;
+        fhirPathTerminologyCache = fhirPathEvalResult.fhirPathTerminologyCache;
+        for (const linkId in initialCalculatedExpressions) {
+            const itemCalcExpressions = calculatedExpressions[linkId];
+            for (const calcExpression of itemCalcExpressions) {
+                const cacheKey = JSON.stringify(calcExpression.expression); // Use expression as cache key
+                if (fhirPathTerminologyCache[cacheKey]) {
+                    continue;
+                }
+                try {
+                    const fhirPathResult = fhirpath.evaluate({}, calcExpression.expression, updatedFhirPathContext, fhirpath_r4_model, {
+                        async: true,
+                        terminologyUrl: terminologyServerUrl
+                    });
+                    const result = yield handleFhirPathResult(fhirPathResult);
+                    // If fhirPathResult is an async terminology call, cache the result
+                    if (fhirPathResult instanceof Promise) {
+                        fhirPathTerminologyCache[cacheKey] = result;
+                    }
+                    // Only update calculatedExpressions if length of result array > 0
+                    if (result.length > 0 && !isEqual(calcExpression.value, result[0])) {
+                        calcExpression.value = result[0];
+                    }
+                }
+                catch (e) {
+                    console.warn(e.message, `LinkId: ${linkId}\nExpression: ${calcExpression.expression}`);
+                }
+            }
+            initialCalculatedExpressions[linkId] = itemCalcExpressions;
+        }
+        return {
+            initialCalculatedExpressions,
+            updatedFhirPathContext,
+            fhirPathTerminologyCache
+        };
+    });
+}
+export function evaluateCalculatedExpressions(fhirPathContext, fhirPathTerminologyCache, calculatedExpressions, terminologyServerUrl) {
+    return __awaiter(this, void 0, void 0, function* () {
+        const updatedCalculatedExpressions = Object.assign({}, calculatedExpressions);
+        let isUpdated = false;
+        for (const linkId in calculatedExpressions) {
+            const itemCalcExpressions = calculatedExpressions[linkId];
+            for (const calcExpression of itemCalcExpressions) {
+                const cacheKey = JSON.stringify(calcExpression.expression); // Use expression as cache key
+                if (fhirPathTerminologyCache[cacheKey]) {
+                    continue;
+                }
+                try {
+                    const fhirPathResult = fhirpath.evaluate({}, calcExpression.expression, fhirPathContext, fhirpath_r4_model, {
+                        async: true,
+                        terminologyUrl: terminologyServerUrl
+                    });
+                    const result = yield handleFhirPathResult(fhirPathResult);
+                    // If fhirPathResult is an async terminology call, cache the result
+                    if (fhirPathResult instanceof Promise) {
+                        fhirPathTerminologyCache[cacheKey] = result;
+                    }
+                    // Update calculatedExpressions if length of result array > 0
+                    // Only update when current calcExpression value is different from the result, otherwise it will result in an infinite loop as per issue #733
+                    if (result.length > 0 && !isEqual(calcExpression.value, result[0])) {
+                        isUpdated = true;
+                        calcExpression.value = result[0];
+                    }
+                    // Update calculatedExpression value to null if no result is returned
+                    if (result.length === 0 && calcExpression.value !== null) {
+                        isUpdated = true;
+                        calcExpression.value = null;
+                    }
+                }
+                catch (e) {
+                    console.warn(e.message, `LinkId: ${linkId}\nExpression: ${calcExpression.expression}`);
+                }
+            }
+            updatedCalculatedExpressions[linkId] = itemCalcExpressions;
+        }
+        return {
+            calculatedExpsIsUpdated: isUpdated,
+            updatedCalculatedExpressions: updatedCalculatedExpressions
+        };
+    });
+}
+export function initialiseCalculatedExpressionValues(questionnaire, populatedResponse, calculatedExpressions) {
+    // Filter calculated expressions, only preserve key-value pairs with values
+    const calculatedExpressionsWithValues = {};
+    for (const linkId in calculatedExpressions) {
+        const itemCalcExpressionsWithValues = calculatedExpressions[linkId].filter((calcExpression) => calcExpression.value !== undefined);
+        if (itemCalcExpressionsWithValues.length > 0) {
+            calculatedExpressionsWithValues[linkId] = itemCalcExpressionsWithValues;
+        }
+    }
+    return updateQuestionnaireResponse(questionnaire, populatedResponse, initialiseItemCalculatedExpressionValueRecursive, calculatedExpressionsWithValues);
+}
+function initialiseItemCalculatedExpressionValueRecursive(qItem, qrItemOrItems, calculatedExpressions) {
+    var _a;
+    // For repeat groups
+    const hasMultipleAnswers = Array.isArray(qrItemOrItems);
+    if (hasMultipleAnswers) {
+        const updatedQrItems = initialiseItemCalculatedExpressionValueInRepeatGroup(qItem, qrItemOrItems, calculatedExpressions);
+        return constructGroupItem(qItem, updatedQrItems
+            ? {
+                linkId: qItem.linkId,
+                text: qItem.text,
+                item: updatedQrItems
+            }
+            : null, calculatedExpressions);
+    }
+    let qrItem = qrItemOrItems;
+    const childQItems = qItem.item;
+    if (childQItems && childQItems.length > 0) {
+        qrItem = qrItemOrItems !== null && qrItemOrItems !== void 0 ? qrItemOrItems : structuredClone(createEmptyQrGroup(qItem));
+        const childQrItems = (_a = qrItem.item) !== null && _a !== void 0 ? _a : [];
+        const indexMap = mapQItemsIndex(qItem);
+        const qrItemsByIndex = getQrItemsIndex(childQItems, childQrItems, indexMap);
+        // Otherwise loop through qItem as usual
+        for (const [index, childQItem] of childQItems.entries()) {
+            const childQRItemOrItems = qrItemsByIndex[index];
+            const updatedChildQRItemOrItems = initialiseItemCalculatedExpressionValueRecursive(childQItem, childQRItemOrItems !== null && childQRItemOrItems !== void 0 ? childQRItemOrItems : null, calculatedExpressions);
+            // Update QR items in repeating group
+            if (Array.isArray(updatedChildQRItemOrItems)) {
+                if (updatedChildQRItemOrItems.length > 0) {
+                    updateQrItemsInGroup(null, {
+                        linkId: childQItem.linkId,
+                        qrItems: updatedChildQRItemOrItems
+                    }, qrItem, indexMap);
+                }
+                continue;
+            }
+            // Update QR items in non-repeating group
+            const updatedChildQRItem = updatedChildQRItemOrItems;
+            if (updatedChildQRItem) {
+                updateQrItemsInGroup(updatedChildQRItem, null, qrItem, indexMap);
+            }
+        }
+        return constructGroupItem(qItem, qrItem, calculatedExpressions);
+    }
+    return constructSingleItem(qItem, qrItem, calculatedExpressions);
+}
+function initialiseItemCalculatedExpressionValueInRepeatGroup(qItem, qrItems, calculatedExpressions) {
+    var _a;
+    if (!qItem.item) {
+        return [];
+    }
+    const indexMap = mapQItemsIndex(qItem);
+    const qrItemsByIndex = getQrItemsIndex(qItem.item, qrItems, indexMap);
+    const updatedQrItems = [];
+    for (const [index, childQItem] of qItem.item.entries()) {
+        const childQRItemOrItems = (_a = qrItemsByIndex[index]) !== null && _a !== void 0 ? _a : null;
+        const updatedChildQRItemOrItems = initialiseItemCalculatedExpressionValueRecursive(childQItem, childQRItemOrItems, calculatedExpressions);
+        if (Array.isArray(updatedChildQRItemOrItems)) {
+            updatedQrItems.push(...updatedChildQRItemOrItems);
+        }
+        else if (updatedChildQRItemOrItems) {
+            updatedQrItems.push(updatedChildQRItemOrItems);
+        }
+    }
+    return updatedQrItems.length > 0 ? updatedQrItems : null;
+}
+function getCalculatedExpressionAnswer(qItem, calculatedExpressions) {
+    var _a;
+    const calcExpressionFromItem = (_a = calculatedExpressions[qItem.linkId]) === null || _a === void 0 ? void 0 : _a.find((calcExpression) => calcExpression.from === 'item');
+    if (calcExpressionFromItem) {
+        // If value is undefined or null, do not return anything
+        if ((calcExpressionFromItem === null || calcExpressionFromItem === void 0 ? void 0 : calcExpressionFromItem.value) === undefined || calcExpressionFromItem.value === null) {
+            return;
+        }
+        // Otherwise there is a value (including 0 and empty strings)
+        return parseValueToAnswer(qItem, calcExpressionFromItem.value);
+    }
+    return;
+}
+function constructGroupItem(qItem, qrItem, calculatedExpressions) {
+    const calculatedExpressionAnswer = getCalculatedExpressionAnswer(qItem, calculatedExpressions);
+    // If group item has an existing answer, do not overwrite it with calculated expression value
+    if ((qrItem === null || qrItem === void 0 ? void 0 : qrItem.answer) && (qrItem === null || qrItem === void 0 ? void 0 : qrItem.answer.length) > 0) {
+        return qrItem !== null && qrItem !== void 0 ? qrItem : null;
+    }
+    if (!calculatedExpressionAnswer) {
+        return qrItem !== null && qrItem !== void 0 ? qrItem : null;
+    }
+    if (qrItem) {
+        return Object.assign(Object.assign({}, qrItem), { answer: [calculatedExpressionAnswer] });
+    }
+    return {
+        linkId: qItem.linkId,
+        text: qItem.text,
+        answer: [calculatedExpressionAnswer]
+    };
+}
+function constructSingleItem(qItem, qrItem, calculatedExpressions) {
+    const calculatedExpressionAnswer = getCalculatedExpressionAnswer(qItem, calculatedExpressions);
+    if (!calculatedExpressionAnswer) {
+        return qrItem !== null && qrItem !== void 0 ? qrItem : null;
+    }
+    return {
+        linkId: qItem.linkId,
+        text: qItem.text,
+        answer: [calculatedExpressionAnswer]
+    };
+}
+// duplicate functions in sdc-populate
+function parseValueToAnswer(qItem, value) {
+    if (qItem.answerOption) {
+        const answerOption = qItem.answerOption.find((option) => {
+            var _a, _b, _c;
+            return ((_a = option.valueCoding) === null || _a === void 0 ? void 0 : _a.code) === (value === null || value === void 0 ? void 0 : value.code) ||
+                // Handle case where valueCoding.code is not available
+                (!((_b = option.valueCoding) === null || _b === void 0 ? void 0 : _b.code) && ((_c = option.valueCoding) === null || _c === void 0 ? void 0 : _c.display) === (value === null || value === void 0 ? void 0 : value.display));
+        });
+        if (answerOption) {
+            return answerOption;
+        }
+    }
+    if (typeof value === 'boolean' && qItem.type === 'boolean') {
+        return { valueBoolean: value };
+    }
+    if (typeof value === 'number') {
+        if (qItem.type === 'decimal') {
+            return { valueDecimal: value };
+        }
+        if (qItem.type === 'integer') {
+            return { valueInteger: value };
+        }
+    }
+    if (typeof value === 'object' && value.unit) {
+        return { valueQuantity: value };
+    }
+    if (typeof value === 'object' && value.system && value.code) {
+        return { valueCoding: value };
+    }
+    // Value is string at this point
+    if (qItem.type === 'date' && checkIsDateTime(value)) {
+        return { valueDate: value };
+    }
+    if (qItem.type === 'dateTime' && checkIsDateTime(value)) {
+        return { valueDateTime: value };
+    }
+    if (qItem.type === 'time' && checkIsTime(value)) {
+        return { valueTime: value };
+    }
+    return { valueString: value };
+}
+/**
+ * Check if an answer is a datetime in the format YYYY, YYYY-MM, YYYY-MM-DD, YYYY-MM-DDThh:mm:ss+zz:zz
+ *
+ * @author Sean Fong
+ */
+export function checkIsDateTime(value) {
+    const acceptedFormats = ['YYYY', 'YYYY-MM', 'YYYY-MM-DD', 'YYYY-MM-DDTHH:mm:ssZ'];
+    const formattedDate = dayjs(value).format();
+    return dayjs(formattedDate, acceptedFormats, true).isValid();
+}
+/**
+ * Check if an answer is in a  time format - Regex: ([01][0-9]|2[0-3]):[0-5][0-9]:([0-5][0-9]|60)(\.[0-9]+)?
+ *
+ * @author Sean Fong
+ */
+export function checkIsTime(value) {
+    const timeRegex = /^([01][0-9]|2[0-3]):[0-5][0-9]:([0-5][0-9]|60)(\.[0-9]+)?$/;
+    return timeRegex.test(value);
+}
+//# sourceMappingURL=calculatedExpression.js.map

package/lib/utils/calculatedExpression.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"calculatedExpression.js","sourceRoot":"","sources":["../../src/utils/calculatedExpression.ts"],"names":[],"mappings":"AAAA;;;;;;;;;;;;;;;GAeG;;;;;;;;;;AAGH,OAAO,QAAQ,MAAM,UAAU,CAAC;AAChC,OAAO,iBAAiB,MAAM,0BAA0B,CAAC;AASzD,OAAO,EAAE,aAAa,EAAE,MAAM,iBAAiB,CAAC;AAChD,OAAO,EAAE,qBAAqB,EAAE,oBAAoB,EAAE,MAAM,YAAY,CAAC;AACzE,OAAO,EAAE,eAAe,EAAE,cAAc,EAAE,MAAM,WAAW,CAAC;AAC5D,OAAO,EAAE,kBAAkB,EAAE,oBAAoB,EAAE,MAAM,UAAU,CAAC;AACpE,OAAO,KAAK,MAAM,OAAO,CAAC;AAC1B,OAAO,EAAE,2BAA2B,EAAE,MAAM,oBAAoB,CAAC;AACjE,OAAO,OAAO,MAAM,gBAAgB,CAAC;AAarC,MAAM,UAAgB,oCAAoC,CACxD,MAAkD;;QAMlD,MAAM,EACJ,eAAe,EACf,sBAAsB,EACtB,qBAAqB,EACrB,SAAS,EACT,uBAAuB,EACvB,oBAAoB,EACrB,GAAG,MAAM,CAAC;QACX,IAAI,EAAE,wBAAwB,EAAE,GAAG,MAAM,CAAC;QAE1C,8FAA8F;QAC9F,IACE,OAAO,CAAC,eAAe,EAAE,eAAe,CAAC,aAAa,CAAC,CAAC;YACxD,MAAM,CAAC,IAAI,CAAC,qBAAqB,CAAC,CAAC,MAAM,KAAK,CAAC,EAC/C;YACA,OAAO;gBACL,4BAA4B,EAAE,qBAAqB;gBACnD,sBAAsB,EAAE,uBAAuB;gBAC/C,wBAAwB;aACzB,CAAC;SACH;QAED,MAAM,4BAA4B,qBAC7B,qBAAqB,CACzB,CAAC;QAEF,MAAM,kBAAkB,GAAG,MAAM,qBAAqB,CACpD,eAAe,EACf,sBAAsB,EACtB,SAAS,EACT,uBAAuB,EACvB,wBAAwB,EACxB,oBAAoB,CACrB,CAAC;QACF,MAAM,sBAAsB,GAAG,kBAAkB,CAAC,eAAe,CAAC;QAClE,wBAAwB,GAAG,kBAAkB,CAAC,wBAAwB,CAAC;QAEvE,KAAK,MAAM,MAAM,IAAI,4BAA4B,EAAE;YACjD,MAAM,mBAAmB,GAAG,qBAAqB,CAAC,MAAM,CAAC,CAAC;YAE1D,KAAK,MAAM,cAAc,IAAI,mBAAmB,EAAE;gBAChD,MAAM,QAAQ,GAAG,IAAI,CAAC,SAAS,CAAC,cAAc,CAAC,UAAU,CAAC,CAAC,CAAC,8BAA8B;gBAC1F,IAAI,wBAAwB,CAAC,QAAQ,CAAC,EAAE;oBACtC,SAAS;iBACV;gBAED,IAAI;oBACF,MAAM,cAAc,GAAG,QAAQ,CAAC,QAAQ,CACtC,EAAE,EACF,cAAc,CAAC,UAAU,EACzB,sBAAsB,EACtB,iBAAiB,EACjB;wBACE,KAAK,EAAE,IAAI;wBACX,cAAc,EAAE,oBAAoB;qBACrC,CACF,CAAC;oBACF,MAAM,MAAM,GAAG,MAAM,oBAAoB,CAAC,cAAc,CAAC,CAAC;oBAE1D,mEAAmE;oBACnE,IAAI,cAAc,YAAY,OAAO,EAAE;wBACrC,wBAAwB,CAAC,QAAQ,CAAC,GAAG,MAAM,CAAC;qBAC7C;oBAED,kEAAkE;oBAClE,IAAI,MAAM,CAAC,MAAM,GAAG,CAAC,IAAI,CAAC,OAAO,CAAC,cAAc,CAAC,KAAK,EAAE,MAAM,CAAC,CAAC,CAAC,CAAC,EAAE;wBAClE,cAAc,CAAC,KAAK,GAAG,MAAM,CAAC,CAAC,CAAC,CAAC;qBAClC;iBACF;gBAAC,OAAO,CAAC,EAAE;oBACV,OAAO,CAAC,IAAI,CAAC,CAAC,CAAC,OAAO,EAAE,WAAW,MAAM,iBAAiB,cAAc,CAAC,UAAU,EAAE,CAAC,CAAC;iBACxF;aACF;YAED,4BAA4B,CAAC,MAAM,CAAC,GAAG,mBAAmB,CAAC;SAC5D;QAED,OAAO;YACL,4BAA4B;YAC5B,sBAAsB;YACtB,wBAAwB;SACzB,CAAC;IACJ,CAAC;CAAA;AAED,MAAM,UAAgB,6BAA6B,CACjD,eAAoC,EACpC,wBAA6C,EAC7C,qBAA6D,EAC7D,oBAA4B;;QAK5B,MAAM,4BAA4B,qBAC7B,qBAAqB,CACzB,CAAC;QAEF,IAAI,SAAS,GAAG,KAAK,CAAC;QACtB,KAAK,MAAM,MAAM,IAAI,qBAAqB,EAAE;YAC1C,MAAM,mBAAmB,GAAG,qBAAqB,CAAC,MAAM,CAAC,CAAC;YAE1D,KAAK,MAAM,cAAc,IAAI,mBAAmB,EAAE;gBAChD,MAAM,QAAQ,GAAG,IAAI,CAAC,SAAS,CAAC,cAAc,CAAC,UAAU,CAAC,CAAC,CAAC,8BAA8B;gBAC1F,IAAI,wBAAwB,CAAC,QAAQ,CAAC,EAAE;oBACtC,SAAS;iBACV;gBAED,IAAI;oBACF,MAAM,cAAc,GAAG,QAAQ,CAAC,QAAQ,CACtC,EAAE,EACF,cAAc,CAAC,UAAU,EACzB,eAAe,EACf,iBAAiB,EACjB;wBACE,KAAK,EAAE,IAAI;wBACX,cAAc,EAAE,oBAAoB;qBACrC,CACF,CAAC;oBACF,MAAM,MAAM,GAAG,MAAM,oBAAoB,CAAC,cAAc,CAAC,CAAC;oBAE1D,mEAAmE;oBACnE,IAAI,cAAc,YAAY,OAAO,EAAE;wBACrC,wBAAwB,CAAC,QAAQ,CAAC,GAAG,MAAM,CAAC;qBAC7C;oBAED,6DAA6D;oBAC7D,6IAA6I;oBAC7I,IAAI,MAAM,CAAC,MAAM,GAAG,CAAC,IAAI,CAAC,OAAO,CAAC,cAAc,CAAC,KAAK,EAAE,MAAM,CAAC,CAAC,CAAC,CAAC,EAAE;wBAClE,SAAS,GAAG,IAAI,CAAC;wBACjB,cAAc,CAAC,KAAK,GAAG,MAAM,CAAC,CAAC,CAAC,CAAC;qBAClC;oBAED,qEAAqE;oBACrE,IAAI,MAAM,CAAC,MAAM,KAAK,CAAC,IAAI,cAAc,CAAC,KAAK,KAAK,IAAI,EAAE;wBACxD,SAAS,GAAG,IAAI,CAAC;wBACjB,cAAc,CAAC,KAAK,GAAG,IAAI,CAAC;qBAC7B;iBACF;gBAAC,OAAO,CAAC,EAAE;oBACV,OAAO,CAAC,IAAI,CAAC,CAAC,CAAC,OAAO,EAAE,WAAW,MAAM,iBAAiB,cAAc,CAAC,UAAU,EAAE,CAAC,CAAC;iBACxF;aACF;YAED,4BAA4B,CAAC,MAAM,CAAC,GAAG,mBAAmB,CAAC;SAC5D;QAED,OAAO;YACL,uBAAuB,EAAE,SAAS;YAClC,4BAA4B,EAAE,4BAA4B;SAC3D,CAAC;IACJ,CAAC;CAAA;AAED,MAAM,UAAU,oCAAoC,CAClD,aAA4B,EAC5B,iBAAwC,EACxC,qBAA6D;IAE7D,2EAA2E;IAC3E,MAAM,+BAA+B,GAA2C,EAAE,CAAC;IACnF,KAAK,MAAM,MAAM,IAAI,qBAAqB,EAAE;QAC1C,MAAM,6BAA6B,GAAG,qBAAqB,CAAC,MAAM,CAAC,CAAC,MAAM,CACxE,CAAC,cAAc,EAAE,EAAE,CAAC,cAAc,CAAC,KAAK,KAAK,SAAS,CACvD,CAAC;QAEF,IAAI,6BAA6B,CAAC,MAAM,GAAG,CAAC,EAAE;YAC5C,+BAA+B,CAAC,MAAM,CAAC,GAAG,6BAA6B,CAAC;SACzE;KACF;IAED,OAAO,2BAA2B,CAChC,aAAa,EACb,iBAAiB,EACjB,gDAAgD,EAChD,+BAA+B,CAChC,CAAC;AACJ,CAAC;AAED,SAAS,gDAAgD,CACvD,KAAwB,EACxB,aAA6E,EAC7E,qBAA6D;;IAE7D,oBAAoB;IACpB,MAAM,kBAAkB,GAAG,KAAK,CAAC,OAAO,CAAC,aAAa,CAAC,CAAC;IACxD,IAAI,kBAAkB,EAAE;QACtB,MAAM,cAAc,GAAG,oDAAoD,CACzE,KAAK,EACL,aAAa,EACb,qBAAqB,CACtB,CAAC;QACF,OAAO,kBAAkB,CACvB,KAAK,EACL,cAAc;YACZ,CAAC,CAAC;gBACE,MAAM,EAAE,KAAK,CAAC,MAAM;gBACpB,IAAI,EAAE,KAAK,CAAC,IAAI;gBAChB,IAAI,EAAE,cAAc;aACrB;YACH,CAAC,CAAC,IAAI,EACR,qBAAqB,CACtB,CAAC;KACH;IAED,IAAI,MAAM,GAAG,aAAa,CAAC;IAC3B,MAAM,WAAW,GAAG,KAAK,CAAC,IAAI,CAAC;IAC/B,IAAI,WAAW,IAAI,WAAW,CAAC,MAAM,GAAG,CAAC,EAAE;QACzC,MAAM,GAAG,aAAa,aAAb,aAAa,cAAb,aAAa,GAAI,eAAe,CAAC,kBAAkB,CAAC,KAAK,CAAC,CAAC,CAAC;QACrE,MAAM,YAAY,GAAG,MAAA,MAAM,CAAC,IAAI,mCAAI,EAAE,CAAC;QAEvC,MAAM,QAAQ,GAAG,cAAc,CAAC,KAAK,CAAC,CAAC;QACvC,MAAM,cAAc,GAAG,eAAe,CAAC,WAAW,EAAE,YAAY,EAAE,QAAQ,CAAC,CAAC;QAE5E,wCAAwC;QACxC,KAAK,MAAM,CAAC,KAAK,EAAE,UAAU,CAAC,IAAI,WAAW,CAAC,OAAO,EAAE,EAAE;YACvD,MAAM,kBAAkB,GAAG,cAAc,CAAC,KAAK,CAAC,CAAC;YAEjD,MAAM,yBAAyB,GAAG,gDAAgD,CAChF,UAAU,EACV,kBAAkB,aAAlB,kBAAkB,cAAlB,kBAAkB,GAAI,IAAI,EAC1B,qBAAqB,CACtB,CAAC;YAEF,qCAAqC;YACrC,IAAI,KAAK,CAAC,OAAO,CAAC,yBAAyB,CAAC,EAAE;gBAC5C,IAAI,yBAAyB,CAAC,MAAM,GAAG,CAAC,EAAE;oBACxC,oBAAoB,CAClB,IAAI,EACJ;wBACE,MAAM,EAAE,UAAU,CAAC,MAAM;wBACzB,OAAO,EAAE,yBAAyB;qBACnC,EACD,MAAM,EACN,QAAQ,CACT,CAAC;iBACH;gBACD,SAAS;aACV;YAED,yCAAyC;YACzC,MAAM,kBAAkB,GAAG,yBAAyB,CAAC;YACrD,IAAI,kBAAkB,EAAE;gBACtB,oBAAoB,CAAC,kBAAkB,EAAE,IAAI,EAAE,MAAM,EAAE,QAAQ,CAAC,CAAC;aAClE;SACF;QAED,OAAO,kBAAkB,CAAC,KAAK,EAAE,MAAM,EAAE,qBAAqB,CAAC,CAAC;KACjE;IAED,OAAO,mBAAmB,CAAC,KAAK,EAAE,MAAM,EAAE,qBAAqB,CAAC,CAAC;AACnE,CAAC;AAED,SAAS,oDAAoD,CAC3D,KAAwB,EACxB,OAAoC,EACpC,qBAA6D;;IAE7D,IAAI,CAAC,KAAK,CAAC,IAAI,EAAE;QACf,OAAO,EAAE,CAAC;KACX;IAED,MAAM,QAAQ,GAAG,cAAc,CAAC,KAAK,CAAC,CAAC;IACvC,MAAM,cAAc,GAAG,eAAe,CAAC,KAAK,CAAC,IAAI,EAAE,OAAO,EAAE,QAAQ,CAAC,CAAC;IACtE,MAAM,cAAc,GAAgC,EAAE,CAAC;IAEvD,KAAK,MAAM,CAAC,KAAK,EAAE,UAAU,CAAC,IAAI,KAAK,CAAC,IAAI,CAAC,OAAO,EAAE,EAAE;QACtD,MAAM,kBAAkB,GAAG,MAAA,cAAc,CAAC,KAAK,CAAC,mCAAI,IAAI,CAAC;QAEzD,MAAM,yBAAyB,GAAG,gDAAgD,CAChF,UAAU,EACV,kBAAkB,EAClB,qBAAqB,CACtB,CAAC;QAEF,IAAI,KAAK,CAAC,OAAO,CAAC,yBAAyB,CAAC,EAAE;YAC5C,cAAc,CAAC,IAAI,CAAC,GAAG,yBAAyB,CAAC,CAAC;SACnD;aAAM,IAAI,yBAAyB,EAAE;YACpC,cAAc,CAAC,IAAI,CAAC,yBAAyB,CAAC,CAAC;SAChD;KACF;IAED,OAAO,cAAc,CAAC,MAAM,GAAG,CAAC,CAAC,CAAC,CAAC,cAAc,CAAC,CAAC,CAAC,IAAI,CAAC;AAC3D,CAAC;AAED,SAAS,6BAA6B,CACpC,KAAwB,EACxB,qBAA6D;;IAE7D,MAAM,sBAAsB,GAAG,MAAA,qBAAqB,CAAC,KAAK,CAAC,MAAM,CAAC,0CAAE,IAAI,CACtE,CAAC,cAAc,EAAE,EAAE,CAAC,cAAc,CAAC,IAAI,KAAK,MAAM,CACnD,CAAC;IAEF,IAAI,sBAAsB,EAAE;QAC1B,wDAAwD;QACxD,IAAI,CAAA,sBAAsB,aAAtB,sBAAsB,uBAAtB,sBAAsB,CAAE,KAAK,MAAK,SAAS,IAAI,sBAAsB,CAAC,KAAK,KAAK,IAAI,EAAE;YACxF,OAAO;SACR;QAED,6DAA6D;QAC7D,OAAO,kBAAkB,CAAC,KAAK,EAAE,sBAAsB,CAAC,KAAK,CAAC,CAAC;KAChE;IAED,OAAO;AACT,CAAC;AAED,SAAS,kBAAkB,CACzB,KAAwB,EACxB,MAAwC,EACxC,qBAA6D;IAE7D,MAAM,0BAA0B,GAAG,6BAA6B,CAAC,KAAK,EAAE,qBAAqB,CAAC,CAAC;IAE/F,6FAA6F;IAC7F,IAAI,CAAA,MAAM,aAAN,MAAM,uBAAN,MAAM,CAAE,MAAM,KAAI,CAAA,MAAM,aAAN,MAAM,uBAAN,MAAM,CAAE,MAAM,CAAC,MAAM,IAAG,CAAC,EAAE;QAC/C,OAAO,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,IAAI,CAAC;KACvB;IAED,IAAI,CAAC,0BAA0B,EAAE;QAC/B,OAAO,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,IAAI,CAAC;KACvB;IAED,IAAI,MAAM,EAAE;QACV,uCACK,MAAM,KACT,MAAM,EAAE,CAAC,0BAA0B,CAAC,IACpC;KACH;IAED,OAAO;QACL,MAAM,EAAE,KAAK,CAAC,MAAM;QACpB,IAAI,EAAE,KAAK,CAAC,IAAI;QAChB,MAAM,EAAE,CAAC,0BAA0B,CAAC;KACrC,CAAC;AACJ,CAAC;AAED,SAAS,mBAAmB,CAC1B,KAAwB,EACxB,MAAwC,EACxC,qBAA6D;IAE7D,MAAM,0BAA0B,GAAG,6BAA6B,CAAC,KAAK,EAAE,qBAAqB,CAAC,CAAC;IAC/F,IAAI,CAAC,0BAA0B,EAAE;QAC/B,OAAO,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,IAAI,CAAC;KACvB;IAED,OAAO;QACL,MAAM,EAAE,KAAK,CAAC,MAAM;QACpB,IAAI,EAAE,KAAK,CAAC,IAAI;QAChB,MAAM,EAAE,CAAC,0BAA0B,CAAC;KACrC,CAAC;AACJ,CAAC;AAED,sCAAsC;AACtC,SAAS,kBAAkB,CAAC,KAAwB,EAAE,KAAU;IAC9D,IAAI,KAAK,CAAC,YAAY,EAAE;QACtB,MAAM,YAAY,GAAG,KAAK,CAAC,YAAY,CAAC,IAAI,CAC1C,CAAC,MAAqC,EAAE,EAAE;;YACxC,OAAA,CAAA,MAAA,MAAM,CAAC,WAAW,0CAAE,IAAI,OAAK,KAAK,aAAL,KAAK,uBAAL,KAAK,CAAE,IAAI,CAAA;gBACxC,sDAAsD;gBACtD,CAAC,CAAC,CAAA,MAAA,MAAM,CAAC,WAAW,0CAAE,IAAI,CAAA,IAAI,CAAA,MAAA,MAAM,CAAC,WAAW,0CAAE,OAAO,OAAK,KAAK,aAAL,KAAK,uBAAL,KAAK,CAAE,OAAO,CAAA,CAAC,CAAA;SAAA,CAChF,CAAC;QAEF,IAAI,YAAY,EAAE;YAChB,OAAO,YAAY,CAAC;SACrB;KACF;IAED,IAAI,OAAO,KAAK,KAAK,SAAS,IAAI,KAAK,CAAC,IAAI,KAAK,SAAS,EAAE;QAC1D,OAAO,EAAE,YAAY,EAAE,KAAK,EAAE,CAAC;KAChC;IAED,IAAI,OAAO,KAAK,KAAK,QAAQ,EAAE;QAC7B,IAAI,KAAK,CAAC,IAAI,KAAK,SAAS,EAAE;YAC5B,OAAO,EAAE,YAAY,EAAE,KAAK,EAAE,CAAC;SAChC;QACD,IAAI,KAAK,CAAC,IAAI,KAAK,SAAS,EAAE;YAC5B,OAAO,EAAE,YAAY,EAAE,KAAK,EAAE,CAAC;SAChC;KACF;IAED,IAAI,OAAO,KAAK,KAAK,QAAQ,IAAI,KAAK,CAAC,IAAI,EAAE;QAC3C,OAAO,EAAE,aAAa,EAAE,KAAK,EAAE,CAAC;KACjC;IAED,IAAI,OAAO,KAAK,KAAK,QAAQ,IAAI,KAAK,CAAC,MAAM,IAAI,KAAK,CAAC,IAAI,EAAE;QAC3D,OAAO,EAAE,WAAW,EAAE,KAAK,EAAE,CAAC;KAC/B;IAED,gCAAgC;IAChC,IAAI,KAAK,CAAC,IAAI,KAAK,MAAM,IAAI,eAAe,CAAC,KAAK,CAAC,EAAE;QACnD,OAAO,EAAE,SAAS,EAAE,KAAK,EAAE,CAAC;KAC7B;IAED,IAAI,KAAK,CAAC,IAAI,KAAK,UAAU,IAAI,eAAe,CAAC,KAAK,CAAC,EAAE;QACvD,OAAO,EAAE,aAAa,EAAE,KAAK,EAAE,CAAC;KACjC;IAED,IAAI,KAAK,CAAC,IAAI,KAAK,MAAM,IAAI,WAAW,CAAC,KAAK,CAAC,EAAE;QAC/C,OAAO,EAAE,SAAS,EAAE,KAAK,EAAE,CAAC;KAC7B;IAED,OAAO,EAAE,WAAW,EAAE,KAAK,EAAE,CAAC;AAChC,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,eAAe,CAAC,KAAa;IAC3C,MAAM,eAAe,GAAG,CAAC,MAAM,EAAE,SAAS,EAAE,YAAY,EAAE,sBAAsB,CAAC,CAAC;IAClF,MAAM,aAAa,GAAG,KAAK,CAAC,KAAK,CAAC,CAAC,MAAM,EAAE,CAAC;IAC5C,OAAO,KAAK,CAAC,aAAa,EAAE,eAAe,EAAE,IAAI,CAAC,CAAC,OAAO,EAAE,CAAC;AAC/D,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,WAAW,CAAC,KAAa;IACvC,MAAM,SAAS,GAAG,4DAA4D,CAAC;IAC/E,OAAO,SAAS,CAAC,IAAI,CAAC,KAAK,CAAC,CAAC;AAC/B,CAAC"}

package/lib/utils/choice.d.ts

@@ -0,0 +1,44 @@
+import type { Coding, QuestionnaireItem, QuestionnaireItemAnswerOption, QuestionnaireResponseItem, QuestionnaireResponseItemAnswer } from 'fhir/r4';
+import { ChoiceItemControl, ChoiceItemOrientation } from '../interfaces/choice.enum';
+/**
+ * Convert codings to Questionnaire answer options
+ *
+ * @author Sean Fong
+ */
+export declare function convertCodingsToAnswerOptions(codings: Coding[]): QuestionnaireItemAnswerOption[];
+/**
+ * Find and return corresponding answerOption based on selected answer in form
+ *
+ * @author Sean Fong
+ */
+export declare function findInAnswerOptions(options: QuestionnaireItemAnswerOption[], valueInString: string): QuestionnaireResponseItemAnswer | undefined;
+/**
+ * Compare answer option value with selected value via valueString, valueInteger, or valueCoding.code
+ *
+ * @author Sean Fong
+ */
+export declare function compareAnswerOptionValue(option: QuestionnaireItemAnswerOption, value: QuestionnaireItemAnswerOption): boolean;
+/**
+ * Get choice control type based on certain criteria in choice items
+ *
+ * @author Sean Fong
+ */
+export declare function getChoiceControlType(qItem: QuestionnaireItem): ChoiceItemControl;
+/**
+ * Find and return string value from selected answer
+ *
+ * @author Sean Fong
+ */
+export declare function getQrChoiceValue(qrChoice: QuestionnaireResponseItem, returnNull?: boolean): string | null;
+/**
+ * Update choice checkbox group answers based on checkbox changes
+ *
+ * @author Sean Fong
+ */
+export declare function updateChoiceCheckboxAnswers(changedValue: string, answers: QuestionnaireResponseItemAnswer[], options: QuestionnaireItemAnswerOption[], oldQrItem: QuestionnaireResponseItem, isMultiSelection: boolean, answerKey: string | undefined): QuestionnaireResponseItem | null;
+/**
+ * Get choice orientation from its itemControl
+ *
+ * @author Sean Fong
+ */
+export declare function getChoiceOrientation(qItem: QuestionnaireItem): ChoiceItemOrientation | null;

package/lib/utils/choice.js

@@ -0,0 +1,166 @@
+import { ChoiceItemControl, ChoiceItemOrientation } from '../interfaces/choice.enum';
+import { isSpecificItemControl } from './itemControl';
+import { getRelevantCodingProperties } from './valueSet';
+/**
+ * Convert codings to Questionnaire answer options
+ *
+ * @author Sean Fong
+ */
+export function convertCodingsToAnswerOptions(codings) {
+    return codings.map((coding) => ({
+        valueCoding: getRelevantCodingProperties(coding)
+    }));
+}
+/**
+ * Find and return corresponding answerOption based on selected answer in form
+ *
+ * @author Sean Fong
+ */
+export function findInAnswerOptions(options, valueInString) {
+    for (const option of options) {
+        if (option.valueCoding) {
+            if (valueInString === option.valueCoding.code) {
+                return {
+                    valueCoding: getRelevantCodingProperties(option.valueCoding)
+                };
+            }
+            // handle case where valueCoding.code is not present
+            if (valueInString === option.valueCoding.display) {
+                return {
+                    valueCoding: getRelevantCodingProperties(option.valueCoding)
+                };
+            }
+        }
+        if (option.valueString) {
+            if (valueInString === option.valueString) {
+                return {
+                    valueString: option.valueString
+                };
+            }
+        }
+        if (option.valueInteger) {
+            if (valueInString === option.valueInteger.toString()) {
+                return {
+                    valueInteger: option.valueInteger
+                };
+            }
+        }
+    }
+    return;
+}
+/**
+ * Compare answer option value with selected value via valueString, valueInteger, or valueCoding.code
+ *
+ * @author Sean Fong
+ */
+export function compareAnswerOptionValue(option, value) {
+    var _a, _b;
+    if (!value) {
+        return false;
+    }
+    if (value.valueString) {
+        return option.valueString === value.valueString;
+    }
+    if (value.valueInteger) {
+        return option.valueInteger === value.valueInteger;
+    }
+    if (value.valueCoding) {
+        if (value.valueCoding.code) {
+            return ((_a = option.valueCoding) === null || _a === void 0 ? void 0 : _a.code) === value.valueCoding.code;
+        }
+        // handle case where valueCoding.code is not present
+        return ((_b = option.valueCoding) === null || _b === void 0 ? void 0 : _b.display) === value.valueCoding.display;
+    }
+    return false;
+}
+/**
+ * Get choice control type based on certain criteria in choice items
+ *
+ * @author Sean Fong
+ */
+export function getChoiceControlType(qItem) {
+    if (isSpecificItemControl(qItem, 'autocomplete')) {
+        return ChoiceItemControl.Autocomplete;
+    }
+    if (isSpecificItemControl(qItem, 'check-box')) {
+        return ChoiceItemControl.Checkbox;
+    }
+    if (isSpecificItemControl(qItem, 'radio-button')) {
+        return ChoiceItemControl.Radio;
+    }
+    if (isSpecificItemControl(qItem, 'drop-down')) {
+        return ChoiceItemControl.Select;
+    }
+    return ChoiceItemControl.Select;
+}
+/**
+ * Find and return string value from selected answer
+ *
+ * @author Sean Fong
+ */
+export function getQrChoiceValue(qrChoice, returnNull) {
+    var _a, _b;
+    if (qrChoice.answer && qrChoice.answer.length > 0) {
+        const answer = qrChoice['answer'][0];
+        if (answer['valueCoding']) {
+            return (_b = (_a = answer.valueCoding.code) !== null && _a !== void 0 ? _a : answer.valueCoding.display) !== null && _b !== void 0 ? _b : '';
+        }
+        else if (answer['valueString'] !== undefined) {
+            return answer.valueString;
+        }
+        else if (answer['valueInteger']) {
+            return answer.valueInteger.toString();
+        }
+    }
+    return returnNull ? null : '';
+}
+/**
+ * Update choice checkbox group answers based on checkbox changes
+ *
+ * @author Sean Fong
+ */
+export function updateChoiceCheckboxAnswers(changedValue, answers, options, oldQrItem, isMultiSelection, answerKey) {
+    // search for answer item of changedValue from list of answer options
+    const newAnswer = findInAnswerOptions(options, changedValue);
+    if (!newAnswer) {
+        return null;
+    }
+    // Process multi-selection
+    if (isMultiSelection && answers.length > 0) {
+        // check and filter if new answer exists in existing qrAnswers
+        const updatedAnswers = answers.filter((answer) => JSON.stringify(answer) !== JSON.stringify(newAnswer));
+        // new answer is not present in existing answers, so we add it to the array
+        if (updatedAnswers.length === answers.length) {
+            updatedAnswers.push(newAnswer);
+        }
+        const updatedAnswersWithKey = updatedAnswers.map((answer) => (Object.assign(Object.assign({}, answer), { id: answerKey })));
+        return Object.assign(Object.assign({}, oldQrItem), { answer: updatedAnswersWithKey });
+    }
+    // Process single selection
+    // If answer already exists, remove it from the array. Otherwise, add it to the array
+    const answerExists = answers.some((answer) => JSON.stringify(answer) === JSON.stringify(newAnswer));
+    return answerExists
+        ? Object.assign(Object.assign({}, oldQrItem), { answer: [] }) : Object.assign(Object.assign({}, oldQrItem), { answer: [Object.assign(Object.assign({}, newAnswer), { id: answerKey })] });
+}
+/**
+ * Get choice orientation from its itemControl
+ *
+ * @author Sean Fong
+ */
+export function getChoiceOrientation(qItem) {
+    var _a;
+    const itemControl = (_a = qItem.extension) === null || _a === void 0 ? void 0 : _a.find((extension) => extension.url === 'http://hl7.org/fhir/StructureDefinition/questionnaire-choiceOrientation');
+    if (itemControl) {
+        const code = itemControl.valueCode;
+        if (code) {
+            if (code === 'horizontal') {
+                return ChoiceItemOrientation.Horizontal;
+            }
+            else if (code === 'vertical') {
+                return ChoiceItemOrientation.Vertical;
+            }
+        }
+    }
+    return null;
+}
+//# sourceMappingURL=choice.js.map

package/lib/utils/choice.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"choice.js","sourceRoot":"","sources":["../../src/utils/choice.ts"],"names":[],"mappings":"AAwBA,OAAO,EAAE,iBAAiB,EAAE,qBAAqB,EAAE,MAAM,2BAA2B,CAAC;AACrF,OAAO,EAAE,qBAAqB,EAAE,MAAM,eAAe,CAAC;AACtD,OAAO,EAAE,2BAA2B,EAAE,MAAM,YAAY,CAAC;AAEzD;;;;GAIG;AACH,MAAM,UAAU,6BAA6B,CAAC,OAAiB;IAC7D,OAAO,OAAO,CAAC,GAAG,CAChB,CAAC,MAAM,EAAiC,EAAE,CAAC,CAAC;QAC1C,WAAW,EAAE,2BAA2B,CAAC,MAAM,CAAC;KACjD,CAAC,CACH,CAAC;AACJ,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,mBAAmB,CACjC,OAAwC,EACxC,aAAqB;IAErB,KAAK,MAAM,MAAM,IAAI,OAAO,EAAE;QAC5B,IAAI,MAAM,CAAC,WAAW,EAAE;YACtB,IAAI,aAAa,KAAK,MAAM,CAAC,WAAW,CAAC,IAAI,EAAE;gBAC7C,OAAO;oBACL,WAAW,EAAE,2BAA2B,CAAC,MAAM,CAAC,WAAW,CAAC;iBAC7D,CAAC;aACH;YAED,oDAAoD;YACpD,IAAI,aAAa,KAAK,MAAM,CAAC,WAAW,CAAC,OAAO,EAAE;gBAChD,OAAO;oBACL,WAAW,EAAE,2BAA2B,CAAC,MAAM,CAAC,WAAW,CAAC;iBAC7D,CAAC;aACH;SACF;QAED,IAAI,MAAM,CAAC,WAAW,EAAE;YACtB,IAAI,aAAa,KAAK,MAAM,CAAC,WAAW,EAAE;gBACxC,OAAO;oBACL,WAAW,EAAE,MAAM,CAAC,WAAW;iBAChC,CAAC;aACH;SACF;QAED,IAAI,MAAM,CAAC,YAAY,EAAE;YACvB,IAAI,aAAa,KAAK,MAAM,CAAC,YAAY,CAAC,QAAQ,EAAE,EAAE;gBACpD,OAAO;oBACL,YAAY,EAAE,MAAM,CAAC,YAAY;iBAClC,CAAC;aACH;SACF;KACF;IAED,OAAO;AACT,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,wBAAwB,CACtC,MAAqC,EACrC,KAAoC;;IAEpC,IAAI,CAAC,KAAK,EAAE;QACV,OAAO,KAAK,CAAC;KACd;IAED,IAAI,KAAK,CAAC,WAAW,EAAE;QACrB,OAAO,MAAM,CAAC,WAAW,KAAK,KAAK,CAAC,WAAW,CAAC;KACjD;IAED,IAAI,KAAK,CAAC,YAAY,EAAE;QACtB,OAAO,MAAM,CAAC,YAAY,KAAK,KAAK,CAAC,YAAY,CAAC;KACnD;IAED,IAAI,KAAK,CAAC,WAAW,EAAE;QACrB,IAAI,KAAK,CAAC,WAAW,CAAC,IAAI,EAAE;YAC1B,OAAO,CAAA,MAAA,MAAM,CAAC,WAAW,0CAAE,IAAI,MAAK,KAAK,CAAC,WAAW,CAAC,IAAI,CAAC;SAC5D;QAED,oDAAoD;QACpD,OAAO,CAAA,MAAA,MAAM,CAAC,WAAW,0CAAE,OAAO,MAAK,KAAK,CAAC,WAAW,CAAC,OAAO,CAAC;KAClE;IAED,OAAO,KAAK,CAAC;AACf,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,oBAAoB,CAAC,KAAwB;IAC3D,IAAI,qBAAqB,CAAC,KAAK,EAAE,cAAc,CAAC,EAAE;QAChD,OAAO,iBAAiB,CAAC,YAAY,CAAC;KACvC;IAED,IAAI,qBAAqB,CAAC,KAAK,EAAE,WAAW,CAAC,EAAE;QAC7C,OAAO,iBAAiB,CAAC,QAAQ,CAAC;KACnC;IAED,IAAI,qBAAqB,CAAC,KAAK,EAAE,cAAc,CAAC,EAAE;QAChD,OAAO,iBAAiB,CAAC,KAAK,CAAC;KAChC;IAED,IAAI,qBAAqB,CAAC,KAAK,EAAE,WAAW,CAAC,EAAE;QAC7C,OAAO,iBAAiB,CAAC,MAAM,CAAC;KACjC;IAED,OAAO,iBAAiB,CAAC,MAAM,CAAC;AAClC,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,gBAAgB,CAC9B,QAAmC,EACnC,UAAoB;;IAEpB,IAAI,QAAQ,CAAC,MAAM,IAAI,QAAQ,CAAC,MAAM,CAAC,MAAM,GAAG,CAAC,EAAE;QACjD,MAAM,MAAM,GAAG,QAAQ,CAAC,QAAQ,CAAC,CAAC,CAAC,CAAC,CAAC;QACrC,IAAI,MAAM,CAAC,aAAa,CAAC,EAAE;YACzB,OAAO,MAAA,MAAA,MAAM,CAAC,WAAW,CAAC,IAAI,mCAAI,MAAM,CAAC,WAAW,CAAC,OAAO,mCAAI,EAAE,CAAC;SACpE;aAAM,IAAI,MAAM,CAAC,aAAa,CAAC,KAAK,SAAS,EAAE;YAC9C,OAAO,MAAM,CAAC,WAAW,CAAC;SAC3B;aAAM,IAAI,MAAM,CAAC,cAAc,CAAC,EAAE;YACjC,OAAO,MAAM,CAAC,YAAY,CAAC,QAAQ,EAAE,CAAC;SACvC;KACF;IAED,OAAO,UAAU,CAAC,CAAC,CAAC,IAAI,CAAC,CAAC,CAAC,EAAE,CAAC;AAChC,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,2BAA2B,CACzC,YAAoB,EACpB,OAA0C,EAC1C,OAAwC,EACxC,SAAoC,EACpC,gBAAyB,EACzB,SAA6B;IAE7B,qEAAqE;IACrE,MAAM,SAAS,GAAG,mBAAmB,CAAC,OAAO,EAAE,YAAY,CAAC,CAAC;IAC7D,IAAI,CAAC,SAAS,EAAE;QACd,OAAO,IAAI,CAAC;KACb;IAED,0BAA0B;IAC1B,IAAI,gBAAgB,IAAI,OAAO,CAAC,MAAM,GAAG,CAAC,EAAE;QAC1C,8DAA8D;QAC9D,MAAM,cAAc,GAAG,OAAO,CAAC,MAAM,CACnC,CAAC,MAAM,EAAE,EAAE,CAAC,IAAI,CAAC,SAAS,CAAC,MAAM,CAAC,KAAK,IAAI,CAAC,SAAS,CAAC,SAAS,CAAC,CACjE,CAAC;QAEF,2EAA2E;QAC3E,IAAI,cAAc,CAAC,MAAM,KAAK,OAAO,CAAC,MAAM,EAAE;YAC5C,cAAc,CAAC,IAAI,CAAC,SAAS,CAAC,CAAC;SAChC;QAED,MAAM,qBAAqB,GAAG,cAAc,CAAC,GAAG,CAAC,CAAC,MAAM,EAAE,EAAE,CAAC,iCAAM,MAAM,KAAE,EAAE,EAAE,SAAS,IAAG,CAAC,CAAC;QAE7F,uCAAY,SAAS,KAAE,MAAM,EAAE,qBAAqB,IAAG;KACxD;IAED,2BAA2B;IAC3B,qFAAqF;IACrF,MAAM,YAAY,GAAG,OAAO,CAAC,IAAI,CAC/B,CAAC,MAAM,EAAE,EAAE,CAAC,IAAI,CAAC,SAAS,CAAC,MAAM,CAAC,KAAK,IAAI,CAAC,SAAS,CAAC,SAAS,CAAC,CACjE,CAAC;IACF,OAAO,YAAY;QACjB,CAAC,iCAAM,SAAS,KAAE,MAAM,EAAE,EAAE,IAC5B,CAAC,iCAAM,SAAS,KAAE,MAAM,EAAE,iCAAM,SAAS,KAAE,EAAE,EAAE,SAAS,IAAG,GAAE,CAAC;AAClE,CAAC;AAED;;;;GAIG;AACH,MAAM,UAAU,oBAAoB,CAAC,KAAwB;;IAC3D,MAAM,WAAW,GAAG,MAAA,KAAK,CAAC,SAAS,0CAAE,IAAI,CACvC,CAAC,SAAoB,EAAE,EAAE,CACvB,SAAS,CAAC,GAAG,KAAK,yEAAyE,CAC9F,CAAC;IAEF,IAAI,WAAW,EAAE;QACf,MAAM,IAAI,GAAG,WAAW,CAAC,SAAS,CAAC;QACnC,IAAI,IAAI,EAAE;YACR,IAAI,IAAI,KAAK,YAAY,EAAE;gBACzB,OAAO,qBAAqB,CAAC,UAAU,CAAC;aACzC;iBAAM,IAAI,IAAI,KAAK,UAAU,EAAE;gBAC9B,OAAO,qBAAqB,CAAC,QAAQ,CAAC;aACvC;SACF;KACF;IAED,OAAO,IAAI,CAAC;AACd,CAAC"}

package/lib/utils/computedUpdates.d.ts

@@ -0,0 +1,3 @@
+import type { Questionnaire, QuestionnaireResponse } from 'fhir/r4';
+import type { ComputedQRItemUpdates } from '../interfaces/computedUpdates.interface';
+export declare function applyComputedUpdates(questionnaire: Questionnaire, updatedResponse: QuestionnaireResponse, computedUpdates: ComputedQRItemUpdates): QuestionnaireResponse;

package/lib/utils/computedUpdates.js

@@ -0,0 +1,85 @@
+import { updateQuestionnaireResponse } from './genericRecursive';
+import { getQrItemsIndex, mapQItemsIndex } from './mapItem';
+import { updateQrItemsInGroup } from './qrItem';
+export function applyComputedUpdates(questionnaire, updatedResponse, computedUpdates) {
+    if (Object.keys(computedUpdates).length === 0) {
+        return updatedResponse;
+    }
+    return updateQuestionnaireResponse(questionnaire, updatedResponse, applyComputedUpdateRecursive, computedUpdates);
+}
+// Recursive function to apply updates for each item (and its children if applicable)
+function applyComputedUpdateRecursive(qItem, qrItemOrItems, computedUpdates) {
+    var _a, _b;
+    const update = computedUpdates[qItem.linkId];
+    if (update === null) {
+        // If update is null, remove the item (or group of items)
+        return null;
+    }
+    const hasMultipleAnswers = Array.isArray(qrItemOrItems);
+    if (hasMultipleAnswers) {
+        // Process repeating groups: Apply updates to each item in the group
+        return applyComputedUpdateFromRepeatGroup(qItem, qrItemOrItems, computedUpdates);
+    }
+    // At this point qrItemOrItems is a single QuestionnaireResponseItem
+    const qrItem = qrItemOrItems;
+    // Process items with child items
+    const childQItems = (_a = qItem.item) !== null && _a !== void 0 ? _a : [];
+    const childQrItems = (_b = qrItem === null || qrItem === void 0 ? void 0 : qrItem.item) !== null && _b !== void 0 ? _b : [];
+    if (childQItems.length > 0) {
+        const indexMap = mapQItemsIndex(qItem);
+        const qrItemsByIndex = getQrItemsIndex(childQItems, childQrItems, indexMap);
+        // Iterate child items
+        for (const [index, childQItem] of childQItems.entries()) {
+            const childQRItemOrItems = qrItemsByIndex[index];
+            const updatedChildQRItemOrItems = applyComputedUpdateRecursive(childQItem, childQRItemOrItems !== null && childQRItemOrItems !== void 0 ? childQRItemOrItems : null, computedUpdates);
+            // For non-repeating child items, apply the update
+            if (!Array.isArray(updatedChildQRItemOrItems)) {
+                const updatedChildQRItem = updatedChildQRItemOrItems;
+                if (updatedChildQRItem) {
+                    updateQrItemsInGroup(updatedChildQRItem, null, qrItem !== null && qrItem !== void 0 ? qrItem : { linkId: qItem.linkId, text: qItem.text, item: [] }, indexMap);
+                }
+            }
+        }
+        return constructGroupItem(qItem, qrItem, computedUpdates);
+    }
+    // If it's a single item with no children, apply the computed update
+    return constructSingleItem(qItem, qrItem, computedUpdates);
+}
+function applyComputedUpdateFromRepeatGroup(qItem, qrItems, computedUpdates) {
+    if (!qItem.item) {
+        return [];
+    }
+    return qrItems
+        .flatMap((childQrItem) => applyComputedUpdateRecursive(qItem, childQrItem, computedUpdates))
+        .filter((childQRItem) => !!childQRItem);
+}
+function constructGroupItem(qItem, qrItem, computedUpdates) {
+    const computedUpdate = computedUpdates[qItem.linkId];
+    // If group item has an existing answer, do not overwrite it with computed update
+    if ((qrItem === null || qrItem === void 0 ? void 0 : qrItem.answer) && (qrItem === null || qrItem === void 0 ? void 0 : qrItem.answer.length) > 0) {
+        return qrItem !== null && qrItem !== void 0 ? qrItem : null;
+    }
+    if (!computedUpdate) {
+        return qrItem !== null && qrItem !== void 0 ? qrItem : null;
+    }
+    if (qrItem) {
+        return Object.assign(Object.assign({}, qrItem), { answer: computedUpdate.answer });
+    }
+    return {
+        linkId: qItem.linkId,
+        text: qItem.text,
+        answer: computedUpdate.answer
+    };
+}
+function constructSingleItem(qItem, qrItem, computedUpdates) {
+    const computedUpdate = computedUpdates[qItem.linkId];
+    if (!computedUpdate) {
+        return qrItem !== null && qrItem !== void 0 ? qrItem : null;
+    }
+    return {
+        linkId: qItem.linkId,
+        text: qItem.text,
+        answer: computedUpdate.answer
+    };
+}
+//# sourceMappingURL=computedUpdates.js.map

package/lib/utils/computedUpdates.js.map

@@ -0,0 +1 @@
+{"version":3,"file":"computedUpdates.js","sourceRoot":"","sources":["../../src/utils/computedUpdates.ts"],"names":[],"mappings":"AAOA,OAAO,EAAE,2BAA2B,EAAE,MAAM,oBAAoB,CAAC;AACjE,OAAO,EAAE,eAAe,EAAE,cAAc,EAAE,MAAM,WAAW,CAAC;AAC5D,OAAO,EAAE,oBAAoB,EAAE,MAAM,UAAU,CAAC;AAEhD,MAAM,UAAU,oBAAoB,CAClC,aAA4B,EAC5B,eAAsC,EACtC,eAAsC;IAEtC,IAAI,MAAM,CAAC,IAAI,CAAC,eAAe,CAAC,CAAC,MAAM,KAAK,CAAC,EAAE;QAC7C,OAAO,eAAe,CAAC;KACxB;IAED,OAAO,2BAA2B,CAChC,aAAa,EACb,eAAe,EACf,4BAA4B,EAC5B,eAAe,CAChB,CAAC;AACJ,CAAC;AAED,qFAAqF;AACrF,SAAS,4BAA4B,CACnC,KAAwB,EACxB,aAA6E,EAC7E,eAAsC;;IAEtC,MAAM,MAAM,GAAG,eAAe,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC;IAE7C,IAAI,MAAM,KAAK,IAAI,EAAE;QACnB,yDAAyD;QACzD,OAAO,IAAI,CAAC;KACb;IAED,MAAM,kBAAkB,GAAG,KAAK,CAAC,OAAO,CAAC,aAAa,CAAC,CAAC;IACxD,IAAI,kBAAkB,EAAE;QACtB,oEAAoE;QACpE,OAAO,kCAAkC,CAAC,KAAK,EAAE,aAAa,EAAE,eAAe,CAAC,CAAC;KAClF;IAED,oEAAoE;IACpE,MAAM,MAAM,GAAG,aAAa,CAAC;IAE7B,iCAAiC;IACjC,MAAM,WAAW,GAAG,MAAA,KAAK,CAAC,IAAI,mCAAI,EAAE,CAAC;IACrC,MAAM,YAAY,GAAG,MAAA,MAAM,aAAN,MAAM,uBAAN,MAAM,CAAE,IAAI,mCAAI,EAAE,CAAC;IACxC,IAAI,WAAW,CAAC,MAAM,GAAG,CAAC,EAAE;QAC1B,MAAM,QAAQ,GAAG,cAAc,CAAC,KAAK,CAAC,CAAC;QACvC,MAAM,cAAc,GAAG,eAAe,CAAC,WAAW,EAAE,YAAY,EAAE,QAAQ,CAAC,CAAC;QAE5E,sBAAsB;QACtB,KAAK,MAAM,CAAC,KAAK,EAAE,UAAU,CAAC,IAAI,WAAW,CAAC,OAAO,EAAE,EAAE;YACvD,MAAM,kBAAkB,GAAG,cAAc,CAAC,KAAK,CAAC,CAAC;YAEjD,MAAM,yBAAyB,GAAG,4BAA4B,CAC5D,UAAU,EACV,kBAAkB,aAAlB,kBAAkB,cAAlB,kBAAkB,GAAI,IAAI,EAC1B,eAAe,CAChB,CAAC;YAEF,kDAAkD;YAClD,IAAI,CAAC,KAAK,CAAC,OAAO,CAAC,yBAAyB,CAAC,EAAE;gBAC7C,MAAM,kBAAkB,GAAG,yBAAyB,CAAC;gBACrD,IAAI,kBAAkB,EAAE;oBACtB,oBAAoB,CAClB,kBAAkB,EAClB,IAAI,EACJ,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,EAAE,MAAM,EAAE,KAAK,CAAC,MAAM,EAAE,IAAI,EAAE,KAAK,CAAC,IAAI,EAAE,IAAI,EAAE,EAAE,EAAE,EAC9D,QAAQ,CACT,CAAC;iBACH;aACF;SACF;QAED,OAAO,kBAAkB,CAAC,KAAK,EAAE,MAAM,EAAE,eAAe,CAAC,CAAC;KAC3D;IAED,oEAAoE;IACpE,OAAO,mBAAmB,CAAC,KAAK,EAAE,MAAM,EAAE,eAAe,CAAC,CAAC;AAC7D,CAAC;AAED,SAAS,kCAAkC,CACzC,KAAwB,EACxB,OAAoC,EACpC,eAAsC;IAEtC,IAAI,CAAC,KAAK,CAAC,IAAI,EAAE;QACf,OAAO,EAAE,CAAC;KACX;IAED,OAAO,OAAO;SACX,OAAO,CAAC,CAAC,WAAW,EAAE,EAAE,CAAC,4BAA4B,CAAC,KAAK,EAAE,WAAW,EAAE,eAAe,CAAC,CAAC;SAC3F,MAAM,CAAC,CAAC,WAAW,EAA4C,EAAE,CAAC,CAAC,CAAC,WAAW,CAAC,CAAC;AACtF,CAAC;AAED,SAAS,kBAAkB,CACzB,KAAwB,EACxB,MAAwC,EACxC,eAAsC;IAEtC,MAAM,cAAc,GAAG,eAAe,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC;IAErD,iFAAiF;IACjF,IAAI,CAAA,MAAM,aAAN,MAAM,uBAAN,MAAM,CAAE,MAAM,KAAI,CAAA,MAAM,aAAN,MAAM,uBAAN,MAAM,CAAE,MAAM,CAAC,MAAM,IAAG,CAAC,EAAE;QAC/C,OAAO,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,IAAI,CAAC;KACvB;IAED,IAAI,CAAC,cAAc,EAAE;QACnB,OAAO,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,IAAI,CAAC;KACvB;IAED,IAAI,MAAM,EAAE;QACV,uCACK,MAAM,KACT,MAAM,EAAE,cAAc,CAAC,MAAM,IAC7B;KACH;IAED,OAAO;QACL,MAAM,EAAE,KAAK,CAAC,MAAM;QACpB,IAAI,EAAE,KAAK,CAAC,IAAI;QAChB,MAAM,EAAE,cAAc,CAAC,MAAM;KAC9B,CAAC;AACJ,CAAC;AAED,SAAS,mBAAmB,CAC1B,KAAwB,EACxB,MAAwC,EACxC,eAAsC;IAEtC,MAAM,cAAc,GAAG,eAAe,CAAC,KAAK,CAAC,MAAM,CAAC,CAAC;IACrD,IAAI,CAAC,cAAc,EAAE;QACnB,OAAO,MAAM,aAAN,MAAM,cAAN,MAAM,GAAI,IAAI,CAAC;KACvB;IAED,OAAO;QACL,MAAM,EAAE,KAAK,CAAC,MAAM;QACpB,IAAI,EAAE,KAAK,CAAC,IAAI;QAChB,MAAM,EAAE,cAAc,CAAC,MAAM;KAC9B,CAAC;AACJ,CAAC"}

package/lib/utils/dayjsExtend.d.ts

@@ -0,0 +1 @@
+export {};