@f1studio/form-spec 5.0.0-alpha.101 → 5.0.0-alpha.103

package/src/PathwayDataExtractor.ts

@@ -1,290 +1,290 @@
-import { ClinicalPathway_TerminalInfo, Shared_StateKey, ClinicalPathway_StateType_$union, ClinicalPathway_EvaluationInfo, ClinicalPathway_DecisionInfo, ClinicalPathway_ActionInfo_$union, ClinicalPathway_MedicationAction, ClinicalPathway_FieldValueSource_$union, ClinicalPathway_SetFieldValueAction, ClinicalPathway_NavigateToFormAction, ClinicalPathway_PrescriptionAction, ClinicalPathway_ProblemAction, ClinicalPathway_AlertAction, ClinicalPathway_TaskAction, ClinicalPathway_DocumentationAction, ClinicalPathway_ReferralAction, ClinicalPathway_TestAction, ClinicalPathway_EducationAction, ClinicalPathway_ProcedureAction } from "./FormSpec.js";
-import { split, replace, join, isNullOrWhiteSpace, substring, printf, toText } from "@fable-org/fable-library-js/String.js";
-import { singleton, append, map, empty, FSharpList, filter } from "@fable-org/fable-library-js/List.js";
-import { Option, value } from "@fable-org/fable-library-js/Option.js";
-import { item, map as map_1 } from "@fable-org/fable-library-js/Array.js";
-import { int32 } from "@fable-org/fable-library-js/Int32.js";
-
-export function extractActionText(action: ClinicalPathway_ActionInfo_$union): string {
-    switch (action.tag) {
-        case /* Procedure */ 4: {
-            const p: ClinicalPathway_ProcedureAction = action.fields[0];
-            return toText(printf("Procedure: %s"))(p.Name);
-        }
-        case /* Education */ 3: {
-            const e: ClinicalPathway_EducationAction = action.fields[0];
-            return "Education";
-        }
-        case /* Test */ 1: {
-            const t: ClinicalPathway_TestAction = action.fields[0];
-            return toText(printf("Test: %s"))(t.TestName);
-        }
-        case /* Referral */ 2: {
-            const r: ClinicalPathway_ReferralAction = action.fields[0];
-            return toText(printf("Refer to %s"))(r.Target);
-        }
-        case /* Documentation */ 5: {
-            const d: ClinicalPathway_DocumentationAction = action.fields[0];
-            return toText(printf("Document: %s"))(d.FormName);
-        }
-        case /* Task */ 6: {
-            const t_1: ClinicalPathway_TaskAction = action.fields[0];
-            return toText(printf("Task: %s"))(t_1.Description);
-        }
-        case /* Alert */ 7: {
-            const a: ClinicalPathway_AlertAction = action.fields[0];
-            return toText(printf("Alert: %s"))(a.Message);
-        }
-        case /* Problem */ 8: {
-            const p_1: ClinicalPathway_ProblemAction = action.fields[0];
-            return toText(printf("Problem: %s"))(p_1.ProblemName);
-        }
-        case /* Prescription */ 9: {
-            const p_2: ClinicalPathway_PrescriptionAction = action.fields[0];
-            return toText(printf("Prescription: %s"))(p_2.Medication);
-        }
-        case /* NavigateToForm */ 11: {
-            const n: ClinicalPathway_NavigateToFormAction = action.fields[0];
-            return toText(printf("Navigate to: %s"))(n.FormId);
-        }
-        case /* SetFieldValue */ 10: {
-            const s: ClinicalPathway_SetFieldValueAction = action.fields[0];
-            const fieldGuid: string = s.TargetField.fields[0];
-            const shortGuid: string = (fieldGuid.length > 8) ? (substring(fieldGuid, 0, 8) + "...") : fieldGuid;
-            let valueText: string;
-            const matchValue: ClinicalPathway_FieldValueSource_$union = s.Value;
-            switch (matchValue.tag) {
-                case /* FieldReference */ 1: {
-                    const g: string = matchValue.fields[0].fields[0];
-                    valueText = "from field";
-                    break;
-                }
-                case /* OptionKey */ 2: {
-                    const g_1: string = matchValue.fields[0].fields[0];
-                    valueText = "option";
-                    break;
-                }
-                default: {
-                    const v: string = matchValue.fields[0];
-                    valueText = (isNullOrWhiteSpace(v) ? "(empty)" : v);
-                }
-            }
-            return toText(printf("Set Field: %s = %s"))(shortGuid)(valueText);
-        }
-        default: {
-            const m: ClinicalPathway_MedicationAction = action.fields[0];
-            return toText(printf("Rx: %s"))(m.Name);
-        }
-    }
-}
-
-export function extractActionDetails(action: ClinicalPathway_ActionInfo_$union): string {
-    switch (action.tag) {
-        case /* Procedure */ 4:
-            return action.fields[0].Name;
-        case /* Education */ 3:
-            return join("; ", action.fields[0].Topics);
-        case /* Test */ 1: {
-            const t: ClinicalPathway_TestAction = action.fields[0];
-            return toText(printf("Test: %s"))(t.TestName);
-        }
-        case /* Referral */ 2: {
-            const r: ClinicalPathway_ReferralAction = action.fields[0];
-            return toText(printf("Refer to %s (%s)"))(r.Target)(r.Reason);
-        }
-        case /* Documentation */ 5: {
-            const d: ClinicalPathway_DocumentationAction = action.fields[0];
-            return toText(printf("Document: %s"))(d.FormName);
-        }
-        case /* Task */ 6: {
-            const t_1: ClinicalPathway_TaskAction = action.fields[0];
-            return toText(printf("Task: %s"))(t_1.Description);
-        }
-        case /* Alert */ 7: {
-            const a: ClinicalPathway_AlertAction = action.fields[0];
-            return toText(printf("Alert: %s"))(a.Message);
-        }
-        case /* Problem */ 8: {
-            const p_1: ClinicalPathway_ProblemAction = action.fields[0];
-            return toText(printf("Problem: %s"))(p_1.ProblemName);
-        }
-        case /* Prescription */ 9: {
-            const p_2: ClinicalPathway_PrescriptionAction = action.fields[0];
-            return toText(printf("Prescription: %s"))(p_2.Medication);
-        }
-        case /* NavigateToForm */ 11: {
-            const n: ClinicalPathway_NavigateToFormAction = action.fields[0];
-            return toText(printf("Navigate to: %s"))(n.FormId);
-        }
-        case /* SetFieldValue */ 10: {
-            const s: ClinicalPathway_SetFieldValueAction = action.fields[0];
-            const guid: string = s.TargetField.fields[0];
-            let valueText: string;
-            const matchValue: ClinicalPathway_FieldValueSource_$union = s.Value;
-            switch (matchValue.tag) {
-                case /* FieldReference */ 1: {
-                    valueText = (`from ${matchValue.fields[0].fields[0]}`);
-                    break;
-                }
-                case /* OptionKey */ 2: {
-                    valueText = (`option ${matchValue.fields[0].fields[0]}`);
-                    break;
-                }
-                default: {
-                    const v: string = matchValue.fields[0];
-                    valueText = (isNullOrWhiteSpace(v) ? "(empty)" : v);
-                }
-            }
-            return toText(printf("Set Field %s = %s"))(guid)(valueText);
-        }
-        default: {
-            const m: ClinicalPathway_MedicationAction = action.fields[0];
-            return toText(printf("%s %s %s %s"))(m.Name)(m.Dose)(m.Route)(m.Frequency);
-        }
-    }
-}
-
-export function extractActionType(action: ClinicalPathway_ActionInfo_$union): string {
-    switch (action.tag) {
-        case /* Procedure */ 4:
-            return "Procedure";
-        case /* Education */ 3:
-            return "Education";
-        case /* Test */ 1:
-            return "Test";
-        case /* Referral */ 2:
-            return "Referral";
-        case /* Documentation */ 5:
-            return "Documentation";
-        case /* Task */ 6:
-            return "Task";
-        case /* Alert */ 7:
-            return "Alert";
-        case /* Problem */ 8:
-            return "Problem";
-        case /* Prescription */ 9:
-            return "Prescription";
-        case /* SetFieldValue */ 10:
-            return "SetFieldValue";
-        case /* NavigateToForm */ 11:
-            return "NavigateToForm";
-        default:
-            return "Medication";
-    }
-}
-
-export function extractDecisionDetails(decision: ClinicalPathway_DecisionInfo): [string, FSharpList<string>] {
-    return [decision.Question, filter<string>((opt: string): boolean => {
-        if ((opt !== "Yes") && (opt !== "No")) {
-            return opt !== "None of the above";
-        }
-        else {
-            return false;
-        }
-    }, decision.Options)] as [string, FSharpList<string>];
-}
-
-export function extractEvaluationDetails(evaluation: ClinicalPathway_EvaluationInfo): [string, FSharpList<string>] {
-    let matchValue: Option<FSharpList<string>>;
-    return [evaluation.EvaluationName, (matchValue = evaluation.CriticalFindings, (matchValue == null) ? empty<string>() : value(matchValue))] as [string, FSharpList<string>];
-}
-
-export function extractEvaluationName(evaluation: ClinicalPathway_EvaluationInfo): string {
-    return evaluation.EvaluationName;
-}
-
-export function stateTypeToString(stateType: ClinicalPathway_StateType_$union): string {
-    switch (stateType.tag) {
-        case /* Decision */ 1:
-            return "Decision";
-        case /* Action */ 2:
-            return "Action";
-        case /* CompoundAction */ 3:
-            return "CompoundAction";
-        case /* ConditionalAction */ 4:
-            return "ConditionalAction";
-        case /* Terminal */ 5:
-            return "Terminal";
-        default:
-            return "Evaluation";
-    }
-}
-
-export function isTerminalState(stateType: ClinicalPathway_StateType_$union): boolean {
-    if (stateType.tag === /* Terminal */ 5) {
-        return true;
-    }
-    else {
-        return false;
-    }
-}
-
-export function extractCompoundActionTexts(actions: FSharpList<ClinicalPathway_ActionInfo_$union>): FSharpList<string> {
-    return map<ClinicalPathway_ActionInfo_$union, string>(extractActionText, actions);
-}
-
-export function extractCompoundActionDetails(actions: FSharpList<ClinicalPathway_ActionInfo_$union>): FSharpList<string> {
-    return map<ClinicalPathway_ActionInfo_$union, string>(extractActionDetails, actions);
-}
-
-export function sanitizeMermaidId(id: string): string {
-    return replace(replace(replace(id, "-", "_"), " ", "_"), ".", "_");
-}
-
-export function sanitizeMermaidText(text: string): string {
-    return replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(text, "\"", "\'"), "(", "-"), ")", "-"), "{", "-"), "}", "-"), "<", "-"), ">", "-"), "|", "/"), "`", "\'"), "\n", " "), "\r", " "), "  ", " ");
-}
-
-export function wrapTextForReactFlow(text: string, maxWidth: int32): string {
-    if (text.length <= maxWidth) {
-        return text;
-    }
-    else {
-        const words: string[] = map_1<string, string>((word: string): string => {
-            if (text.indexOf(`${word} =`) >= 0) {
-                return `${word} =`;
-            }
-            else if (text.indexOf(`${word},`) >= 0) {
-                return `${word},`;
-            }
-            else if (text.indexOf(`${word};`) >= 0) {
-                return `${word};`;
-            }
-            else if (text.indexOf(`${word}:`) >= 0) {
-                return `${word}:`;
-            }
-            else {
-                return word;
-            }
-        }, split(text, [" ", ",", ";", "=", ":"], undefined, 1));
-        let lines: FSharpList<string> = empty<string>();
-        let currentLine = "";
-        for (let idx = 0; idx <= (words.length - 1); idx++) {
-            const word_1: string = item(idx, words);
-            if (currentLine === "") {
-                currentLine = word_1;
-            }
-            else if (((currentLine + " ") + word_1).length <= maxWidth) {
-                currentLine = ((currentLine + " ") + word_1);
-            }
-            else {
-                lines = append(lines, singleton(currentLine));
-                currentLine = word_1;
-            }
-        }
-        if (currentLine !== "") {
-            lines = append(lines, singleton(currentLine));
-        }
-        return join("\n", lines);
-    }
-}
-
-export function extractStateKeyString(stateKey: Shared_StateKey): string {
-    return stateKey.fields[0];
-}
-
-export function getTerminalOutcome(terminal: ClinicalPathway_TerminalInfo): string {
-    return terminal.Outcome;
-}
-
-//# sourceMappingURL=PathwayDataExtractor.ts.map
+import { ClinicalPathway_TerminalInfo, Shared_StateKey, ClinicalPathway_StateType_$union, ClinicalPathway_EvaluationInfo, ClinicalPathway_DecisionInfo, ClinicalPathway_ActionInfo_$union, ClinicalPathway_MedicationAction, ClinicalPathway_FieldValueSource_$union, ClinicalPathway_SetFieldValueAction, ClinicalPathway_NavigateToFormAction, ClinicalPathway_PrescriptionAction, ClinicalPathway_ProblemAction, ClinicalPathway_AlertAction, ClinicalPathway_TaskAction, ClinicalPathway_DocumentationAction, ClinicalPathway_ReferralAction, ClinicalPathway_TestAction, ClinicalPathway_EducationAction, ClinicalPathway_ProcedureAction } from "./FormSpec.js";
+import { split, replace, join, isNullOrWhiteSpace, substring, printf, toText } from "@fable-org/fable-library-js/String.js";
+import { singleton, append, map, empty, FSharpList, filter } from "@fable-org/fable-library-js/List.js";
+import { Option, value } from "@fable-org/fable-library-js/Option.js";
+import { item, map as map_1 } from "@fable-org/fable-library-js/Array.js";
+import { int32 } from "@fable-org/fable-library-js/Int32.js";
+
+export function extractActionText(action: ClinicalPathway_ActionInfo_$union): string {
+    switch (action.tag) {
+        case /* Procedure */ 4: {
+            const p: ClinicalPathway_ProcedureAction = action.fields[0];
+            return toText(printf("Procedure: %s"))(p.Name);
+        }
+        case /* Education */ 3: {
+            const e: ClinicalPathway_EducationAction = action.fields[0];
+            return "Education";
+        }
+        case /* Test */ 1: {
+            const t: ClinicalPathway_TestAction = action.fields[0];
+            return toText(printf("Test: %s"))(t.TestName);
+        }
+        case /* Referral */ 2: {
+            const r: ClinicalPathway_ReferralAction = action.fields[0];
+            return toText(printf("Refer to %s"))(r.Target);
+        }
+        case /* Documentation */ 5: {
+            const d: ClinicalPathway_DocumentationAction = action.fields[0];
+            return toText(printf("Document: %s"))(d.FormName);
+        }
+        case /* Task */ 6: {
+            const t_1: ClinicalPathway_TaskAction = action.fields[0];
+            return toText(printf("Task: %s"))(t_1.Description);
+        }
+        case /* Alert */ 7: {
+            const a: ClinicalPathway_AlertAction = action.fields[0];
+            return toText(printf("Alert: %s"))(a.Message);
+        }
+        case /* Problem */ 8: {
+            const p_1: ClinicalPathway_ProblemAction = action.fields[0];
+            return toText(printf("Problem: %s"))(p_1.ProblemName);
+        }
+        case /* Prescription */ 9: {
+            const p_2: ClinicalPathway_PrescriptionAction = action.fields[0];
+            return toText(printf("Prescription: %s"))(p_2.Medication);
+        }
+        case /* NavigateToForm */ 11: {
+            const n: ClinicalPathway_NavigateToFormAction = action.fields[0];
+            return toText(printf("Navigate to: %s"))(n.FormId);
+        }
+        case /* SetFieldValue */ 10: {
+            const s: ClinicalPathway_SetFieldValueAction = action.fields[0];
+            const fieldGuid: string = s.TargetField.fields[0];
+            const shortGuid: string = (fieldGuid.length > 8) ? (substring(fieldGuid, 0, 8) + "...") : fieldGuid;
+            let valueText: string;
+            const matchValue: ClinicalPathway_FieldValueSource_$union = s.Value;
+            switch (matchValue.tag) {
+                case /* FieldReference */ 1: {
+                    const g: string = matchValue.fields[0].fields[0];
+                    valueText = "from field";
+                    break;
+                }
+                case /* OptionKey */ 2: {
+                    const g_1: string = matchValue.fields[0].fields[0];
+                    valueText = "option";
+                    break;
+                }
+                default: {
+                    const v: string = matchValue.fields[0];
+                    valueText = (isNullOrWhiteSpace(v) ? "(empty)" : v);
+                }
+            }
+            return toText(printf("Set Field: %s = %s"))(shortGuid)(valueText);
+        }
+        default: {
+            const m: ClinicalPathway_MedicationAction = action.fields[0];
+            return toText(printf("Rx: %s"))(m.Name);
+        }
+    }
+}
+
+export function extractActionDetails(action: ClinicalPathway_ActionInfo_$union): string {
+    switch (action.tag) {
+        case /* Procedure */ 4:
+            return action.fields[0].Name;
+        case /* Education */ 3:
+            return join("; ", action.fields[0].Topics);
+        case /* Test */ 1: {
+            const t: ClinicalPathway_TestAction = action.fields[0];
+            return toText(printf("Test: %s"))(t.TestName);
+        }
+        case /* Referral */ 2: {
+            const r: ClinicalPathway_ReferralAction = action.fields[0];
+            return toText(printf("Refer to %s (%s)"))(r.Target)(r.Reason);
+        }
+        case /* Documentation */ 5: {
+            const d: ClinicalPathway_DocumentationAction = action.fields[0];
+            return toText(printf("Document: %s"))(d.FormName);
+        }
+        case /* Task */ 6: {
+            const t_1: ClinicalPathway_TaskAction = action.fields[0];
+            return toText(printf("Task: %s"))(t_1.Description);
+        }
+        case /* Alert */ 7: {
+            const a: ClinicalPathway_AlertAction = action.fields[0];
+            return toText(printf("Alert: %s"))(a.Message);
+        }
+        case /* Problem */ 8: {
+            const p_1: ClinicalPathway_ProblemAction = action.fields[0];
+            return toText(printf("Problem: %s"))(p_1.ProblemName);
+        }
+        case /* Prescription */ 9: {
+            const p_2: ClinicalPathway_PrescriptionAction = action.fields[0];
+            return toText(printf("Prescription: %s"))(p_2.Medication);
+        }
+        case /* NavigateToForm */ 11: {
+            const n: ClinicalPathway_NavigateToFormAction = action.fields[0];
+            return toText(printf("Navigate to: %s"))(n.FormId);
+        }
+        case /* SetFieldValue */ 10: {
+            const s: ClinicalPathway_SetFieldValueAction = action.fields[0];
+            const guid: string = s.TargetField.fields[0];
+            let valueText: string;
+            const matchValue: ClinicalPathway_FieldValueSource_$union = s.Value;
+            switch (matchValue.tag) {
+                case /* FieldReference */ 1: {
+                    valueText = (`from ${matchValue.fields[0].fields[0]}`);
+                    break;
+                }
+                case /* OptionKey */ 2: {
+                    valueText = (`option ${matchValue.fields[0].fields[0]}`);
+                    break;
+                }
+                default: {
+                    const v: string = matchValue.fields[0];
+                    valueText = (isNullOrWhiteSpace(v) ? "(empty)" : v);
+                }
+            }
+            return toText(printf("Set Field %s = %s"))(guid)(valueText);
+        }
+        default: {
+            const m: ClinicalPathway_MedicationAction = action.fields[0];
+            return toText(printf("%s %s %s %s"))(m.Name)(m.Dose)(m.Route)(m.Frequency);
+        }
+    }
+}
+
+export function extractActionType(action: ClinicalPathway_ActionInfo_$union): string {
+    switch (action.tag) {
+        case /* Procedure */ 4:
+            return "Procedure";
+        case /* Education */ 3:
+            return "Education";
+        case /* Test */ 1:
+            return "Test";
+        case /* Referral */ 2:
+            return "Referral";
+        case /* Documentation */ 5:
+            return "Documentation";
+        case /* Task */ 6:
+            return "Task";
+        case /* Alert */ 7:
+            return "Alert";
+        case /* Problem */ 8:
+            return "Problem";
+        case /* Prescription */ 9:
+            return "Prescription";
+        case /* SetFieldValue */ 10:
+            return "SetFieldValue";
+        case /* NavigateToForm */ 11:
+            return "NavigateToForm";
+        default:
+            return "Medication";
+    }
+}
+
+export function extractDecisionDetails(decision: ClinicalPathway_DecisionInfo): [string, FSharpList<string>] {
+    return [decision.Question, filter<string>((opt: string): boolean => {
+        if ((opt !== "Yes") && (opt !== "No")) {
+            return opt !== "None of the above";
+        }
+        else {
+            return false;
+        }
+    }, decision.Options)] as [string, FSharpList<string>];
+}
+
+export function extractEvaluationDetails(evaluation: ClinicalPathway_EvaluationInfo): [string, FSharpList<string>] {
+    let matchValue: Option<FSharpList<string>>;
+    return [evaluation.EvaluationName, (matchValue = evaluation.CriticalFindings, (matchValue == null) ? empty<string>() : value(matchValue))] as [string, FSharpList<string>];
+}
+
+export function extractEvaluationName(evaluation: ClinicalPathway_EvaluationInfo): string {
+    return evaluation.EvaluationName;
+}
+
+export function stateTypeToString(stateType: ClinicalPathway_StateType_$union): string {
+    switch (stateType.tag) {
+        case /* Decision */ 1:
+            return "Decision";
+        case /* Action */ 2:
+            return "Action";
+        case /* CompoundAction */ 3:
+            return "CompoundAction";
+        case /* ConditionalAction */ 4:
+            return "ConditionalAction";
+        case /* Terminal */ 5:
+            return "Terminal";
+        default:
+            return "Evaluation";
+    }
+}
+
+export function isTerminalState(stateType: ClinicalPathway_StateType_$union): boolean {
+    if (stateType.tag === /* Terminal */ 5) {
+        return true;
+    }
+    else {
+        return false;
+    }
+}
+
+export function extractCompoundActionTexts(actions: FSharpList<ClinicalPathway_ActionInfo_$union>): FSharpList<string> {
+    return map<ClinicalPathway_ActionInfo_$union, string>(extractActionText, actions);
+}
+
+export function extractCompoundActionDetails(actions: FSharpList<ClinicalPathway_ActionInfo_$union>): FSharpList<string> {
+    return map<ClinicalPathway_ActionInfo_$union, string>(extractActionDetails, actions);
+}
+
+export function sanitizeMermaidId(id: string): string {
+    return replace(replace(replace(id, "-", "_"), " ", "_"), ".", "_");
+}
+
+export function sanitizeMermaidText(text: string): string {
+    return replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(replace(text, "\"", "\'"), "(", "-"), ")", "-"), "{", "-"), "}", "-"), "<", "-"), ">", "-"), "|", "/"), "`", "\'"), "\n", " "), "\r", " "), "  ", " ");
+}
+
+export function wrapTextForReactFlow(text: string, maxWidth: int32): string {
+    if (text.length <= maxWidth) {
+        return text;
+    }
+    else {
+        const words: string[] = map_1<string, string>((word: string): string => {
+            if (text.indexOf(`${word} =`) >= 0) {
+                return `${word} =`;
+            }
+            else if (text.indexOf(`${word},`) >= 0) {
+                return `${word},`;
+            }
+            else if (text.indexOf(`${word};`) >= 0) {
+                return `${word};`;
+            }
+            else if (text.indexOf(`${word}:`) >= 0) {
+                return `${word}:`;
+            }
+            else {
+                return word;
+            }
+        }, split(text, [" ", ",", ";", "=", ":"], undefined, 1));
+        let lines: FSharpList<string> = empty<string>();
+        let currentLine = "";
+        for (let idx = 0; idx <= (words.length - 1); idx++) {
+            const word_1: string = item(idx, words);
+            if (currentLine === "") {
+                currentLine = word_1;
+            }
+            else if (((currentLine + " ") + word_1).length <= maxWidth) {
+                currentLine = ((currentLine + " ") + word_1);
+            }
+            else {
+                lines = append(lines, singleton(currentLine));
+                currentLine = word_1;
+            }
+        }
+        if (currentLine !== "") {
+            lines = append(lines, singleton(currentLine));
+        }
+        return join("\n", lines);
+    }
+}
+
+export function extractStateKeyString(stateKey: Shared_StateKey): string {
+    return stateKey.fields[0];
+}
+
+export function getTerminalOutcome(terminal: ClinicalPathway_TerminalInfo): string {
+    return terminal.Outcome;
+}
+
+//# sourceMappingURL=PathwayDataExtractor.ts.map