Hello

Hello,

I'm using Sir Rufo's TStateless framework https://github.com/SirRufo/stateless

I want to adapt my flow (see picture) like this :

Implementation

type
TWarehouseCheckInState = (New, OrderChecked, ProductChecked, CartonAdded,
Validated, Canceled);
TWarehouseCheckInTrigger = (SetOrder, SetProduct, AddCarton, Validate, Cancel);
TWarehouseCheckInStateMachine = TStateMachine TWarehouseCheckInTrigger>;

FState.Configure(TWarehouseCheckInState.New).OnEntry(
procedure
begin
FOrder := '';
FProduct := '';
FScannedBarCode := '';
end
) .Permitif(TWarehouseCheckInTrigger.SetOrder,
TWarehouseCheckInState.OrderChecked,IsOrderValid);

FState.Configure(TWarehouseCheckInState.OrderChecked).OnExit(
procedure
begin
GetCommandeFournisseur;
end).Permitif(TWarehouseCheckInTrigger.SetProduct,
TWarehouseCheckInState.ProductChecked,IsProductValid );

FState.Configure(TWarehouseCheckInState.ProductChecked)
.PermitReentryif( TWarehouseCheckInTrigger.AddCarton,IsNeverAdded );

FState.Configure(TWarehouseCheckInState.CartonAdded).OnEntry(
procedure
begin
if ProductNotAdded(FScannedBarCode ) then
AddProduct(TProduct.Create(FScannedBarCode ));
end) ;

Test code

WarehouseCheckIn := TWarehouseCheckIn.Create;
WarehouseCheckIn.State.OnTransitioned(WarehouseCheckInTransitioned);


WarehouseCheckIn.Order := '49469';
WarehouseCheckIn.State.Fire(TWarehouseCheckInTrigger.SetOrder);
WarehouseCheckIn.Product := 'F0055';
WarehouseCheckIn.State.Fire(TWarehouseCheckInTrigger.SetProduct);

if (WarehouseCheckIn.State.State = TWarehouseCheckInState.ProductChecked) then
begin

WarehouseCheckIn.ScanedBarCode := '1';
WarehouseCheckIn.State.Fire(TWarehouseCheckInTrigger.AddCarton);
WarehouseCheckIn.Scan := '2';
WarehouseCheckIn.State.Fire(TWarehouseCheckInTrigger.AddCarton);
WarehouseCheckIn.Scan := '3';
WarehouseCheckIn.State.Fire(TWarehouseCheckInTrigger.AddCarton);
WarehouseCheckIn.Scan := '1';
WarehouseCheckIn.State.Fire(TWarehouseCheckInTrigger.AddCarton);
end;

issues i'm getting

I don't know why but onEntry event is never fired on my different states.
How should I configure my State so that I cannot add already added carton nor add cartons when there is no needs to add cartons (all products have been added) ?

Thank you