booking.fs

open System

type GuestBookedAppointment = { 
  AppointmentId : Guid; 
  GuestId : Guid;
  AppointmentDateAndTime : DateTime; 
  FeelGoodPackageId : Guid; 
  SubsidiaryId : Guid 
}
type GuestRescheduledAppointment = { 
  AppointmentId : Guid; 
  GuestId : Guid; 
  AppointmentDateAndTime : DateTime; 
  FeelGoodPackageId : Guid; 
  SubsidiaryId : Guid 
}
type GuestSwappedAppointmentFeelGoodPackage = { 
  AppointmentId : Guid; 
  GuestId : Guid; 
  FeelGoodPackageId : Guid; 
  SubsidiaryId : Guid 
}
type GuestCancelledAppointment = { 
  AppointmentId : Guid;
  GuestId : Guid;
  Reason : string; 
  SubsidiaryId : Guid 
}
type SubsidiaryCancelledAppointment = { 
  AppointmentId : Guid;
  GuestId : Guid;
  Reason : string; 
  SubsidiaryId : Guid 
}

guests.fs

open System

type GuestRegistered = { 
  GuestId : Guid;
  FullName : string;
  DateOfRegistration: DateTime;
}

online-environment.md

Postgres

• IP Address: 95.85.5.87
• Username: postgres
• Password: postgres

Redis

• IP Address: 95.85.5.87
• Port: 6379

Elastic Search

• IP Address: 95.85.5.87
• Port: 9200

Event Store

• IP Address: 95.85.5.87
• TcpPort: 1113
• HttpPort: 2113
• User: socratesbe
• Password: s0cr@t3s

You Can't Touch This

Event Store Administration

http://95.85.5.87:2113/

• User: admin
• Password: w0rksh0p

shopping.fs

open System

type GuestStartedShopping = { 
  SubsidiaryId : Guid;
  FeelGoodCartId : Guid; 
  GuestId : Guid;
  StartDateAndTime : DateTime;
}
type ItemWasAddedToCart = { 
  FeelGoodCartId : Guid; 
  ItemId : Guid;
}
type ItemWasRemovedFromCart = { 
  FeelGoodCartId : Guid; 
  ItemId : Guid;
}
type GuestCheckedOutCart = { 
  FeelGoodPackageId : Guid;
  FeelGoodCartId : Guid; 
  GuestId : Guid;
  Items : Guid array
}
type GuestAbandonedCart = { 
  FeelGoodCartId : Guid; 
  GuestId : Guid;
  LastSeenDateAndTime : DateTime;
}