@reventlessdev/online-shop-hybrid-catalog 1.0.0-alpha.100

package/src/Plugin.res.mjs

@@ -0,0 +1,335 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Id$Reventless from "@reventlessdev/reventless-spec/src/types/Id.res.mjs";
+import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
+import * as Products$CatalogPlugin from "./Product/StateViewSliceStream/Products.res.mjs";
+import * as AddProduct$CatalogPlugin from "./Product/StateChangeSlice/AddProduct.res.mjs";
+import * as Categories$CatalogPlugin from "./Category/StateViewSliceStream/Categories.res.mjs";
+import * as AddCategory$CatalogPlugin from "./Category/StateChangeSlice/AddCategory.res.mjs";
+import * as ImportProduct$CatalogPlugin from "./Product/InboundTranslationSlice/ImportProduct.res.mjs";
+import * as ProductDemand$CatalogPlugin from "./Product/StateViewSliceStream/ProductDemand.res.mjs";
+import * as ImportProducts$CatalogPlugin from "./Task/ImportProducts.res.mjs";
+import * as RenameCategory$CatalogPlugin from "./Category/StateChangeSlice/RenameCategory.res.mjs";
+import * as ArchiveCategory$CatalogPlugin from "./Category/StateChangeSlice/ArchiveCategory.res.mjs";
+import * as Orders_Extension$CatalogPlugin from "./Extension/Orders_Extension.res.mjs";
+import * as ChangeProductName$CatalogPlugin from "./Product/StateChangeSlice/ChangeProductName.res.mjs";
+import * as ChangeProductPrice$CatalogPlugin from "./Product/StateChangeSlice/ChangeProductPrice.res.mjs";
+import * as AddProduct_Behavior$CatalogPlugin from "./Product/StateChangeSlice/AddProduct_Behavior.res.mjs";
+import * as Products_Projection$CatalogPlugin from "./Product/StateViewSliceStream/Products_Projection.res.mjs";
+import * as RecordProductDemand$CatalogPlugin from "./ProductDemand/StateChangeSlice/RecordProductDemand.res.mjs";
+import * as AddCategory_Behavior$CatalogPlugin from "./Category/StateChangeSlice/AddCategory_Behavior.res.mjs";
+import * as Orders_ExtensionPoint$OrderingSpec from "@reventlessdev/online-shop-hybrid-ordering-spec/src/Orders_ExtensionPoint.res.mjs";
+import * as Categories_Projection$CatalogPlugin from "./Category/StateViewSliceStream/Categories_Projection.res.mjs";
+import * as Products_ExtensionPoint$CatalogSpec from "@reventlessdev/online-shop-hybrid-catalog-spec/src/Products_ExtensionPoint.res.mjs";
+import * as RenameCategory_Behavior$CatalogPlugin from "./Category/StateChangeSlice/RenameCategory_Behavior.res.mjs";
+import * as ArchiveCategory_Behavior$CatalogPlugin from "./Category/StateChangeSlice/ArchiveCategory_Behavior.res.mjs";
+import * as ChangeProductDescription$CatalogPlugin from "./Product/StateChangeSlice/ChangeProductDescription.res.mjs";
+import * as ProductDemand_Projection$CatalogPlugin from "./Product/StateViewSliceStream/ProductDemand_Projection.res.mjs";
+import * as ImportProduct_Translation$CatalogPlugin from "./Product/InboundTranslationSlice/ImportProduct_Translation.res.mjs";
+import * as ChangeProductName_Behavior$CatalogPlugin from "./Product/StateChangeSlice/ChangeProductName_Behavior.res.mjs";
+import * as ChangeProductPrice_Behavior$CatalogPlugin from "./Product/StateChangeSlice/ChangeProductPrice_Behavior.res.mjs";
+import * as RecordProductDemand_Behavior$CatalogPlugin from "./ProductDemand/StateChangeSlice/RecordProductDemand_Behavior.res.mjs";
+import * as Products_ExtensionPointMapping$CatalogPlugin from "./ExtensionPoint/Products_ExtensionPointMapping.res.mjs";
+import * as ChangeProductDescription_Behavior$CatalogPlugin from "./Product/StateChangeSlice/ChangeProductDescription_Behavior.res.mjs";
+
+function Make(Platform) {
+  let AddCategorySlice = Platform.StateChangeSlice.Make({
+    name: AddCategory$CatalogPlugin.name,
+    moduleUrl: AddCategory$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: AddCategory$CatalogPlugin.consumedEventSchema,
+    errorSchema: AddCategory$CatalogPlugin.errorSchema,
+    eventSchema: AddCategory$CatalogPlugin.eventSchema,
+    commandSchema: AddCategory$CatalogPlugin.commandSchema,
+    commandAuthorization: AddCategory$CatalogPlugin.commandAuthorization,
+    readConsistency: AddCategory$CatalogPlugin.readConsistency
+  })({
+    initialState: AddCategory_Behavior$CatalogPlugin.initialState,
+    evolve: AddCategory_Behavior$CatalogPlugin.evolve,
+    decide: AddCategory_Behavior$CatalogPlugin.decide,
+    moduleUrl: AddCategory_Behavior$CatalogPlugin.moduleUrl
+  });
+  let AddProductSlice = Platform.StateChangeSlice.Make({
+    name: AddProduct$CatalogPlugin.name,
+    moduleUrl: AddProduct$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: AddProduct$CatalogPlugin.consumedEventSchema,
+    errorSchema: AddProduct$CatalogPlugin.errorSchema,
+    eventSchema: AddProduct$CatalogPlugin.eventSchema,
+    commandSchema: AddProduct$CatalogPlugin.commandSchema,
+    commandAuthorization: AddProduct$CatalogPlugin.commandAuthorization,
+    readConsistency: AddProduct$CatalogPlugin.readConsistency
+  })({
+    initialState: AddProduct_Behavior$CatalogPlugin.initialState,
+    evolve: AddProduct_Behavior$CatalogPlugin.evolve,
+    decide: AddProduct_Behavior$CatalogPlugin.decide,
+    moduleUrl: AddProduct_Behavior$CatalogPlugin.moduleUrl
+  });
+  let ArchiveCategorySlice = Platform.StateChangeSlice.Make({
+    name: ArchiveCategory$CatalogPlugin.name,
+    moduleUrl: ArchiveCategory$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: ArchiveCategory$CatalogPlugin.consumedEventSchema,
+    errorSchema: ArchiveCategory$CatalogPlugin.errorSchema,
+    eventSchema: ArchiveCategory$CatalogPlugin.eventSchema,
+    commandSchema: ArchiveCategory$CatalogPlugin.commandSchema,
+    commandAuthorization: ArchiveCategory$CatalogPlugin.commandAuthorization,
+    readConsistency: ArchiveCategory$CatalogPlugin.readConsistency
+  })({
+    initialState: ArchiveCategory_Behavior$CatalogPlugin.initialState,
+    evolve: ArchiveCategory_Behavior$CatalogPlugin.evolve,
+    decide: ArchiveCategory_Behavior$CatalogPlugin.decide,
+    moduleUrl: ArchiveCategory_Behavior$CatalogPlugin.moduleUrl
+  });
+  let ChangeProductDescriptionSlice = Platform.StateChangeSlice.Make({
+    name: ChangeProductDescription$CatalogPlugin.name,
+    moduleUrl: ChangeProductDescription$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: ChangeProductDescription$CatalogPlugin.consumedEventSchema,
+    errorSchema: ChangeProductDescription$CatalogPlugin.errorSchema,
+    eventSchema: ChangeProductDescription$CatalogPlugin.eventSchema,
+    commandSchema: ChangeProductDescription$CatalogPlugin.commandSchema,
+    commandAuthorization: ChangeProductDescription$CatalogPlugin.commandAuthorization,
+    readConsistency: ChangeProductDescription$CatalogPlugin.readConsistency
+  })({
+    initialState: ChangeProductDescription_Behavior$CatalogPlugin.initialState,
+    evolve: ChangeProductDescription_Behavior$CatalogPlugin.evolve,
+    decide: ChangeProductDescription_Behavior$CatalogPlugin.decide,
+    moduleUrl: ChangeProductDescription_Behavior$CatalogPlugin.moduleUrl
+  });
+  let ChangeProductNameSlice = Platform.StateChangeSlice.Make({
+    name: ChangeProductName$CatalogPlugin.name,
+    moduleUrl: ChangeProductName$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: ChangeProductName$CatalogPlugin.consumedEventSchema,
+    errorSchema: ChangeProductName$CatalogPlugin.errorSchema,
+    eventSchema: ChangeProductName$CatalogPlugin.eventSchema,
+    commandSchema: ChangeProductName$CatalogPlugin.commandSchema,
+    commandAuthorization: ChangeProductName$CatalogPlugin.commandAuthorization,
+    readConsistency: ChangeProductName$CatalogPlugin.readConsistency
+  })({
+    initialState: ChangeProductName_Behavior$CatalogPlugin.initialState,
+    evolve: ChangeProductName_Behavior$CatalogPlugin.evolve,
+    decide: ChangeProductName_Behavior$CatalogPlugin.decide,
+    moduleUrl: ChangeProductName_Behavior$CatalogPlugin.moduleUrl
+  });
+  let ChangeProductPriceSlice = Platform.StateChangeSlice.Make({
+    name: ChangeProductPrice$CatalogPlugin.name,
+    moduleUrl: ChangeProductPrice$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: ChangeProductPrice$CatalogPlugin.consumedEventSchema,
+    errorSchema: ChangeProductPrice$CatalogPlugin.errorSchema,
+    eventSchema: ChangeProductPrice$CatalogPlugin.eventSchema,
+    commandSchema: ChangeProductPrice$CatalogPlugin.commandSchema,
+    commandAuthorization: ChangeProductPrice$CatalogPlugin.commandAuthorization,
+    readConsistency: ChangeProductPrice$CatalogPlugin.readConsistency
+  })({
+    initialState: ChangeProductPrice_Behavior$CatalogPlugin.initialState,
+    evolve: ChangeProductPrice_Behavior$CatalogPlugin.evolve,
+    decide: ChangeProductPrice_Behavior$CatalogPlugin.decide,
+    moduleUrl: ChangeProductPrice_Behavior$CatalogPlugin.moduleUrl
+  });
+  let RecordProductDemandSlice = Platform.StateChangeSlice.Make({
+    name: RecordProductDemand$CatalogPlugin.name,
+    moduleUrl: RecordProductDemand$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: RecordProductDemand$CatalogPlugin.consumedEventSchema,
+    errorSchema: RecordProductDemand$CatalogPlugin.errorSchema,
+    eventSchema: RecordProductDemand$CatalogPlugin.eventSchema,
+    commandSchema: RecordProductDemand$CatalogPlugin.commandSchema,
+    commandAuthorization: RecordProductDemand$CatalogPlugin.commandAuthorization,
+    readConsistency: RecordProductDemand$CatalogPlugin.readConsistency
+  })({
+    initialState: RecordProductDemand_Behavior$CatalogPlugin.initialState,
+    evolve: RecordProductDemand_Behavior$CatalogPlugin.evolve,
+    decide: RecordProductDemand_Behavior$CatalogPlugin.decide,
+    moduleUrl: RecordProductDemand_Behavior$CatalogPlugin.moduleUrl
+  });
+  let RenameCategorySlice = Platform.StateChangeSlice.Make({
+    name: RenameCategory$CatalogPlugin.name,
+    moduleUrl: RenameCategory$CatalogPlugin.moduleUrl,
+    Id: Id$Reventless.$$String,
+    consumedEventSchema: RenameCategory$CatalogPlugin.consumedEventSchema,
+    errorSchema: RenameCategory$CatalogPlugin.errorSchema,
+    eventSchema: RenameCategory$CatalogPlugin.eventSchema,
+    commandSchema: RenameCategory$CatalogPlugin.commandSchema,
+    commandAuthorization: RenameCategory$CatalogPlugin.commandAuthorization,
+    readConsistency: RenameCategory$CatalogPlugin.readConsistency
+  })({
+    initialState: RenameCategory_Behavior$CatalogPlugin.initialState,
+    evolve: RenameCategory_Behavior$CatalogPlugin.evolve,
+    decide: RenameCategory_Behavior$CatalogPlugin.decide,
+    moduleUrl: RenameCategory_Behavior$CatalogPlugin.moduleUrl
+  });
+  let CategoriesStreamSlice = Platform.StateViewSliceStream.Make({
+    name: Categories$CatalogPlugin.name,
+    moduleUrl: Categories$CatalogPlugin.moduleUrl,
+    stateSchema: Categories$CatalogPlugin.stateSchema,
+    consumedEventSchema: Categories$CatalogPlugin.consumedEventSchema,
+    config: Categories$CatalogPlugin.config,
+    subIdConfig: undefined,
+    authorization: Categories$CatalogPlugin.authorization,
+    visibility: Categories$CatalogPlugin.visibility
+  })({
+    project: Categories_Projection$CatalogPlugin.project,
+    moduleUrl: Categories_Projection$CatalogPlugin.moduleUrl
+  });
+  let ProductDemandStreamSlice = Platform.StateViewSliceStream.Make({
+    name: ProductDemand$CatalogPlugin.name,
+    moduleUrl: ProductDemand$CatalogPlugin.moduleUrl,
+    stateSchema: ProductDemand$CatalogPlugin.stateSchema,
+    consumedEventSchema: ProductDemand$CatalogPlugin.consumedEventSchema,
+    config: ProductDemand$CatalogPlugin.config,
+    subIdConfig: undefined,
+    authorization: ProductDemand$CatalogPlugin.authorization,
+    visibility: ProductDemand$CatalogPlugin.visibility
+  })({
+    project: ProductDemand_Projection$CatalogPlugin.project,
+    moduleUrl: ProductDemand_Projection$CatalogPlugin.moduleUrl
+  });
+  let ProductsStreamSlice = Platform.StateViewSliceStream.Make({
+    name: Products$CatalogPlugin.name,
+    moduleUrl: Products$CatalogPlugin.moduleUrl,
+    stateSchema: Products$CatalogPlugin.stateSchema,
+    consumedEventSchema: Products$CatalogPlugin.consumedEventSchema,
+    config: Products$CatalogPlugin.config,
+    subIdConfig: undefined,
+    authorization: Products$CatalogPlugin.authorization,
+    visibility: Products$CatalogPlugin.visibility
+  })({
+    project: Products_Projection$CatalogPlugin.project,
+    moduleUrl: Products_Projection$CatalogPlugin.moduleUrl
+  });
+  let ImportProductSlice = Platform.InboundTranslationSlice.Make({
+    name: ImportProduct$CatalogPlugin.name,
+    moduleUrl: ImportProduct$CatalogPlugin.moduleUrl,
+    externalInputSchema: ImportProduct$CatalogPlugin.externalInputSchema,
+    commandSchema: ImportProduct$CatalogPlugin.commandSchema,
+    targetName: ImportProduct$CatalogPlugin.targetName,
+    externalSystem: ImportProduct$CatalogPlugin.externalSystem,
+    commandAuthorization: ImportProduct$CatalogPlugin.commandAuthorization
+  })({
+    translate: ImportProduct_Translation$CatalogPlugin.translate,
+    moduleUrl: ImportProduct_Translation$CatalogPlugin.moduleUrl
+  });
+  let ImportProductsTask = Platform.Task.Make({
+    name: ImportProducts$CatalogPlugin.name,
+    moduleUrl: ImportProducts$CatalogPlugin.moduleUrl,
+    setup: ImportProducts$CatalogPlugin.setup
+  });
+  let Products_ExtensionPoint = Platform.ExtensionPoint.Make({
+    ExtensionPoint: {
+      name: Products_ExtensionPoint$CatalogSpec.name,
+      moduleUrl: Products_ExtensionPoint$CatalogSpec.moduleUrl,
+      commandSchema: Products_ExtensionPoint$CatalogSpec.commandSchema,
+      eventSchema: Products_ExtensionPoint$CatalogSpec.eventSchema,
+      directiveSchema: Products_ExtensionPoint$CatalogSpec.directiveSchema
+    },
+    Delegate: {
+      Id: Id$Reventless.$$String,
+      name: Products_ExtensionPointMapping$CatalogPlugin.Delegate.name,
+      eventSchema: Products_ExtensionPointMapping$CatalogPlugin.Delegate.eventSchema,
+      errorSchema: Products_ExtensionPointMapping$CatalogPlugin.Delegate.errorSchema,
+      commandSchema: Products_ExtensionPointMapping$CatalogPlugin.Delegate.commandSchema,
+      moduleUrl: Products_ExtensionPointMapping$CatalogPlugin.Delegate.moduleUrl,
+      commandAuthorization: Products_ExtensionPointMapping$CatalogPlugin.Delegate.commandAuthorization
+    },
+    moduleUrl: Products_ExtensionPointMapping$CatalogPlugin.moduleUrl,
+    mapIncomingCommand: Products_ExtensionPointMapping$CatalogPlugin.mapIncomingCommand,
+    mapOutgoingEvent: Products_ExtensionPointMapping$CatalogPlugin.mapOutgoingEvent
+  });
+  let Orders_Extension = Platform.Extension.Make({
+    ExtensionPoint: {
+      name: Orders_ExtensionPoint$OrderingSpec.name,
+      moduleUrl: Orders_ExtensionPoint$OrderingSpec.moduleUrl,
+      commandSchema: Orders_ExtensionPoint$OrderingSpec.commandSchema,
+      eventSchema: Orders_ExtensionPoint$OrderingSpec.eventSchema,
+      directiveSchema: Orders_ExtensionPoint$OrderingSpec.directiveSchema
+    },
+    Delegate: {
+      Id: Id$Reventless.$$String,
+      name: RecordProductDemand$CatalogPlugin.name,
+      eventSchema: RecordProductDemand$CatalogPlugin.eventSchema,
+      errorSchema: RecordProductDemand$CatalogPlugin.errorSchema,
+      commandSchema: RecordProductDemand$CatalogPlugin.commandSchema,
+      moduleUrl: RecordProductDemand$CatalogPlugin.moduleUrl,
+      commandAuthorization: RecordProductDemand$CatalogPlugin.commandAuthorization
+    },
+    moduleUrl: Orders_Extension$CatalogPlugin.Mapping.moduleUrl,
+    delegateModuleUrl: Orders_Extension$CatalogPlugin.Mapping.delegateModuleUrl,
+    mapIncomingEvent: Orders_Extension$CatalogPlugin.Mapping.mapIncomingEvent,
+    mapOutgoingEvent: Orders_Extension$CatalogPlugin.Mapping.mapOutgoingEvent
+  });
+  let pluginStructure = Platform.Plugin.makePluginDefinition("Catalog", undefined, undefined, [
+    CategoriesStreamSlice,
+    ProductDemandStreamSlice,
+    ProductsStreamSlice
+  ], [
+    AddCategorySlice,
+    AddProductSlice,
+    ArchiveCategorySlice,
+    ChangeProductDescriptionSlice,
+    ChangeProductNameSlice,
+    ChangeProductPriceSlice,
+    RecordProductDemandSlice,
+    RenameCategorySlice
+  ], undefined, undefined, [ImportProductSlice], [Orders_Extension], [{
+      ExtensionPoint: {
+        name: Products_ExtensionPoint$CatalogSpec.name,
+        moduleUrl: Products_ExtensionPoint$CatalogSpec.moduleUrl,
+        commandSchema: Products_ExtensionPoint$CatalogSpec.commandSchema,
+        eventSchema: Products_ExtensionPoint$CatalogSpec.eventSchema,
+        directiveSchema: Products_ExtensionPoint$CatalogSpec.directiveSchema
+      },
+      Delegate: {
+        Id: Id$Reventless.$$String,
+        name: Products_ExtensionPointMapping$CatalogPlugin.Delegate.name,
+        eventSchema: Products_ExtensionPointMapping$CatalogPlugin.Delegate.eventSchema,
+        errorSchema: Products_ExtensionPointMapping$CatalogPlugin.Delegate.errorSchema,
+        commandSchema: Products_ExtensionPointMapping$CatalogPlugin.Delegate.commandSchema,
+        moduleUrl: Products_ExtensionPointMapping$CatalogPlugin.Delegate.moduleUrl,
+        commandAuthorization: Products_ExtensionPointMapping$CatalogPlugin.Delegate.commandAuthorization
+      },
+      moduleUrl: Products_ExtensionPointMapping$CatalogPlugin.moduleUrl,
+      mapIncomingCommand: Products_ExtensionPointMapping$CatalogPlugin.mapIncomingCommand,
+      mapOutgoingEvent: Products_ExtensionPointMapping$CatalogPlugin.mapOutgoingEvent
+    }]);
+  let make = () => Platform.Plugin.make("Catalog", 5, [Products_ExtensionPoint], [Orders_Extension], undefined, undefined, [ImportProductsTask], [
+    AddCategorySlice,
+    AddProductSlice,
+    ArchiveCategorySlice,
+    ChangeProductDescriptionSlice,
+    ChangeProductNameSlice,
+    ChangeProductPriceSlice,
+    RecordProductDemandSlice,
+    RenameCategorySlice
+  ], [
+    CategoriesStreamSlice,
+    ProductDemandStreamSlice,
+    ProductsStreamSlice
+  ], undefined, undefined, [ImportProductSlice], Stdlib_Option.map(process.env.CATALOG_UI_BUNDLE_URL, url => Platform.Plugin.makeAutoUIManifest(url, "Catalog", pluginStructure, ["platform-summary"], ["resource-detail"])), pluginStructure, undefined);
+  return {
+    AddCategorySlice: AddCategorySlice,
+    AddProductSlice: AddProductSlice,
+    ArchiveCategorySlice: ArchiveCategorySlice,
+    ChangeProductDescriptionSlice: ChangeProductDescriptionSlice,
+    ChangeProductNameSlice: ChangeProductNameSlice,
+    ChangeProductPriceSlice: ChangeProductPriceSlice,
+    RecordProductDemandSlice: RecordProductDemandSlice,
+    RenameCategorySlice: RenameCategorySlice,
+    CategoriesStreamSlice: CategoriesStreamSlice,
+    ProductDemandStreamSlice: ProductDemandStreamSlice,
+    ProductsStreamSlice: ProductsStreamSlice,
+    ImportProductSlice: ImportProductSlice,
+    ImportProductsTask: ImportProductsTask,
+    Products_ExtensionPoint: Products_ExtensionPoint,
+    Orders_Extension: Orders_Extension,
+    pluginStructure: pluginStructure,
+    make: make
+  };
+}
+
+export {
+  Make,
+}
+/* Id-Reventless Not a pure module */

package/src/Product/InboundTranslationSlice/ImportProduct.res

@@ -0,0 +1,28 @@
+// ImportProduct InboundTranslationSlice.
+// Receives external supplier JSON, validates and translates to an AddProduct command.
+
+@@reventless.spec
+
+@schema
+type externalInput = {
+  sku: string,
+  title: string,
+  desc: string,
+  unitPrice: int,
+  currency: string,
+  category: string,
+}
+
+@schema
+type command = AddProduct({
+  productId: string,
+  name: string,
+  description: string,
+  price: float,
+  categoryId: string,
+})
+
+let targetName = "AddProduct"
+// Foreign system this anti-corruption slice receives product data from — drawn as an
+// external box outside the Catalog plugin in the Event Graph.
+let externalSystem = Some("SupplierFeed")

package/src/Product/InboundTranslationSlice/ImportProduct.res.mjs

@@ -0,0 +1,48 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as S from "sury/src/S.res.mjs";
+import * as DcbTag$Reventless from "@reventlessdev/reventless-spec/src/components/DcbTag.res.mjs";
+
+let externalInputSchema = S.schema(s => ({
+  sku: s.m(S.string),
+  title: s.m(S.string),
+  desc: s.m(S.string),
+  unitPrice: s.m(S.int),
+  currency: s.m(S.string),
+  category: s.m(S.string)
+}));
+
+let commandSchema = S.schema(s => ({
+  TAG: "AddProduct",
+  productId: s.m(DcbTag$Reventless.string),
+  name: s.m(S.string),
+  description: s.m(S.string),
+  price: s.m(S.float),
+  categoryId: s.m(DcbTag$Reventless.string)
+}));
+
+function commandAuthorization(param) {
+  return "AllowAuthenticated";
+}
+
+let name = "ImportProduct";
+
+let Id;
+
+let targetName = "AddProduct";
+
+let externalSystem = "SupplierFeed";
+
+let moduleUrl = "@reventlessdev/online-shop-hybrid-catalog/src/Product/InboundTranslationSlice/ImportProduct.res.mjs";
+
+export {
+  name,
+  Id,
+  externalInputSchema,
+  commandSchema,
+  targetName,
+  externalSystem,
+  moduleUrl,
+  commandAuthorization,
+}
+/* externalInputSchema Not a pure module */

package/src/Product/InboundTranslationSlice/ImportProduct_Translation.res

@@ -0,0 +1,23 @@
+@@reventless.translation
+
+let translate = (input: externalInput) =>
+  if input.currency !== "USD" {
+    Error("Unsupported currency: " ++ input.currency)
+  } else if input.unitPrice <= 0 {
+    Error("Price must be positive")
+  } else if input.sku === "" {
+    Error("SKU is required")
+  } else if input.category === "" {
+    Error("Category is required")
+  } else {
+    Ok([(
+      input.sku,
+      AddProduct({
+        productId: input.sku,
+        name: input.title,
+        description: input.desc,
+        price: Int.toFloat(input.unitPrice) /. 100.0,
+        categoryId: input.category,
+      }),
+    )])
+  }

package/src/Product/InboundTranslationSlice/ImportProduct_Translation.res.mjs

@@ -0,0 +1,52 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+
+function translate(input) {
+  if (input.currency !== "USD") {
+    return {
+      TAG: "Error",
+      _0: "Unsupported currency: " + input.currency
+    };
+  } else if (input.unitPrice <= 0) {
+    return {
+      TAG: "Error",
+      _0: "Price must be positive"
+    };
+  } else if (input.sku === "") {
+    return {
+      TAG: "Error",
+      _0: "SKU is required"
+    };
+  } else if (input.category === "") {
+    return {
+      TAG: "Error",
+      _0: "Category is required"
+    };
+  } else {
+    return {
+      TAG: "Ok",
+      _0: [[
+          input.sku,
+          {
+            TAG: "AddProduct",
+            productId: input.sku,
+            name: input.title,
+            description: input.desc,
+            price: input.unitPrice / 100.0,
+            categoryId: input.category
+          }
+        ]]
+    };
+  }
+}
+
+let Spec;
+
+let moduleUrl = "@reventlessdev/online-shop-hybrid-catalog/src/Product/InboundTranslationSlice/ImportProduct_Translation.res.mjs";
+
+export {
+  Spec,
+  translate,
+  moduleUrl,
+}
+/* No side effect */

package/src/Product/StateChangeSlice/AddProduct.res

@@ -0,0 +1,37 @@
+// AddProduct StateChangeSlice.
+// Rejects duplicate creation and validates that the referenced category exists
+// and is active.
+
+@@reventless.spec
+
+@schema
+type consumedEvent =
+  | ProductAdded({productId: string})
+  | CategoryAdded({categoryId: string})
+  | CategoryArchived({categoryId: string})
+
+@schema
+type command =
+  | AddProduct({
+      // Two *Id fields (productId + categoryId) — @partitionTag picks the storage partition.
+      @partitionTag productId: string,
+      name: string,
+      description: string,
+      price: float,
+      @ref("Categories") categoryId: string,
+    })
+
+@schema
+type error =
+  | ProductAlreadyExists
+  | CategoryNotFound
+
+@schema
+type event =
+  | ProductAdded({
+      @partitionTag productId: string,
+      name: string,
+      description: string,
+      price: float,
+      categoryId: string,
+    })

package/src/Product/StateChangeSlice/AddProduct.res.mjs

@@ -0,0 +1,68 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as S from "sury/src/S.res.mjs";
+import * as DcbTag$Reventless from "@reventlessdev/reventless-spec/src/components/DcbTag.res.mjs";
+import * as Reference$Reventless from "@reventlessdev/reventless-spec/src/components/Reference.res.mjs";
+
+let consumedEventSchema = S.union([
+  S.schema(s => ({
+    TAG: "ProductAdded",
+    productId: s.m(DcbTag$Reventless.string)
+  })),
+  S.schema(s => ({
+    TAG: "CategoryAdded",
+    categoryId: s.m(DcbTag$Reventless.string)
+  })),
+  S.schema(s => ({
+    TAG: "CategoryArchived",
+    categoryId: s.m(DcbTag$Reventless.string)
+  }))
+]);
+
+let commandSchema = S.schema(s => ({
+  TAG: "AddProduct",
+  productId: s.m(DcbTag$Reventless.partition),
+  name: s.m(S.string),
+  description: s.m(S.string),
+  price: s.m(S.float),
+  categoryId: s.m(Reference$Reventless.to_(undefined, undefined, "Categories"))
+}));
+
+let errorSchema = S.union([
+  S.literal("ProductAlreadyExists"),
+  S.literal("CategoryNotFound")
+]);
+
+let eventSchema = S.schema(s => ({
+  TAG: "ProductAdded",
+  productId: s.m(DcbTag$Reventless.partition),
+  name: s.m(S.string),
+  description: s.m(S.string),
+  price: s.m(S.float),
+  categoryId: s.m(DcbTag$Reventless.string)
+}));
+
+function commandAuthorization(param) {
+  return "AllowAuthenticated";
+}
+
+let name = "AddProduct";
+
+let Id;
+
+let moduleUrl = "@reventlessdev/online-shop-hybrid-catalog/src/Product/StateChangeSlice/AddProduct.res.mjs";
+
+let readConsistency = "EscalateOnRetry";
+
+export {
+  name,
+  Id,
+  consumedEventSchema,
+  commandSchema,
+  errorSchema,
+  eventSchema,
+  moduleUrl,
+  commandAuthorization,
+  readConsistency,
+}
+/* consumedEventSchema Not a pure module */

package/src/Product/StateChangeSlice/AddProduct_Behavior.res

@@ -0,0 +1,35 @@
+@@reventless.behavior
+
+// `exists` flags whether this product already exists; `liveCategoryIds` holds
+// categories that exist and are not archived — adding a product to a missing or
+// archived category is rejected.
+type state = {exists: bool, liveCategoryIds: array<string>}
+
+let initialState = {exists: false, liveCategoryIds: []}
+
+let evolve = (state, event: consumedEvent) =>
+  switch event {
+  | ProductAdded(_) => {...state, exists: true}
+  | CategoryAdded({categoryId}) => {
+      ...state,
+      liveCategoryIds: state.liveCategoryIds->Array.includes(categoryId)
+        ? state.liveCategoryIds
+        : Array.concat(state.liveCategoryIds, [categoryId]),
+    }
+  | CategoryArchived({categoryId}) => {
+      ...state,
+      liveCategoryIds: state.liveCategoryIds->Array.filter(id => id !== categoryId),
+    }
+  }
+
+let decide = (state, command) =>
+  switch command {
+  | AddProduct({productId, name, description, price, categoryId}) =>
+    if state.exists {
+      Error(ProductAlreadyExists)
+    } else if !(state.liveCategoryIds->Array.includes(categoryId)) {
+      Error(CategoryNotFound)
+    } else {
+      Ok([ProductAdded({productId, name, description, price, categoryId})])
+    }
+  }