@f1studio/form-spec 5.0.0-alpha.124 → 5.0.0-alpha.125

package/src/FormSpec.FS/Integrations/Adapters/CorEMR/CorEMRTemplateMapper.ts

@@ -1,15 +1,17 @@
 import { Record } from "@fable-org/fable-library-js/Types.js";
 import { int32ToString, comparePrimitives, IComparable, IEquatable } from "@fable-org/fable-library-js/Util.js";
-import { list_type, bool_type, int64_type, option_type, int32_type, record_type, string_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
-import { bind, orElse, map as map_1, orElseWith, defaultArg, value as value_13, Option } from "@fable-org/fable-library-js/Option.js";
-import { int32 } from "@fable-org/fable-library-js/Int32.js";
-import { int64 } from "@fable-org/fable-library-js/BigInt.js";
-import { empty, item as item_2, length, mapIndexed, sortBy, collect, isEmpty, map, FSharpList } from "@fable-org/fable-library-js/List.js";
+import { record_type, string_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
 import { FSharpSet__Contains, contains, FSharpSet, ofSeq } from "@fable-org/fable-library-js/Set.js";
+import { int32 } from "@fable-org/fable-library-js/Int32.js";
+import { bind, orElse, map as map_1, orElseWith, defaultArg, Option, value as value_3 } from "@fable-org/fable-library-js/Option.js";
 import { Spec_FormClassification_$union, Spec_FormClassification_General, Spec_FormClassification_Screening, Spec_FormClassification_Intake, Spec_FormClassification_ClinicalInstrument, Spec_ClinicalInstrumentInfo, Spec_InstrumentConfidence_Inferred, Spec_InstrumentConfidence_Exact } from "../../../FormSpec.js";
+import { isNullOrEmpty } from "@fable-org/fable-library-js/String.js";
+import { int64, toInt32 } from "@fable-org/fable-library-js/BigInt.js";
 import { CoreMRFormDetail, CoreMRTag, CoreMRTrigger, CoreMRChoice, CoreMRItem, CoreMRFormMetadata } from "../../CorEMR/CoreMRTypes.js";
+import { empty, item as item_2, length, mapIndexed, sortBy, collect, FSharpList, isEmpty, map } from "@fable-org/fable-library-js/List.js";
 import { FSharpMap, filter, keys, isEmpty as isEmpty_1, tryFind } from "@fable-org/fable-library-js/Map.js";
 import { ElementTypeInfo, getElementTypeInfo } from "./CorEMRElementTypeMap.js";
+import { TemplateForm, TemplateChoice, TemplateItem } from "../../CorEMR/TemplateManifestDecoder.js";
 import { normalizeChoiceScores } from "../../../BitmaskHelpers.js";
 
 export class BridgeElementTypeInfo extends Record implements IEquatable<BridgeElementTypeInfo>, IComparable<BridgeElementTypeInfo> {
@@ -28,98 +30,6 @@ export function BridgeElementTypeInfo_$reflection(): TypeInfo {
     return record_type("FormSpec.Integrations.CorEMR.CorEMRTemplateMapper.BridgeElementTypeInfo", [], BridgeElementTypeInfo, () => [["Code", string_type], ["ValueEncoding", string_type], ["TextFieldRole", string_type]]);
 }
 
-export class BridgeTemplateChoice extends Record implements IEquatable<BridgeTemplateChoice>, IComparable<BridgeTemplateChoice> {
-    readonly ChoiceId: Option<int32>;
-    readonly Sequence: Option<int32>;
-    readonly Text: Option<string>;
-    readonly Score: Option<int64>;
-    readonly BitPosition: Option<int32>;
-    readonly Code: Option<string>;
-    readonly Highlight: Option<string>;
-    constructor(ChoiceId: Option<int32>, Sequence: Option<int32>, Text$: Option<string>, Score: Option<int64>, BitPosition: Option<int32>, Code: Option<string>, Highlight: Option<string>) {
-        super();
-        this.ChoiceId = ChoiceId;
-        this.Sequence = Sequence;
-        this.Text = Text$;
-        this.Score = Score;
-        this.BitPosition = BitPosition;
-        this.Code = Code;
-        this.Highlight = Highlight;
-    }
-}
-
-export function BridgeTemplateChoice_$reflection(): TypeInfo {
-    return record_type("FormSpec.Integrations.CorEMR.CorEMRTemplateMapper.BridgeTemplateChoice", [], BridgeTemplateChoice, () => [["ChoiceId", option_type(int32_type)], ["Sequence", option_type(int32_type)], ["Text", option_type(string_type)], ["Score", option_type(int64_type)], ["BitPosition", option_type(int32_type)], ["Code", option_type(string_type)], ["Highlight", option_type(string_type)]]);
-}
-
-export class BridgeTemplateItem extends Record implements IEquatable<BridgeTemplateItem>, IComparable<BridgeTemplateItem> {
-    readonly ItemId: int32;
-    readonly Sequence: int32;
-    readonly Type: int32;
-    readonly NestingLevel: Option<int32>;
-    readonly IsRequired: boolean;
-    readonly Text: string;
-    readonly SequenceText: Option<string>;
-    readonly Code: Option<string>;
-    readonly Uuid: Option<string>;
-    readonly GenderRequired: Option<string>;
-    readonly Highlight: Option<int32>;
-    readonly Choices: FSharpList<BridgeTemplateChoice>;
-    constructor(ItemId: int32, Sequence: int32, Type: int32, NestingLevel: Option<int32>, IsRequired: boolean, Text$: string, SequenceText: Option<string>, Code: Option<string>, Uuid: Option<string>, GenderRequired: Option<string>, Highlight: Option<int32>, Choices: FSharpList<BridgeTemplateChoice>) {
-        super();
-        this.ItemId = (ItemId | 0);
-        this.Sequence = (Sequence | 0);
-        this.Type = (Type | 0);
-        this.NestingLevel = NestingLevel;
-        this.IsRequired = IsRequired;
-        this.Text = Text$;
-        this.SequenceText = SequenceText;
-        this.Code = Code;
-        this.Uuid = Uuid;
-        this.GenderRequired = GenderRequired;
-        this.Highlight = Highlight;
-        this.Choices = Choices;
-    }
-}
-
-export function BridgeTemplateItem_$reflection(): TypeInfo {
-    return record_type("FormSpec.Integrations.CorEMR.CorEMRTemplateMapper.BridgeTemplateItem", [], BridgeTemplateItem, () => [["ItemId", int32_type], ["Sequence", int32_type], ["Type", int32_type], ["NestingLevel", option_type(int32_type)], ["IsRequired", bool_type], ["Text", string_type], ["SequenceText", option_type(string_type)], ["Code", option_type(string_type)], ["Uuid", option_type(string_type)], ["GenderRequired", option_type(string_type)], ["Highlight", option_type(int32_type)], ["Choices", list_type(BridgeTemplateChoice_$reflection())]]);
-}
-
-export class BridgeTemplateDetail extends Record implements IEquatable<BridgeTemplateDetail>, IComparable<BridgeTemplateDetail> {
-    readonly FormId: int32;
-    readonly Name: string;
-    readonly FormCode: Option<string>;
-    readonly Description: Option<string>;
-    readonly CurrentVersionId: Option<int32>;
-    readonly IsIntake: Option<boolean>;
-    readonly RequiresSignature: Option<boolean>;
-    readonly Items: FSharpList<BridgeTemplateItem>;
-    readonly FormCategory: Option<string>;
-    readonly InstrumentType: Option<string>;
-    readonly InstrumentConfidence: Option<string>;
-    readonly InstrumentMaxScore: Option<int32>;
-    constructor(FormId: int32, Name: string, FormCode: Option<string>, Description: Option<string>, CurrentVersionId: Option<int32>, IsIntake: Option<boolean>, RequiresSignature: Option<boolean>, Items: FSharpList<BridgeTemplateItem>, FormCategory: Option<string>, InstrumentType: Option<string>, InstrumentConfidence: Option<string>, InstrumentMaxScore: Option<int32>) {
-        super();
-        this.FormId = (FormId | 0);
-        this.Name = Name;
-        this.FormCode = FormCode;
-        this.Description = Description;
-        this.CurrentVersionId = CurrentVersionId;
-        this.IsIntake = IsIntake;
-        this.RequiresSignature = RequiresSignature;
-        this.Items = Items;
-        this.FormCategory = FormCategory;
-        this.InstrumentType = InstrumentType;
-        this.InstrumentConfidence = InstrumentConfidence;
-        this.InstrumentMaxScore = InstrumentMaxScore;
-    }
-}
-
-export function BridgeTemplateDetail_$reflection(): TypeInfo {
-    return record_type("FormSpec.Integrations.CorEMR.CorEMRTemplateMapper.BridgeTemplateDetail", [], BridgeTemplateDetail, () => [["FormId", int32_type], ["Name", string_type], ["FormCode", option_type(string_type)], ["Description", option_type(string_type)], ["CurrentVersionId", option_type(int32_type)], ["IsIntake", option_type(bool_type)], ["RequiresSignature", option_type(bool_type)], ["Items", list_type(BridgeTemplateItem_$reflection())], ["FormCategory", option_type(string_type)], ["InstrumentType", option_type(string_type)], ["InstrumentConfidence", option_type(string_type)], ["InstrumentMaxScore", option_type(int32_type)]]);
-}
-
 const multiSelectCodes: FSharpSet<string> = ofSeq(["chips_notes", "checkbox", "checkbox_notes", "chips_ros"], {
     Compare: comparePrimitives,
 });
@@ -129,20 +39,18 @@ function hasTextHasDateFromBridge(textField: string): [boolean, boolean] {
 }
 
 /**
- * Map bridge classification fields to FormClassification DU.
- * ClinicalInstrument always carries instrument identity; General is the default.
+ * Map catalog classification fields to FormClassification DU.
+ * formCategory, instrumentType, instrumentConfidence, maxScore come from the catalog FormListItem,
+ * not from TemplateForm (which doesn't carry them).
  */
-export function mapFormClassification(detail: BridgeTemplateDetail): Spec_FormClassification_$union {
-    let matchValue_3: Option<string>;
-    const matchValue: Option<string> = detail.FormCategory;
-    const matchValue_1: Option<string> = detail.InstrumentType;
+export function mapFormClassification(formCategory: Option<string>, instrumentType: Option<string>, instrumentConfidence: Option<string>, instrumentMaxScore: Option<int32>): Spec_FormClassification_$union {
     let matchResult: int32, instType: string;
-    if (matchValue != null) {
-        switch (value_13(matchValue)) {
+    if (formCategory != null) {
+        switch (value_3(formCategory)) {
             case "clinical_instrument": {
-                if (matchValue_1 != null) {
+                if (instrumentType != null) {
                     matchResult = 0;
-                    instType = value_13(matchValue_1);
+                    instType = value_3(instrumentType);
                 }
                 else {
                     matchResult = 3;
@@ -166,7 +74,7 @@ export function mapFormClassification(detail: BridgeTemplateDetail): Spec_FormCl
     }
     switch (matchResult) {
         case 0:
-            return Spec_FormClassification_ClinicalInstrument(new Spec_ClinicalInstrumentInfo(instType!, (matchValue_3 = detail.InstrumentConfidence, (matchValue_3 != null) ? ((value_13(matchValue_3) === "exact") ? Spec_InstrumentConfidence_Exact() : Spec_InstrumentConfidence_Inferred()) : Spec_InstrumentConfidence_Inferred()), detail.InstrumentMaxScore));
+            return Spec_FormClassification_ClinicalInstrument(new Spec_ClinicalInstrumentInfo(instType!, (instrumentConfidence != null) ? ((value_3(instrumentConfidence) === "exact") ? Spec_InstrumentConfidence_Exact() : Spec_InstrumentConfidence_Inferred()) : Spec_InstrumentConfidence_Inferred(), instrumentMaxScore));
         case 1:
             return Spec_FormClassification_Intake();
         case 2:
@@ -177,13 +85,13 @@ export function mapFormClassification(detail: BridgeTemplateDetail): Spec_FormCl
 }
 
 /**
- * Map bridge template to CoreMRFormDetail.
+ * Map bridge template (TemplateForm — SSOT) to CoreMRFormDetail.
  * When elementTypes is non-empty, use it for ItemTypeName, HasText, HasDate, and bitmask detection.
  * When elementTypes is empty, fallback to CorEMRElementTypeMap.
  */
-export function mapNewTemplateToCoreMRDetail(elementTypes: FSharpMap<int32, BridgeElementTypeInfo>, template: BridgeTemplateDetail): CoreMRFormDetail {
-    const metadata: CoreMRFormMetadata = new CoreMRFormMetadata(template.FormId, template.Name, template.Description, defaultArg(template.CurrentVersionId, 0), 1, undefined, defaultArg(template.RequiresSignature, false), defaultArg(template.IsIntake, false), defaultArg(template.FormCode, ""), "");
-    const items: FSharpList<CoreMRItem> = map<BridgeTemplateItem, CoreMRItem>((item: BridgeTemplateItem): CoreMRItem => {
+export function mapNewTemplateToCoreMRDetail(elementTypes: FSharpMap<int32, BridgeElementTypeInfo>, template: TemplateForm): CoreMRFormDetail {
+    const metadata: CoreMRFormMetadata = new CoreMRFormMetadata(template.FormId, template.Name, isNullOrEmpty(template.Description) ? undefined : template.Description, ~~toInt32(template.CurrentVersionId), 1, undefined, template.RequiresSignature, template.IsIntake, template.FormCode, "");
+    const items: FSharpList<CoreMRItem> = map<TemplateItem, CoreMRItem>((item: TemplateItem): CoreMRItem => {
         let info_1: BridgeElementTypeInfo;
         const itemTypeId: int32 = item.Type | 0;
         const value: BridgeElementTypeInfo = new BridgeElementTypeInfo(`unknown_${itemTypeId}`, "unknown", "unknown");
@@ -192,30 +100,27 @@ export function mapNewTemplateToCoreMRDetail(elementTypes: FSharpMap<int32, Brid
             return new BridgeElementTypeInfo(info.Code, info.ValueEncoding, info.TextFieldRole);
         }), value);
         const patternInput: [boolean, boolean] = hasTextHasDateFromBridge(info_1.TextFieldRole);
-        return new CoreMRItem(item.ItemId, item.Sequence, defaultArg(item.NestingLevel, 0), item.SequenceText, item.Type, info_1.Code, !isEmpty(item.Choices), patternInput[0], patternInput[1], item.Text, item.IsRequired, item.GenderRequired, map_1<int32, string>(int32ToString, item.Highlight), item.Code, item.Uuid, undefined, undefined, 0, 0, undefined);
+        return new CoreMRItem(item.ItemId, item.Sequence, item.NestingLevel, item.SequenceText, item.Type, info_1.Code, !isEmpty(item.Choices), patternInput[0], patternInput[1], item.Text, item.IsRequired, item.GenderRequired, map_1<int32, string>(int32ToString, item.Highlight), item.Code, item.Uuid, undefined, undefined, 0, 0, undefined);
     }, template.Items);
     const multiSelectTypes: FSharpSet<int32> = isEmpty_1<int32, BridgeElementTypeInfo>(elementTypes) ? ofSeq([26, 40, 41, 143], {
         Compare: comparePrimitives,
     }) : ofSeq<int32>(keys<int32, BridgeElementTypeInfo>(filter<int32, BridgeElementTypeInfo>((_arg: int32, info_2: BridgeElementTypeInfo): boolean => contains<string>(info_2.Code, multiSelectCodes), elementTypes)), {
         Compare: comparePrimitives,
     });
-    return new CoreMRFormDetail(metadata, items, collect<BridgeTemplateItem, CoreMRChoice>((item_1: BridgeTemplateItem): FSharpList<CoreMRChoice> => {
-        const sortedChoices: FSharpList<BridgeTemplateChoice> = sortBy<BridgeTemplateChoice, int32>((c: BridgeTemplateChoice): int32 => defaultArg(c.Sequence, 0), item_1.Choices, {
+    return new CoreMRFormDetail(metadata, items, collect<TemplateItem, CoreMRChoice>((item_1: TemplateItem): FSharpList<CoreMRChoice> => {
+        const sortedChoices: FSharpList<TemplateChoice> = sortBy<TemplateChoice, int32>((c: TemplateChoice): int32 => c.Sequence, item_1.Choices, {
             Compare: comparePrimitives,
         });
-        const patternInput_1: [FSharpList<int32>, boolean] = normalizeChoiceScores(map<BridgeTemplateChoice, int64>((c_1: BridgeTemplateChoice): int64 => defaultArg(c_1.Score, 0n), sortedChoices));
+        const patternInput_1: [FSharpList<int32>, boolean] = normalizeChoiceScores(map<TemplateChoice, int64>((c_1: TemplateChoice): int64 => c_1.Score, sortedChoices));
         const bitPositions: Option<FSharpList<int32>> = (FSharpSet__Contains(multiSelectTypes, item_1.Type) && patternInput_1[1]) ? patternInput_1[0] : undefined;
-        return mapIndexed<BridgeTemplateChoice, CoreMRChoice>((index: int32, choice: BridgeTemplateChoice): CoreMRChoice => {
-            const bitPosition: Option<int32> = orElse(choice.BitPosition, bind<FSharpList<int32>, int32>((positions: FSharpList<int32>): Option<int32> => {
-                if (index < length(positions)) {
-                    return item_2(index, positions);
-                }
-                else {
-                    return undefined;
-                }
-            }, bitPositions));
-            return new CoreMRChoice(defaultArg(choice.ChoiceId, ((item_1.ItemId * 1000) + index) + 1), item_1.ItemId, defaultArg(choice.Sequence, index + 1), defaultArg(choice.Text, ""), defaultArg(choice.Score, 0n), bitPosition, choice.Code, choice.Highlight);
-        }, sortedChoices);
+        return mapIndexed<TemplateChoice, CoreMRChoice>((index: int32, choice: TemplateChoice): CoreMRChoice => (new CoreMRChoice(choice.ChoiceId, item_1.ItemId, choice.Sequence, choice.Text, choice.Score, orElse(choice.BitPosition, bind<FSharpList<int32>, int32>((positions: FSharpList<int32>): Option<int32> => {
+            if (index < length(positions)) {
+                return item_2(index, positions);
+            }
+            else {
+                return undefined;
+            }
+        }, bitPositions)), choice.Code, map_1<int32, string>(int32ToString, choice.Highlight))), sortedChoices);
     }, template.Items), empty<CoreMRTrigger>(), empty<CoreMRTag>(), undefined);
 }
 

package/src/FormSpec.FS/Integrations/CorEMR/TemplateDecodeTypes.ts

@@ -0,0 +1,246 @@
+import { Record, Union } from "@fable-org/fable-library-js/Types.js";
+import { list_type, record_type, option_type, string_type, int32_type, union_type, TypeInfo } from "@fable-org/fable-library-js/Reflection.js";
+import { int32 } from "@fable-org/fable-library-js/Int32.js";
+import { value, Option } from "@fable-org/fable-library-js/Option.js";
+import { equals, IComparable, IEquatable } from "@fable-org/fable-library-js/Util.js";
+import { isEmpty, take, iterate, filter, length, FSharpList } from "@fable-org/fable-library-js/List.js";
+import { join, printf, toText } from "@fable-org/fable-library-js/String.js";
+
+export type DecodeIssueSeverity_$union = 
+    | DecodeIssueSeverity<0>
+    | DecodeIssueSeverity<1>
+
+export type DecodeIssueSeverity_$cases = {
+    0: ["Error", []],
+    1: ["Warning", []]
+}
+
+export function DecodeIssueSeverity_Error() {
+    return new DecodeIssueSeverity<0>(0, []);
+}
+
+export function DecodeIssueSeverity_Warning() {
+    return new DecodeIssueSeverity<1>(1, []);
+}
+
+export class DecodeIssueSeverity<Tag extends keyof DecodeIssueSeverity_$cases> extends Union<Tag, DecodeIssueSeverity_$cases[Tag][0]> {
+    constructor(readonly tag: Tag, readonly fields: DecodeIssueSeverity_$cases[Tag][1]) {
+        super();
+    }
+    cases() {
+        return ["Error", "Warning"];
+    }
+}
+
+export function DecodeIssueSeverity_$reflection(): TypeInfo {
+    return union_type("FormSpec.Integrations.CorEMR.TemplateDecodeTypes.DecodeIssueSeverity", [], DecodeIssueSeverity, () => [[], []]);
+}
+
+export type DecodeIssuePath_$union = 
+    | DecodeIssuePath<0>
+    | DecodeIssuePath<1>
+    | DecodeIssuePath<2>
+    | DecodeIssuePath<3>
+
+export type DecodeIssuePath_$cases = {
+    0: ["PayloadLevel", []],
+    1: ["FormLevel", [int32, string]],
+    2: ["ItemLevel", [int32, string, int32, string]],
+    3: ["ChoiceLevel", [int32, string, int32, string, int32, Option<string>]]
+}
+
+export function DecodeIssuePath_PayloadLevel() {
+    return new DecodeIssuePath<0>(0, []);
+}
+
+export function DecodeIssuePath_FormLevel(formId: int32, formName: string) {
+    return new DecodeIssuePath<1>(1, [formId, formName]);
+}
+
+export function DecodeIssuePath_ItemLevel(formId: int32, formName: string, itemId: int32, itemText: string) {
+    return new DecodeIssuePath<2>(2, [formId, formName, itemId, itemText]);
+}
+
+export function DecodeIssuePath_ChoiceLevel(formId: int32, formName: string, itemId: int32, itemText: string, choiceIndex: int32, choiceText: Option<string>) {
+    return new DecodeIssuePath<3>(3, [formId, formName, itemId, itemText, choiceIndex, choiceText]);
+}
+
+export class DecodeIssuePath<Tag extends keyof DecodeIssuePath_$cases> extends Union<Tag, DecodeIssuePath_$cases[Tag][0]> {
+    constructor(readonly tag: Tag, readonly fields: DecodeIssuePath_$cases[Tag][1]) {
+        super();
+    }
+    cases() {
+        return ["PayloadLevel", "FormLevel", "ItemLevel", "ChoiceLevel"];
+    }
+}
+
+export function DecodeIssuePath_$reflection(): TypeInfo {
+    return union_type("FormSpec.Integrations.CorEMR.TemplateDecodeTypes.DecodeIssuePath", [], DecodeIssuePath, () => [[], [["formId", int32_type], ["formName", string_type]], [["formId", int32_type], ["formName", string_type], ["itemId", int32_type], ["itemText", string_type]], [["formId", int32_type], ["formName", string_type], ["itemId", int32_type], ["itemText", string_type], ["choiceIndex", int32_type], ["choiceText", option_type(string_type)]]]);
+}
+
+export class DecodeIssue extends Record implements IEquatable<DecodeIssue>, IComparable<DecodeIssue> {
+    readonly Path: DecodeIssuePath_$union;
+    readonly Severity: DecodeIssueSeverity_$union;
+    readonly Field: string;
+    readonly Expected: string;
+    readonly Got: string;
+    readonly Message: string;
+    constructor(Path: DecodeIssuePath_$union, Severity: DecodeIssueSeverity_$union, Field: string, Expected: string, Got: string, Message: string) {
+        super();
+        this.Path = Path;
+        this.Severity = Severity;
+        this.Field = Field;
+        this.Expected = Expected;
+        this.Got = Got;
+        this.Message = Message;
+    }
+}
+
+export function DecodeIssue_$reflection(): TypeInfo {
+    return record_type("FormSpec.Integrations.CorEMR.TemplateDecodeTypes.DecodeIssue", [], DecodeIssue, () => [["Path", DecodeIssuePath_$reflection()], ["Severity", DecodeIssueSeverity_$reflection()], ["Field", string_type], ["Expected", string_type], ["Got", string_type], ["Message", string_type]]);
+}
+
+export class DecodeBatchResult$1<T> extends Record implements IEquatable<DecodeBatchResult$1<T>>, IComparable<DecodeBatchResult$1<T>> {
+    readonly Succeeded: FSharpList<T>;
+    readonly Issues: FSharpList<DecodeIssue>;
+    readonly SkippedTemplates: int32;
+    readonly SkippedItems: int32;
+    readonly SkippedChoices: int32;
+    readonly TotalTemplates: int32;
+    readonly TotalItems: int32;
+    readonly TotalChoices: int32;
+    constructor(Succeeded: FSharpList<T>, Issues: FSharpList<DecodeIssue>, SkippedTemplates: int32, SkippedItems: int32, SkippedChoices: int32, TotalTemplates: int32, TotalItems: int32, TotalChoices: int32) {
+        super();
+        this.Succeeded = Succeeded;
+        this.Issues = Issues;
+        this.SkippedTemplates = (SkippedTemplates | 0);
+        this.SkippedItems = (SkippedItems | 0);
+        this.SkippedChoices = (SkippedChoices | 0);
+        this.TotalTemplates = (TotalTemplates | 0);
+        this.TotalItems = (TotalItems | 0);
+        this.TotalChoices = (TotalChoices | 0);
+    }
+}
+
+export function DecodeBatchResult$1_$reflection(gen0: TypeInfo): TypeInfo {
+    return record_type("FormSpec.Integrations.CorEMR.TemplateDecodeTypes.DecodeBatchResult`1", [gen0], DecodeBatchResult$1, () => [["Succeeded", list_type(gen0)], ["Issues", list_type(DecodeIssue_$reflection())], ["SkippedTemplates", int32_type], ["SkippedItems", int32_type], ["SkippedChoices", int32_type], ["TotalTemplates", int32_type], ["TotalItems", int32_type], ["TotalChoices", int32_type]]);
+}
+
+function formatPath(path: DecodeIssuePath_$union): string {
+    switch (path.tag) {
+        case /* FormLevel */ 1: {
+            const formName: string = path.fields[1];
+            const formId: int32 = path.fields[0] | 0;
+            return toText(printf("Form \'%s\' (FormId: %d)"))(formName)(formId);
+        }
+        case /* ItemLevel */ 2: {
+            const itemText: string = path.fields[3];
+            const itemId: int32 = path.fields[2] | 0;
+            const formName_1: string = path.fields[1];
+            const formId_1: int32 = path.fields[0] | 0;
+            return toText(printf("Form \'%s\' (FormId: %d): Item #%d \'%s\'"))(formName_1)(formId_1)(itemId)(itemText);
+        }
+        case /* ChoiceLevel */ 3: {
+            const itemText_1: string = path.fields[3];
+            const itemId_1: int32 = path.fields[2] | 0;
+            const formName_2: string = path.fields[1];
+            const formId_2: int32 = path.fields[0] | 0;
+            const choiceText: Option<string> = path.fields[5];
+            const choiceIndex: int32 = path.fields[4] | 0;
+            let choicePart: string;
+            if (choiceText == null) {
+                choicePart = toText(printf("Choice #%d"))(choiceIndex);
+            }
+            else {
+                const t: string = value(choiceText);
+                choicePart = toText(printf("Choice #%d (text: \'%s\')"))(choiceIndex)(t);
+            }
+            return toText(printf("Form \'%s\' (FormId: %d): Item #%d \'%s\' — %s"))(formName_2)(formId_2)(itemId_1)(itemText_1)(choicePart);
+        }
+        default:
+            return "payload";
+    }
+}
+
+/**
+ * Format a single DecodeIssue for display.
+ */
+export function formatIssue(issue: DecodeIssue): string {
+    const pathStr: string = formatPath(issue.Path);
+    return toText(printf("%s — Field \'%s\': expected %s, got %s"))(pathStr)(issue.Field)(issue.Expected)(issue.Got);
+}
+
+/**
+ * Human-readable summary for DecodeBatchResult (partial success).
+ */
+export function formatSummary<T>(result: DecodeBatchResult$1<T>): string {
+    let arg_4: int32, arg_7: int32;
+    const lines: string[] = [];
+    const successCount: int32 = length(result.Succeeded) | 0;
+    void (lines.push(toText(printf("Decoded %d/%d templates successfully."))(successCount)(result.TotalTemplates)));
+    if (result.SkippedTemplates > 0) {
+        const templateIssues: FSharpList<DecodeIssue> = filter<DecodeIssue>((i: DecodeIssue): boolean => {
+            const matchValue: DecodeIssuePath_$union = i.Path;
+            switch (matchValue.tag) {
+                case /* ItemLevel */ 2:
+                case /* ChoiceLevel */ 3:
+                    return false;
+                default:
+                    return true;
+            }
+        }, result.Issues);
+        void (lines.push(""));
+        void (lines.push(toText(printf("%d templates skipped:"))(result.SkippedTemplates)));
+        iterate<DecodeIssue>((i_1: DecodeIssue): void => {
+            let arg_3: string;
+            void (lines.push((arg_3 = formatIssue(i_1), toText(printf("  %s"))(arg_3))));
+        }, take<DecodeIssue>(10, templateIssues));
+        if (length(templateIssues) > 10) {
+            void (lines.push((arg_4 = ((length(templateIssues) - 10) | 0), toText(printf("  ... and %d more"))(arg_4))));
+        }
+    }
+    if (result.SkippedChoices > 0) {
+        const choiceIssues: FSharpList<DecodeIssue> = filter<DecodeIssue>((i_2: DecodeIssue): boolean => {
+            if (i_2.Path.tag === /* ChoiceLevel */ 3) {
+                return equals(i_2.Severity, DecodeIssueSeverity_Warning());
+            }
+            else {
+                return false;
+            }
+        }, result.Issues);
+        void (lines.push(""));
+        void (lines.push(toText(printf("%d choices skipped across successful templates (non-fatal warnings):"))(result.SkippedChoices)));
+        iterate<DecodeIssue>((i_3: DecodeIssue): void => {
+            let arg_6: string;
+            void (lines.push((arg_6 = formatIssue(i_3), toText(printf("  %s"))(arg_6))));
+        }, take<DecodeIssue>(5, choiceIssues));
+        if (length(choiceIssues) > 5) {
+            void (lines.push((arg_7 = ((length(choiceIssues) - 5) | 0), toText(printf("  ... and %d more"))(arg_7))));
+        }
+    }
+    return join("\n", lines);
+}
+
+/**
+ * Human-readable summary for DecodeIssue list (hard failure, no partial success).
+ */
+export function formatDecodeErrors(issues: FSharpList<DecodeIssue>): string {
+    let arg: int32, arg_2: int32;
+    if (isEmpty(issues)) {
+        return "Decode failed (no details)";
+    }
+    else {
+        const lines: string[] = [];
+        void (lines.push((arg = (length(issues) | 0), toText(printf("Decode failed: %d issue(s)"))(arg))));
+        iterate<DecodeIssue>((i: DecodeIssue): void => {
+            let arg_1: string;
+            void (lines.push((arg_1 = formatIssue(i), toText(printf("  %s"))(arg_1))));
+        }, take<DecodeIssue>(10, issues));
+        if (length(issues) > 10) {
+            void (lines.push((arg_2 = ((length(issues) - 10) | 0), toText(printf("  ... and %d more"))(arg_2))));
+        }
+        return join("\n", lines);
+    }
+}
+
+//# sourceMappingURL=TemplateDecodeTypes.ts.map