fix: parse legacy NewCaseValue sequence flows

Older Mendix project versions store a sequence flow's branch value in a
single inline `NewCaseValue` document, while newer versions use the
`CaseValues` array ([marker, case_object]). `parseSequenceFlow` only
handled the new form, so opening a legacy MPR lost all true/false
labels on decisions and every subsequent describe -> exec cycle rewrote
them as default-case flows.

Fall back to `parseCaseValue` on `NewCaseValue` when `CaseValues` is
absent. Regression tests (parser_microflow_test.go) construct both
shapes and assert the CaseValue makes it through parsing.

Author: hjotha

sdk/mpr/parser_microflow.go

@@ -157,9 +157,13 @@ func parseSequenceFlow(raw map[string]any) *microflows.SequenceFlow {
 		flow.IsErrorHandler = isErr
 	}
 
-	// Parse CaseValues if present (note: plural, stored as array [count, case_object, ...])
+	// Parse decision branch values. Newer Mendix versions store branch data
+	// in CaseValues ([marker, case]), while older projects use a single
+	// inline NewCaseValue document.
 	if caseVals := raw["CaseValues"]; caseVals != nil {
 		flow.CaseValue = parseCaseValues(caseVals)
+	} else if caseVal := raw["NewCaseValue"]; caseVal != nil {
+		flow.CaseValue = parseCaseValue(caseVal)
 	}
 
 	// Parse BezierCurve control vectors from Line

sdk/mpr/parser_microflow_test.go

@@ -0,0 +1,49 @@
+// SPDX-License-Identifier: Apache-2.0
+
+package mpr
+
+import (
+	"testing"
+
+	"github.com/mendixlabs/mxcli/sdk/microflows"
+	"go.mongodb.org/mongo-driver/bson/primitive"
+)
+
+func TestParseSequenceFlow_NewCaseValueEnumerationCase(t *testing.T) {
+	flow := parseSequenceFlow(map[string]any{
+		"$ID":                        "flow-1",
+		"OriginPointer":              "start-1",
+		"DestinationPointer":         "dest-1",
+		"OriginConnectionIndex":      int32(1),
+		"DestinationConnectionIndex": int32(2),
+		"NewCaseValue": primitive.D{
+			{Key: "$ID", Value: "case-1"},
+			{Key: "$Type", Value: "Microflows$EnumerationCase"},
+			{Key: "Value", Value: "true"},
+		},
+	})
+
+	got, ok := flow.CaseValue.(*microflows.EnumerationCase)
+	if !ok {
+		t.Fatalf("expected *EnumerationCase, got %T", flow.CaseValue)
+	}
+	if got.Value != "true" {
+		t.Fatalf("expected true branch, got %q", got.Value)
+	}
+}
+
+func TestParseSequenceFlow_NewCaseValueNoCase(t *testing.T) {
+	flow := parseSequenceFlow(map[string]any{
+		"$ID":                "flow-1",
+		"OriginPointer":      "start-1",
+		"DestinationPointer": "dest-1",
+		"NewCaseValue": primitive.D{
+			{Key: "$ID", Value: "case-1"},
+			{Key: "$Type", Value: "Microflows$NoCase"},
+		},
+	})
+
+	if _, ok := flow.CaseValue.(*microflows.NoCase); !ok {
+		t.Fatalf("expected *NoCase, got %T", flow.CaseValue)
+	}
+}