1 files changed, 26 insertions, 0 deletions
diff --git a/slips/src/app/Marina.Web.UI/LeaseSlip.aspx.cs b/slips/src/app/Marina.Web.UI/LeaseSlip.aspx.cs
new file mode 100644
index 0000000..c5ead9b
--- /dev/null
+++ b/slips/src/app/Marina.Web.UI/LeaseSlip.aspx.cs
@@ -0,0 +1,26 @@
+using System;
+using System.Web.UI;
+using Marina.Presentation.DTO;
+using Marina.Presentation.Presenters;
+using Marina.Presentation.Views;
+
+namespace Marina.Web.UI {
+	public partial class LeaseSlip : Page, ILeaseSlipView {
+		protected void Page_Load( object sender, EventArgs e ) {
+			ILeaseSlipPresenter presenter = new LeaseSlipPresenter( this );
+			presenter.Initialize( );
+			uxSubmitButton.Click += delegate { presenter.SubmitLeaseRequest( ); };
+		}
+
+		public SlipDisplayDTO Slip;
+		public string ResponseMessage;
+
+		public void Display( SlipDisplayDTO slip ) {
+			Slip = slip;
+		}
+
+		public void Display( DisplayResponseLineDTO response ) {
+			ResponseMessage = response.Message;
+		}
+	}
+}
+\ No newline at end of file