@reventlessdev/online-shop-dcb-ordering 1.0.0-alpha.276 → 1.0.0-alpha.278

package/CHANGELOG.md

@@ -3,6 +3,32 @@
 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.278 (2026-10-16)
+
+* feat!(automation): schedules set by events ([53bc436](https://github.com/ReventlessDev/reventless-core/commit/53bc4363dffce81ef36475728bf0dae704716021))
+* feat!(automation): declared schedules tick an automation ([420acd2](https://github.com/ReventlessDev/reventless-core/commit/420acd2233aadf700141a31d9d3e0fdc8074bef7))
+
+### BREAKING CHANGES
+
+* a hand-written AutomationSlice.Mapping.Make the PPX does
+not see must define `let reschedule = _ => []`.
+* a hand-written AutomationSlice spec the PPX does not see must
+declare `let schedule = None`.
+
+
+
+# 1.0.0-alpha.277 (2026-10-15)
+
+* feat!: an automation's process takes ~now, and collect the event's recorded time ([8c8f3f5](https://github.com/ReventlessDev/reventless-core/commit/8c8f3f570474b1658b605b726077debc7d6a1dc7))
+
+### BREAKING CHANGES
+
+* a process the PPX does not see — in an Automation module
+written by hand, or a SliceSpec given to the deprecated Automation_GWT.Make
+or Flow_GWT.AutomationStep — must take ~now.
+
+
+
 # 1.0.0-alpha.276 (2026-10-14)
 
 **Note:** Version bump only for package @reventlessdev/online-shop-dcb-ordering

package/lib/bs/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1791984219078)
-#Done(1791984221743)
+#Start(1792143692768)
+#Done(1792143695947)

package/lib/bs/compiler-info.json

@@ -4,5 +4,5 @@
   "bsc_hash": "1006241435e8d5052329c523202a7fe6359a37e1e1688c023d37d6a7ebb5fb6d",
   "rescript_config_hash": "2b45634c4ef9d26c69e2cd8282eb5d077ce9cf087ded0065001d0f0d889e241c",
   "runtime_path": "/home/runner/work/reventless-core/reventless-core/node_modules/@rescript/runtime",
-  "generated_at": "1791984221758"
+  "generated_at": "1792143695961"
 }

package/lib/bs/src/Order/Automation/AutoShipOrder.res.mjs

@@ -35,6 +35,8 @@ let targetName = "ShipOrder";
 
 let moduleUrl = "@reventlessdev/online-shop-dcb-ordering/src/Order/Automation/AutoShipOrder.res.mjs";
 
+let schedule;
+
 export {
   name,
   Id,
@@ -47,5 +49,6 @@ export {
   authorizationOf,
   commandTransition,
   traits,
+  schedule,
 }
 /* todoItemSchema Not a pure module */

package/lib/bs/src/Order/Automation/AutoShipOrder_Automation.res.mjs

@@ -14,7 +14,8 @@ let M = AutomationSlice$Reventless.Mappings.Make({
   commandSchema: AutoShipOrder$OrderingPlugin.commandSchema,
   maxRetries: AutoShipOrder$OrderingPlugin.maxRetries,
   heartbeatInterval: AutoShipOrder$OrderingPlugin.heartbeatInterval,
-  targetName: AutoShipOrder$OrderingPlugin.targetName
+  targetName: AutoShipOrder$OrderingPlugin.targetName,
+  schedule: undefined
 });
 
 let name = "OrderingDcbEventLog";
@@ -57,6 +58,10 @@ function resolve(event) {
   }
 }
 
+function reschedule(param) {
+  return [];
+}
+
 let FromOrderingDcb = AutomationSlice$Reventless.Mapping.Make({
   Id: Id$Reventless.$$String,
   name: name,
@@ -68,15 +73,17 @@ let FromOrderingDcb = AutomationSlice$Reventless.Mapping.Make({
   commandSchema: AutoShipOrder$OrderingPlugin.commandSchema,
   maxRetries: AutoShipOrder$OrderingPlugin.maxRetries,
   heartbeatInterval: AutoShipOrder$OrderingPlugin.heartbeatInterval,
-  targetName: AutoShipOrder$OrderingPlugin.targetName
+  targetName: AutoShipOrder$OrderingPlugin.targetName,
+  schedule: undefined
 })({
   collect: collect,
-  resolve: resolve
+  resolve: resolve,
+  reschedule: reschedule
 });
 
 let mappings = [FromOrderingDcb];
 
-function process(id, item) {
+function process(id, item, param) {
   return [
     id,
     {

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

@@ -282,7 +282,8 @@ function Make(Platform) {
     commandSchema: AutoShipOrder$OrderingPlugin.commandSchema,
     maxRetries: AutoShipOrder$OrderingPlugin.maxRetries,
     heartbeatInterval: AutoShipOrder$OrderingPlugin.heartbeatInterval,
-    targetName: AutoShipOrder$OrderingPlugin.targetName
+    targetName: AutoShipOrder$OrderingPlugin.targetName,
+    schedule: undefined
   })({
     process: AutoShipOrder_Automation$OrderingPlugin.process,
     onExhausted: AutoShipOrder_Automation$OrderingPlugin.onExhausted,

package/lib/bs/tests/Order/Automation/AutoShipOrder_GWT.res.mjs

@@ -12,7 +12,8 @@ let include = Automation_GWT$ReventlessGwt.FromSlice({
   commandSchema: AutoShipOrder$OrderingPlugin.commandSchema,
   maxRetries: AutoShipOrder$OrderingPlugin.maxRetries,
   heartbeatInterval: AutoShipOrder$OrderingPlugin.heartbeatInterval,
-  targetName: AutoShipOrder$OrderingPlugin.targetName
+  targetName: AutoShipOrder$OrderingPlugin.targetName,
+  schedule: undefined
 })({
   process: AutoShipOrder_Automation$OrderingPlugin.process,
   onExhausted: AutoShipOrder_Automation$OrderingPlugin.onExhausted,
@@ -48,7 +49,7 @@ describe("AutoShipOrder AutomationSlice", () => {
   test("collect: OrderPlaced creates a pending TODO", () => thenTodos(whenCollect(givenEvent({
     TAG: "OrderPlaced",
     orderId: Ordering_Examples$OrderingPlugin.o1
-  }), undefined, undefined), [[
+  }), undefined, undefined, undefined), [[
       "o1",
       {
         orderId: Ordering_Examples$OrderingPlugin.o1
@@ -57,7 +58,7 @@ describe("AutoShipOrder AutomationSlice", () => {
   test("collect: OrderShipped is ignored (no TODO)", () => thenTodos(whenCollect(givenEvent({
     TAG: "OrderShipped",
     orderId: Ordering_Examples$OrderingPlugin.o1
-  }), undefined, undefined), []));
+  }), undefined, undefined, undefined), []));
   test("resolve: OrderShipped marks the TODO done", () => thenResolved(whenResolve(givenEvent({
     TAG: "OrderShipped",
     orderId: Ordering_Examples$OrderingPlugin.o1
@@ -68,7 +69,7 @@ describe("AutoShipOrder AutomationSlice", () => {
   })), undefined));
   test("process: pending TODO emits ShipOrder for the same id", () => thenCommand(whenProcess(givenTodo("o1", {
     orderId: Ordering_Examples$OrderingPlugin.o1
-  })), "o1", {
+  }), undefined), "o1", {
     TAG: "ShipOrder",
     orderId: Ordering_Examples$OrderingPlugin.o1
   }));
@@ -78,6 +79,8 @@ let Route = include.Route;
 
 let testContext = include.testContext;
 
+let withRecordedAt = include.withRecordedAt;
+
 let encTodos = include.encTodos;
 
 let encPair = include.encPair;
@@ -88,16 +91,32 @@ let thenNoCommand = include.thenNoCommand;
 
 let givenEvents = include.givenEvents;
 
+let atTime = include.atTime;
+
+let latestRecorded = include.latestRecorded;
+
+let routeEach = include.routeEach;
+
 let routeAll = include.routeAll;
 
+let foldSchedules = include.foldSchedules;
+
+let declaredRows = include.declaredRows;
+
 let sweep = include.sweep;
 
 let whenSweep = include.whenSweep;
 
+let tick = include.tick;
+
+let whenTick = include.whenTick;
+
 let thenCommands = include.thenCommands;
 
 let andThenEvents = include.andThenEvents;
 
+let thenSchedules = include.thenSchedules;
+
 let thenScenarioTodos = include.thenScenarioTodos;
 
 let event = include$1.event;
@@ -107,6 +126,7 @@ export {
   describe,
   test,
   testContext,
+  withRecordedAt,
   encTodos,
   encPair,
   thenTodos,
@@ -118,11 +138,19 @@ export {
   thenCommand,
   thenNoCommand,
   givenEvents,
+  atTime,
+  latestRecorded,
+  routeEach,
   routeAll,
+  foldSchedules,
+  declaredRows,
   sweep,
   whenSweep,
+  tick,
+  whenTick,
   thenCommands,
   andThenEvents,
+  thenSchedules,
   thenScenarioTodos,
   event,
   givenEvent,

package/lib/ocaml/.compiler.log

@@ -1,2 +1,2 @@
-#Start(1791984219078)
-#Done(1791984221743)
+#Start(1792143692768)
+#Done(1792143695947)