diff --git a/Samples/Cleipnir.Flows.Sample.Presentation/C_LoanApplication/LoanApplicationFlow.cs b/Samples/Cleipnir.Flows.Sample.Presentation/C_LoanApplication/LoanApplicationFlow.cs
index edda3e6..38a7a98 100644
--- a/Samples/Cleipnir.Flows.Sample.Presentation/C_LoanApplication/LoanApplicationFlow.cs
+++ b/Samples/Cleipnir.Flows.Sample.Presentation/C_LoanApplication/LoanApplicationFlow.cs
@@ -14,5 +14,11 @@ public override async Task Run(LoanApplication loanApplication)
             .OfType<CreditCheckOutcome>()
             .Take(3)
             .Completion();
+
+        CommandAndEvents decision = DateTime.Now.Ticks % 2 == 0
+            ? new LoanApplicationApproved(loanApplication)
+            : new LoanApplicationRejected(loanApplication);
+
+        await MessageBroker.Send(decision);
     }
 }
\ No newline at end of file