@reventlessdev/online-shop-dcb-ordering 1.0.0-alpha.227 → 1.0.0-alpha.229

package/CHANGELOG.md

@@ -3,6 +3,38 @@
 All notable changes to this project will be documented in this file.
 See [Conventional Commits](https://conventionalcommits.org) for commit guidelines.
 
+# 1.0.0-alpha.229 (2026-08-27)
+
+### Bug Fixes
+
+* **ppx:** follow a let-bound action array merged into an arm's result ([230c72e](https://github.com/ReventlessDev/reventless-core/commit/230c72e25856d8ed20d0860e742b133b2c672d4a))
+* feat(spec)!: reflect the command direction across a port, both halves ([f2fe258](https://github.com/ReventlessDev/reventless-core/commit/f2fe258d195b74f4a61488edee305665341020ea))
+* feat(spec)!: read the port's translation table off the mapping's arms ([956348a](https://github.com/ReventlessDev/reventless-core/commit/956348a9fcb256cfff9db51809bdc27d73360e6c))
+
+### BREAKING CHANGES
+
+* `ExtensionPointMapping.Mapping` gains `acceptedCommands` and
+`ExtensionMapping.Mapping` gains `issuedCommands`; both are derived, so a
+mapping the ppx can read needs no source change, and one it cannot names itself
+at compile time. Definitions persisted before the two new def fields must be
+re-emitted before a consumer can read them as present — and until then they
+decode as None, which means unknown, not "issues nothing".
+* `ExtensionPointMapping.Mapping` requires `publishedEvents` and
+`ExtensionMapping.Mapping` requires `handledEvents`; the ppx injects both for
+mappings it can read, so app code must build against the matching ppx. Plugin
+definitions persisted before the new fields must be re-emitted before a consumer
+reads them as present.
+
+
+
+# 1.0.0-alpha.228 (2026-08-23)
+
+**Note:** Version bump only for package @reventlessdev/online-shop-dcb-ordering
+
+
+
+
+
 # 1.0.0-alpha.227 (2026-08-23)
 
 **Note:** Version bump only for package @reventlessdev/online-shop-dcb-ordering

package/lib/bs/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1787494733522)
-#Done(1787494736224)
+#Start(1787790330016)
+#Done(1787790332856)

package/lib/bs/compiler-info.json

@@ -4,5 +4,5 @@
   "bsc_hash": "75e3a59c95cc953608fd3dd6ea6ed68141bba4414a20a52f114261b8a48385fa",
   "rescript_config_hash": "2b45634c4ef9d26c69e2cd8282eb5d077ce9cf087ded0065001d0f0d889e241c",
   "runtime_path": "/home/runner/work/reventless-core/reventless-core/node_modules/@rescript/runtime",
-  "generated_at": "1787494736234"
+  "generated_at": "1787790332858"
 }

package/lib/bs/src/Extension/Products_Extension.res

@@ -9,6 +9,7 @@ module Mapping = {
 
   open ExtensionPoint
   open SyncCatalogProduct
+
   let mapIncomingEvent = (_id, event, _meta, _pluginDef, _queryEngine) =>
     switch event {
     | ProductBecameAvailable({productId, name, price}) => [

package/lib/bs/src/Extension/Products_Extension.res.mjs

@@ -25,11 +25,26 @@ function mapIncomingEvent(_id, event, _meta, _pluginDef, _queryEngine) {
   }
 }
 
+let handledEvents = [
+  {
+    name: "ProductBecameAvailable",
+    toCommandTypes: ["SyncNewProduct"]
+  },
+  {
+    name: "ProductPriceChanged",
+    toCommandTypes: ["ChangeSyncedPrice"]
+  }
+];
+
+let issuedCommands = [];
+
 let Mapping = {
   ExtensionPoint: undefined,
   Delegate: undefined,
   mapIncomingEvent: mapIncomingEvent,
   mapOutgoingEvent: undefined,
+  handledEvents: handledEvents,
+  issuedCommands: issuedCommands,
   delegateModuleUrl: SyncCatalogProduct$OrderingPlugin.moduleUrl,
   moduleUrl: "@reventlessdev/online-shop-dcb-ordering/src/Extension/Products_Extension.res.mjs"
 };

package/lib/bs/src/ExtensionPoint/Orders_ExtensionPointMapping.res

@@ -1,11 +1,10 @@
-// Maps internal Ordering events to the stable Orders_ExtensionPoint public API.
-// Decomposes batch OrderPlaced / OrderCancelled events into per-product EP events.
+// Maps internal Ordering events to the Orders_ExtensionPoint public API, one
+// published event per product in a batch.
 @@reventless.spec
 
 module ExtensionPoint = OrderingSpec.Orders_ExtensionPoint
 
-// DCB adapter: defines the event type used for outgoing event mapping.
-// Only the events relevant to the extension point are included.
+// DCB adapter carrying only the events this port maps.
 module Delegate = {
   let name = "OrderingDcbEventLog"
   @schema

package/lib/bs/src/ExtensionPoint/Orders_ExtensionPointMapping.res.mjs

@@ -66,6 +66,19 @@ let mapOutgoingEvent = (_id, event, _meta, _queryEngine) => {
   }));
 };
 
+let publishedEvents = [
+  {
+    name: "ItemOrdered",
+    fromEventTypes: ["OrderPlaced"]
+  },
+  {
+    name: "ItemOrderCancelled",
+    fromEventTypes: ["OrderCancelled"]
+  }
+];
+
+let acceptedCommands = [];
+
 let name = "Orders";
 
 let Id;
@@ -82,5 +95,7 @@ export {
   mapIncomingCommand,
   mapOutgoingEvent,
   moduleUrl,
+  publishedEvents,
+  acceptedCommands,
 }
 /* commandSchema Not a pure module */

package/lib/bs/src/Plugin.res.mjs

@@ -251,7 +251,9 @@ function Make(Platform) {
     },
     moduleUrl: Orders_ExtensionPointMapping$OrderingPlugin.moduleUrl,
     mapIncomingCommand: Orders_ExtensionPointMapping$OrderingPlugin.mapIncomingCommand,
-    mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent
+    mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent,
+    publishedEvents: Orders_ExtensionPointMapping$OrderingPlugin.publishedEvents,
+    acceptedCommands: Orders_ExtensionPointMapping$OrderingPlugin.acceptedCommands
   });
   let Products_Extension = Platform.Extension.Make({
     ExtensionPoint: {
@@ -273,7 +275,9 @@ function Make(Platform) {
     moduleUrl: Products_Extension$OrderingPlugin.Mapping.moduleUrl,
     delegateModuleUrl: Products_Extension$OrderingPlugin.Mapping.delegateModuleUrl,
     mapIncomingEvent: Products_Extension$OrderingPlugin.Mapping.mapIncomingEvent,
-    mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent
+    mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent,
+    handledEvents: Products_Extension$OrderingPlugin.Mapping.handledEvents,
+    issuedCommands: Products_Extension$OrderingPlugin.Mapping.issuedCommands
   });
   let pluginStructure = Platform.Plugin.makePluginDefinition("Ordering", undefined, undefined, [
     AvailableProductsSlice,
@@ -307,7 +311,9 @@ function Make(Platform) {
       },
       moduleUrl: Orders_ExtensionPointMapping$OrderingPlugin.moduleUrl,
       mapIncomingCommand: Orders_ExtensionPointMapping$OrderingPlugin.mapIncomingCommand,
-      mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent
+      mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent,
+      publishedEvents: Orders_ExtensionPointMapping$OrderingPlugin.publishedEvents,
+      acceptedCommands: Orders_ExtensionPointMapping$OrderingPlugin.acceptedCommands
     }], Object.fromEntries([
     [
       "AutoShipOrder",

package/lib/bs/tests/Extension/Products_Extension_GWT.res.mjs

@@ -26,7 +26,9 @@ let include = Delegate_GWT$ReventlessGwt.FromExtension({
   moduleUrl: Products_Extension$OrderingPlugin.Mapping.moduleUrl,
   delegateModuleUrl: Products_Extension$OrderingPlugin.Mapping.delegateModuleUrl,
   mapIncomingEvent: Products_Extension$OrderingPlugin.Mapping.mapIncomingEvent,
-  mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent
+  mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent,
+  handledEvents: Products_Extension$OrderingPlugin.Mapping.handledEvents,
+  issuedCommands: Products_Extension$OrderingPlugin.Mapping.issuedCommands
 });
 
 let describe = include.describe;

package/lib/bs/tests/ExtensionPoint/Orders_ExtensionPointMapping_GWT.res.mjs

@@ -24,7 +24,9 @@ let include = Delegate_GWT$ReventlessGwt.FromExtensionPoint({
   },
   moduleUrl: Orders_ExtensionPointMapping$OrderingPlugin.moduleUrl,
   mapIncomingCommand: Orders_ExtensionPointMapping$OrderingPlugin.mapIncomingCommand,
-  mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent
+  mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent,
+  publishedEvents: Orders_ExtensionPointMapping$OrderingPlugin.publishedEvents,
+  acceptedCommands: Orders_ExtensionPointMapping$OrderingPlugin.acceptedCommands
 });
 
 let describe = include.describe;

package/lib/ocaml/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1787494733522)
-#Done(1787494736224)
+#Start(1787790330016)
+#Done(1787790332856)

package/lib/ocaml/Orders_ExtensionPointMapping.res

@@ -1,11 +1,10 @@
-// Maps internal Ordering events to the stable Orders_ExtensionPoint public API.
-// Decomposes batch OrderPlaced / OrderCancelled events into per-product EP events.
+// Maps internal Ordering events to the Orders_ExtensionPoint public API, one
+// published event per product in a batch.
 @@reventless.spec
 
 module ExtensionPoint = OrderingSpec.Orders_ExtensionPoint
 
-// DCB adapter: defines the event type used for outgoing event mapping.
-// Only the events relevant to the extension point are included.
+// DCB adapter carrying only the events this port maps.
 module Delegate = {
   let name = "OrderingDcbEventLog"
   @schema

package/lib/ocaml/Products_Extension.res

@@ -9,6 +9,7 @@ module Mapping = {
 
   open ExtensionPoint
   open SyncCatalogProduct
+
   let mapIncomingEvent = (_id, event, _meta, _pluginDef, _queryEngine) =>
     switch event {
     | ProductBecameAvailable({productId, name, price}) => [

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/online-shop-dcb-ordering",
-  "version": "1.0.0-alpha.227",
+  "version": "1.0.0-alpha.229",
   "description": "Online Shop example — Ordering bounded context (Customer & Order) using the DCB pattern",
   "license": "Apache-2.0",
   "jest": {
@@ -21,18 +21,18 @@
   },
   "dependencies": {
     "sury": "11.0.0-rc.2",
-    "@reventlessdev/online-shop-dcb-catalog-spec": "1.0.0-alpha.123",
-    "@reventlessdev/online-shop-dcb-ordering-spec": "1.0.0-alpha.123",
+    "@reventlessdev/online-shop-dcb-ordering-spec": "1.0.0-alpha.124",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.152",
     "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.19",
-    "@reventlessdev/reventless-gwt": "1.0.0-alpha.196",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.151",
-    "@reventlessdev/reventless-local": "3.0.0-alpha.237",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.123"
+    "@reventlessdev/reventless-gwt": "1.0.0-alpha.198",
+    "@reventlessdev/online-shop-dcb-catalog-spec": "1.0.0-alpha.124",
+    "@reventlessdev/reventless-local": "3.0.0-alpha.239",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.124"
   },
   "devDependencies": {
     "rescript": "12.3.0",
     "sury-ppx": "11.0.0-rc.2",
-    "@reventlessdev/reventless-ppx": "1.0.0-alpha.73"
+    "@reventlessdev/reventless-ppx": "1.0.0-alpha.74"
   },
   "peerDependencies": {
     "rescript": "12.3.0"

package/src/Extension/Products_Extension.res

@@ -9,6 +9,7 @@ module Mapping = {
 
   open ExtensionPoint
   open SyncCatalogProduct
+
   let mapIncomingEvent = (_id, event, _meta, _pluginDef, _queryEngine) =>
     switch event {
     | ProductBecameAvailable({productId, name, price}) => [

package/src/Extension/Products_Extension.res.mjs

@@ -25,11 +25,26 @@ function mapIncomingEvent(_id, event, _meta, _pluginDef, _queryEngine) {
   }
 }
 
+let handledEvents = [
+  {
+    name: "ProductBecameAvailable",
+    toCommandTypes: ["SyncNewProduct"]
+  },
+  {
+    name: "ProductPriceChanged",
+    toCommandTypes: ["ChangeSyncedPrice"]
+  }
+];
+
+let issuedCommands = [];
+
 let Mapping = {
   ExtensionPoint: undefined,
   Delegate: undefined,
   mapIncomingEvent: mapIncomingEvent,
   mapOutgoingEvent: undefined,
+  handledEvents: handledEvents,
+  issuedCommands: issuedCommands,
   delegateModuleUrl: SyncCatalogProduct$OrderingPlugin.moduleUrl,
   moduleUrl: "@reventlessdev/online-shop-dcb-ordering/src/Extension/Products_Extension.res.mjs"
 };

package/src/ExtensionPoint/Orders_ExtensionPointMapping.res

@@ -1,11 +1,10 @@
-// Maps internal Ordering events to the stable Orders_ExtensionPoint public API.
-// Decomposes batch OrderPlaced / OrderCancelled events into per-product EP events.
+// Maps internal Ordering events to the Orders_ExtensionPoint public API, one
+// published event per product in a batch.
 @@reventless.spec
 
 module ExtensionPoint = OrderingSpec.Orders_ExtensionPoint
 
-// DCB adapter: defines the event type used for outgoing event mapping.
-// Only the events relevant to the extension point are included.
+// DCB adapter carrying only the events this port maps.
 module Delegate = {
   let name = "OrderingDcbEventLog"
   @schema

package/src/ExtensionPoint/Orders_ExtensionPointMapping.res.mjs

@@ -66,6 +66,19 @@ let mapOutgoingEvent = (_id, event, _meta, _queryEngine) => {
   }));
 };
 
+let publishedEvents = [
+  {
+    name: "ItemOrdered",
+    fromEventTypes: ["OrderPlaced"]
+  },
+  {
+    name: "ItemOrderCancelled",
+    fromEventTypes: ["OrderCancelled"]
+  }
+];
+
+let acceptedCommands = [];
+
 let name = "Orders";
 
 let Id;
@@ -82,5 +95,7 @@ export {
   mapIncomingCommand,
   mapOutgoingEvent,
   moduleUrl,
+  publishedEvents,
+  acceptedCommands,
 }
 /* commandSchema Not a pure module */

package/src/Plugin.res.mjs

@@ -251,7 +251,9 @@ function Make(Platform) {
     },
     moduleUrl: Orders_ExtensionPointMapping$OrderingPlugin.moduleUrl,
     mapIncomingCommand: Orders_ExtensionPointMapping$OrderingPlugin.mapIncomingCommand,
-    mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent
+    mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent,
+    publishedEvents: Orders_ExtensionPointMapping$OrderingPlugin.publishedEvents,
+    acceptedCommands: Orders_ExtensionPointMapping$OrderingPlugin.acceptedCommands
   });
   let Products_Extension = Platform.Extension.Make({
     ExtensionPoint: {
@@ -273,7 +275,9 @@ function Make(Platform) {
     moduleUrl: Products_Extension$OrderingPlugin.Mapping.moduleUrl,
     delegateModuleUrl: Products_Extension$OrderingPlugin.Mapping.delegateModuleUrl,
     mapIncomingEvent: Products_Extension$OrderingPlugin.Mapping.mapIncomingEvent,
-    mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent
+    mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent,
+    handledEvents: Products_Extension$OrderingPlugin.Mapping.handledEvents,
+    issuedCommands: Products_Extension$OrderingPlugin.Mapping.issuedCommands
   });
   let pluginStructure = Platform.Plugin.makePluginDefinition("Ordering", undefined, undefined, [
     AvailableProductsSlice,
@@ -307,7 +311,9 @@ function Make(Platform) {
       },
       moduleUrl: Orders_ExtensionPointMapping$OrderingPlugin.moduleUrl,
       mapIncomingCommand: Orders_ExtensionPointMapping$OrderingPlugin.mapIncomingCommand,
-      mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent
+      mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent,
+      publishedEvents: Orders_ExtensionPointMapping$OrderingPlugin.publishedEvents,
+      acceptedCommands: Orders_ExtensionPointMapping$OrderingPlugin.acceptedCommands
     }], Object.fromEntries([
     [
       "AutoShipOrder",

package/tests/Extension/Products_Extension_GWT.res.mjs

@@ -26,7 +26,9 @@ let include = Delegate_GWT$ReventlessGwt.FromExtension({
   moduleUrl: Products_Extension$OrderingPlugin.Mapping.moduleUrl,
   delegateModuleUrl: Products_Extension$OrderingPlugin.Mapping.delegateModuleUrl,
   mapIncomingEvent: Products_Extension$OrderingPlugin.Mapping.mapIncomingEvent,
-  mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent
+  mapOutgoingEvent: Products_Extension$OrderingPlugin.Mapping.mapOutgoingEvent,
+  handledEvents: Products_Extension$OrderingPlugin.Mapping.handledEvents,
+  issuedCommands: Products_Extension$OrderingPlugin.Mapping.issuedCommands
 });
 
 let describe = include.describe;

package/tests/ExtensionPoint/Orders_ExtensionPointMapping_GWT.res.mjs

@@ -24,7 +24,9 @@ let include = Delegate_GWT$ReventlessGwt.FromExtensionPoint({
   },
   moduleUrl: Orders_ExtensionPointMapping$OrderingPlugin.moduleUrl,
   mapIncomingCommand: Orders_ExtensionPointMapping$OrderingPlugin.mapIncomingCommand,
-  mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent
+  mapOutgoingEvent: Orders_ExtensionPointMapping$OrderingPlugin.mapOutgoingEvent,
+  publishedEvents: Orders_ExtensionPointMapping$OrderingPlugin.publishedEvents,
+  acceptedCommands: Orders_ExtensionPointMapping$OrderingPlugin.acceptedCommands
 });
 
 let describe = include.describe;