[infodrom/rico3] / examples / dotnet / ex2editfilter.aspx
1 <%@ Page Language="VB" ResponseEncoding="iso-8859-1" Debug="true" validateRequest="false" %>\r
2 <%@ Register TagPrefix="Rico" Assembly="Rico" NameSpace="Rico" %>\r
3 <%@ Register TagPrefix="My" TagName="dbLib" Src="dbConnect.ascx" %>\r
4 <My:dbLib id='app' runat='server' />\r
5 \r
6 \r
7 <script runat="server">\r
8 \r
9 Sub Page_Load(Sender As object, e As EventArgs)\r
10   Session.Timeout=60\r
11   dim arEmpSql as string() = {"LastName","', '","FirstName"}\r
12   dim oSqlCompat=new sqlCompatibilty(app.dbDialect)\r
13   EmployeeID.SelectSql="select EmployeeID," & oSqlCompat.Concat(arEmpSql,false) & " from employees order by LastName,FirstName" \r
14   app.OpenGridForm(ex8)\r
15 End Sub\r
16 \r
17 Protected Overrides Sub Render(writer as HTMLTextWriter)\r
18   select case ex8.action\r
19     case "table": MyBase.Render(writer)\r
20     case "ins":   ex8.InsertRecord(writer)\r
21     case "upd":   ex8.UpdateRecord(writer)\r
22     case "del":   ex8.DeleteRecord(writer)\r
23   end select\r
24 End Sub\r
25 \r
26 </script>\r
27 \r
28 <!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01//EN" "http://www.w3.org/TR/html4/strict.dtd">\r
29 <html>\r
30 <head>\r
31 <title>Rico LiveGrid-Example 2 (editable)</title>\r
32 \r
33 <Rico:LoadClient checkQueryString='true' runat='server' />\r
34 <link href="../demo.css" type="text/css" rel="stylesheet" />\r
35 \r
36 <style type="text/css">\r
37 div.ricoLG_cell {\r
38   white-space:nowrap;\r
39 }\r
40 </style>\r
41 </head>\r
42 \r
43 \r
44 <body>\r
45 \r
46 <div id='explanation'>\r
47 Base Library: <script type='text/javascript'>document.write(Rico.Lib+' '+Rico.LibVersion);</script>\r
48 <hr>The data on this grid can be edited using pop-up forms. \r
49 Just click on a grid cell and then select Edit, Delete, or Add from the pop-up menu. \r
50 The Add and Edit forms are automatically generated by LiveGrid. \r
51 Notice on the Add form how you use the Rico Tree control to select the customer. \r
52 Notice on the Edit form how the Rico Calendar is used to change dates. \r
53 Updates are disabled on the database, so you will get an error message if you try to save.\r
54 </div>\r
55 <p><strong>Orders Table</strong></p>\r
56 \r
57 \r
58 <Rico:LiveGridEdit runat='server' id='ex8' TableName='orders' DefaultSort='OrderID' FilterLocation='-1'>\r
59   <Rico:CalendarControl runat='server' id='Cal' icon='rico-icon rico-calarrow' />\r
60   <Rico:TreeControl runat='server' id='CustomerTree' icon='rico-icon rico-dotbutton' source='CustTree.aspx' />\r
61   <Rico:Panel runat='server' heading='Basic Info' />\r
62   <Rico:Column runat='server' heading='Order#'        width='60'  ColName='OrderID'      EntryType='B' ColData='<auto>' ConfirmDeleteColumn='true' />\r
63   <Rico:Column runat='server' heading='Customer'      width='160' ColName='CustomerID'   EntryType='CL' InsertOnly='true' SelectCtl='CustomerTree' SelectSql="select CustomerID,CompanyName from customers order by CompanyName" filterUI='t' />\r
64   <Rico:Column runat='server' heading='Sales Person'  width='140' ColName='EmployeeID'   EntryType='SL' filterUI='m' id='EmployeeID' />\r
65   <Rico:Column runat='server' heading='Order Date'    width='100' ColName='OrderDate'    EntryType='D' ColData='Today' SelectCtl='Cal' />\r
66   <Rico:Column runat='server' heading='Required Date' width='100' ColName='RequiredDate' EntryType='D' ColData='Today' SelectCtl='Cal' />\r
67   <Rico:Column runat='server' heading='Net Sale'      width='80'  format='DOLLAR'        Formula='select sum(UnitPrice*Quantity*(1.0-Discount)) from order_details d where d.OrderID=t.OrderID' />\r
68 \r
69   <Rico:Panel runat='server' heading='Ship To' />\r
70   <Rico:Column runat='server' heading='Name'        width='150' ColName='ShipName'       EntryType='B' />\r
71   <Rico:Column runat='server' heading='Address'     width='150' ColName='ShipAddress'    EntryType='B' />\r
72   <Rico:Column runat='server' heading='City'        width='120' ColName='ShipCity'       EntryType='B' filterUI='m' />\r
73   <Rico:Column runat='server' heading='Region'      width='80'  ColName='ShipRegion'     EntryType='T' />\r
74   <Rico:Column runat='server' heading='Postal Code' width='80'  ColName='ShipPostalCode' EntryType='T' />\r
75   <Rico:Column runat='server' heading='Country'     width='90'  ColName='ShipCountry'    EntryType='N' filterUI='s' control="new Rico.TableColumn.link('http://en.wikipedia.org/wiki/{11}','_blank')" />\r
76 </Rico:LiveGridEdit>\r
77 \r
78 </body>\r
79 </html>\r