home *** CD-ROM | disk | FTP | other *** search
/ 66.142.0.142 / 66.142.0.142.tar / 66.142.0.142 / tblEmployeesadd.aspx < prev    next >
Text File  |  2012-12-16  |  20KB  |  417 lines
  1. <%@ Page Language="VB" MasterPageFile="masterpage.master" ValidateRequest="false" AutoEventWireup="false" CodeFile="tblEmployeesadd.aspx.vb" Inherits="tblEmployeesadd" CodeFileBaseClass="AspNetMaker7_tfpssnet" %>
  2. <asp:Content ID="Content" ContentPlaceHolderID="Content" runat="server">
  3. <script type="text/javascript">
  4. <!--
  5. // Create page object
  6. var tblEmployees_add = new ew_Page("tblEmployees_add");
  7. // page properties
  8. tblEmployees_add.PageID = "add"; // page ID
  9. var EW_PAGE_ID = tblEmployees_add.PageID; // for backward compatibility
  10. // extend page with ValidateForm function
  11. tblEmployees_add.ValidateForm = function(fobj) {
  12.     if (!this.ValidateRequired)
  13.         return true; // ignore validation
  14.     if (fobj.a_confirm && fobj.a_confirm.value == "F")
  15.         return true;
  16.     var i, elm, aelm, infix;
  17.     var rowcnt = (fobj.key_count) ? Number(fobj.key_count.value) : 1;
  18.     for (i=0; i<rowcnt; i++) {
  19.         infix = (fobj.key_count) ? String(i+1) : "";
  20.         elm = fobj.elements["x" + infix + "_empPayrollNumber"];
  21.         if (elm && !ew_CheckInteger(elm.value))
  22.             return ew_OnError(this, elm, "Incorrect integer - Payroll Number");
  23.         elm = fobj.elements["x" + infix + "_empPayrollNumber"];
  24.         if (elm && !ew_HasValue(elm))
  25.             return ew_OnError(this, elm, "Please enter required field - Payroll Number");
  26.         elm = fobj.elements["x" + infix + "_empUsername"];
  27.         if (elm && !ew_HasValue(elm))
  28.             return ew_OnError(this, elm, "Please enter required field - Username");
  29.         elm = fobj.elements["x" + infix + "_empName"];
  30.         if (elm && !ew_HasValue(elm))
  31.             return ew_OnError(this, elm, "Please enter required field - Full Name");
  32.         elm = fobj.elements["x" + infix + "_empFirstName"];
  33.         if (elm && !ew_HasValue(elm))
  34.             return ew_OnError(this, elm, "Please enter required field - First Name");
  35.         elm = fobj.elements["x" + infix + "_empLastName"];
  36.         if (elm && !ew_HasValue(elm))
  37.             return ew_OnError(this, elm, "Please enter required field - Last Name");
  38.         elm = fobj.elements["x" + infix + "_empZIP"];
  39.         if (elm && !ew_CheckZip(elm.value))
  40.             return ew_OnError(this, elm, "Incorrect ZIP code - ZIP");
  41.         elm = fobj.elements["x" + infix + "_empPhone"];
  42.         if (elm && !ew_CheckPhone(elm.value))
  43.             return ew_OnError(this, elm, "Incorrect phone number - Phone Number (xxx-xxx-xxxx)");
  44.         elm = fobj.elements["x" + infix + "_empStatusID"];
  45.         if (elm && !ew_HasValue(elm))
  46.             return ew_OnError(this, elm, "Please enter required field - Status");
  47.         elm = fobj.elements["x" + infix + "_empStartDate"];
  48.         if (elm && !ew_CheckUSDate(elm.value))
  49.             return ew_OnError(this, elm, "Incorrect date, format = mm/dd/yyyy - Start Date");
  50.         elm = fobj.elements["x" + infix + "_empPositionID"];
  51.         if (elm && !ew_HasValue(elm))
  52.             return ew_OnError(this, elm, "Please enter required field - Position");
  53.         elm = fobj.elements["x" + infix + "_empRate"];
  54.         if (elm && !ew_CheckNumber(elm.value))
  55.             return ew_OnError(this, elm, "Incorrect floating point number - Rate");
  56.         elm = fobj.elements["x" + infix + "_empLastRaiseDate"];
  57.         if (elm && !ew_CheckUSDate(elm.value))
  58.             return ew_OnError(this, elm, "Incorrect date, format = mm/dd/yyyy - Last Raise Date");
  59.         elm = fobj.elements["x" + infix + "_empLastRaiseAmount"];
  60.         if (elm && !ew_CheckNumber(elm.value))
  61.             return ew_OnError(this, elm, "Incorrect floating point number - Last Raise Amount");
  62.         elm = fobj.elements["x" + infix + "_empEmail"];
  63.         if (elm && !ew_CheckEmail(elm.value))
  64.             return ew_OnError(this, elm, "Incorrect email - Email");
  65.         elm = fobj.elements["x" + infix + "_empUserPass"];
  66.         if (elm && !ew_HasValue(elm))
  67.             return ew_OnError(this, elm, "Please enter required field - Password");
  68.         elm = fobj.elements["x" + infix + "_empUserLevel"];
  69.         if (elm && !ew_HasValue(elm))
  70.             return ew_OnError(this, elm, "Please enter required field - User Level");
  71.     }
  72.     return true;
  73. }
  74. <% If EW_CLIENT_VALIDATE Then %>
  75. tblEmployees_add.ValidateRequired = true; // uses JavaScript validation
  76. <% Else %>
  77. tblEmployees_add.ValidateRequired = false; // no JavaScript validation
  78. <% End If %>
  79. //-->
  80. </script>
  81. <link rel="stylesheet" type="text/css" media="all" href="calendar/calendar-win2k-1.css" title="win2k-1" />
  82. <script type="text/javascript" src="calendar/calendar.js"></script>
  83. <script type="text/javascript" src="calendar/lang/calendar-en.js"></script>
  84. <script type="text/javascript" src="calendar/calendar-setup.js"></script>
  85. <script language="JavaScript" type="text/javascript">
  86. <!--
  87. // Write your client script here, no need to add script tags.
  88. // To include another .js script, use:
  89. // ew_ClientScriptInclude("my_javascript.js"); 
  90. //-->
  91. </script>
  92. <p><span class="aspnetmaker">Add to TABLE: Employees<br /><br />
  93. <a href="<%= tblEmployees.ReturnUrl %>">Go Back</a></span></p>
  94. <% tblEmployees_add.ShowMessage() %>
  95. <form name="ftblEmployeesadd" id="ftblEmployeesadd" method="post" onsubmit="this.action=location.pathname;return tblEmployees_add.ValidateForm(this);">
  96. <p />
  97. <input type="hidden" name="t" id="t" value="tblEmployees" />
  98. <input type="hidden" name="a_add" id="a_add" value="A" />
  99. <table cellspacing="0" class="ewGrid"><tr><td class="ewGridContent">
  100. <div class="ewGridMiddlePanel">
  101. <table cellspacing="0" class="ewTable">
  102. <%  tblEmployees.empID.Visible = False%>
  103. <% If tblEmployees.empID.Visible Then ' empID %>
  104.     <tr<%= tblEmployees.empID.RowAttributes %>>
  105.         <td class="ewTableHeader">ID</td>
  106.         <td<%= tblEmployees.empID.CellAttributes %>><span id="el_empID">
  107. <% If Not Security.IsAdmin And Security.IsLoggedIn() Then ' Non system admin %>
  108. <div<%= tblEmployees.empID.ViewAttributes %>><%= tblEmployees.empID.EditValue %></div>
  109. <input type="hidden" name="x_empID" id="x_empID" value="<%= ew_HTMLEncode(tblEmployees.empID.CurrentValue) %>" />
  110. <% Else %>
  111. <input type="text" name="x_empID" id="x_empID" size="30" value="<%= tblEmployees.empID.EditValue %>"<%= tblEmployees.empID.EditAttributes %> />
  112. <% End If %>
  113. </span><%= tblEmployees.empID.CustomMsg %></td>
  114.     </tr>
  115. <% End If %>
  116. <%  If tblEmployees.empPayrollNumber.Visible Then ' empPayrollNumber %>
  117.     <tr<%= tblEmployees.empPayrollNumber.RowAttributes %>>
  118.         <td class="ewTableHeader">Payroll Number<span class="ewRequired"> *</span></td>
  119.         <td<%= tblEmployees.empPayrollNumber.CellAttributes %>><span id="el_empPayrollNumber">
  120. <input type="text" name="x_empPayrollNumber" id="x_empPayrollNumber" size="30" maxlength="255" value="<%= tblEmployees.empPayrollNumber.EditValue %>"<%= tblEmployees.empPayrollNumber.EditAttributes %> />
  121. </span><%=tblEmployees.empPayrollNumber.CustomMsg%></td>
  122.     </tr>
  123. <% End If %>
  124. <% If tblEmployees.empUsername.Visible Then ' empUsername %>
  125.     <tr<%= tblEmployees.empUsername.RowAttributes %>>
  126.         <td class="ewTableHeader">Username<span class="ewRequired"> *</span></td>
  127.         <td<%= tblEmployees.empUsername.CellAttributes %>><span id="el_empUsername">
  128. <input type="text" name="x_empUsername" id="x_empUsername" size="30" maxlength="255" value="<%= tblEmployees.empUsername.EditValue %>"<%= tblEmployees.empUsername.EditAttributes %> />
  129. </span><%= tblEmployees.empUsername.CustomMsg %></td>
  130.     </tr>
  131. <% End If %>
  132. <% If tblEmployees.empName.Visible Then ' empName %>
  133.     <tr<%= tblEmployees.empName.RowAttributes %>>
  134.         <td class="ewTableHeader">Full Name<span class="ewRequired"> *</span></td>
  135.         <td<%= tblEmployees.empName.CellAttributes %>><span id="el_empName">
  136. <input type="text" name="x_empName" id="x_empName" size="30" maxlength="255" value="<%= tblEmployees.empName.EditValue %>"<%= tblEmployees.empName.EditAttributes %> />
  137. </span><%= tblEmployees.empName.CustomMsg %></td>
  138.     </tr>
  139. <% End If %>
  140. <%  If tblEmployees.empFirstName.Visible Then ' empFirstName %>
  141.     <tr<%= tblEmployees.empFirstName.RowAttributes %>>
  142.         <td class="ewTableHeader">First Name<span class="ewRequired"> *</span></td>
  143.         <td<%= tblEmployees.empFirstName.CellAttributes %>><span id="el_empFirstName">
  144. <input type="text" name="x_empFirstName" id="x_empFirstName" size="30" maxlength="255" value="<%= tblEmployees.empFirstName.EditValue %>"<%= tblEmployees.empFirstName.EditAttributes %> />
  145. </span><%=tblEmployees.empFirstName.CustomMsg%></td>
  146.     </tr>
  147. <% End If %>
  148. <% If tblEmployees.empLastName.Visible Then ' empLastName %>
  149.     <tr<%= tblEmployees.empLastName.RowAttributes %>>
  150.         <td class="ewTableHeader">Last Name<span class="ewRequired"> *</span></td>
  151.         <td<%= tblEmployees.empLastName.CellAttributes %>><span id="el_empLastName">
  152. <input type="text" name="x_empLastName" id="x_empLastName" size="30" maxlength="255" value="<%= tblEmployees.empLastName.EditValue %>"<%= tblEmployees.empLastName.EditAttributes %> />
  153. </span><%= tblEmployees.empLastName.CustomMsg %></td>
  154.     </tr>
  155. <% End If %>
  156. <% If tblEmployees.empAddress.Visible Then ' empAddress %>
  157.     <tr<%= tblEmployees.empAddress.RowAttributes %>>
  158.         <td class="ewTableHeader">Address</td>
  159.         <td<%= tblEmployees.empAddress.CellAttributes %>><span id="el_empAddress">
  160. <input type="text" name="x_empAddress" id="x_empAddress" size="30" maxlength="255" value="<%= tblEmployees.empAddress.EditValue %>"<%= tblEmployees.empAddress.EditAttributes %> />
  161. </span><%= tblEmployees.empAddress.CustomMsg %></td>
  162.     </tr>
  163. <% End If %>
  164. <% If tblEmployees.empCity.Visible Then ' empCity %>
  165.     <tr<%= tblEmployees.empCity.RowAttributes %>>
  166.         <td class="ewTableHeader">City</td>
  167.         <td<%= tblEmployees.empCity.CellAttributes %>><span id="el_empCity">
  168. <input type="text" name="x_empCity" id="x_empCity" size="30" maxlength="255" value="<%= tblEmployees.empCity.EditValue %>"<%= tblEmployees.empCity.EditAttributes %> />
  169. </span><%= tblEmployees.empCity.CustomMsg %></td>
  170.     </tr>
  171. <% End If %>
  172. <% If tblEmployees.empState.Visible Then ' empState %>
  173.     <tr<%= tblEmployees.empState.RowAttributes %>>
  174.         <td class="ewTableHeader">State</td>
  175.         <td<%= tblEmployees.empState.CellAttributes %>><span id="el_empState">
  176. <input type="text" name="x_empState" id="x_empState" size="30" maxlength="255" value="<%= tblEmployees.empState.EditValue %>"<%= tblEmployees.empState.EditAttributes %> />
  177. </span><%= tblEmployees.empState.CustomMsg %></td>
  178.     </tr>
  179. <% End If %>
  180. <% If tblEmployees.empZIP.Visible Then ' empZIP %>
  181.     <tr<%= tblEmployees.empZIP.RowAttributes %>>
  182.         <td class="ewTableHeader">ZIP</td>
  183.         <td<%= tblEmployees.empZIP.CellAttributes %>><span id="el_empZIP">
  184. <input type="text" name="x_empZIP" id="x_empZIP" size="30" maxlength="255" value="<%= tblEmployees.empZIP.EditValue %>"<%= tblEmployees.empZIP.EditAttributes %> />
  185. </span><%= tblEmployees.empZIP.CustomMsg %></td>
  186.     </tr>
  187. <% End If %>
  188. <% If tblEmployees.empPhone.Visible Then ' empPhone %>
  189.     <tr<%= tblEmployees.empPhone.RowAttributes %>>
  190.         <td class="ewTableHeader">Phone Number (xxx-xxx-xxxx)</td>
  191.         <td<%= tblEmployees.empPhone.CellAttributes %>><span id="el_empPhone">
  192. <input type="text" name="x_empPhone" id="x_empPhone" size="30" maxlength="50" value="<%= tblEmployees.empPhone.EditValue %>"<%= tblEmployees.empPhone.EditAttributes %> />
  193. </span><%= tblEmployees.empPhone.CustomMsg %></td>
  194.     </tr>
  195. <% End If %>
  196. <% If tblEmployees.empStatusID.Visible Then ' empStatusID %>
  197.     <tr<%= tblEmployees.empStatusID.RowAttributes %>>
  198.         <td class="ewTableHeader">Status<span class="ewRequired"> *</span></td>
  199.         <td<%= tblEmployees.empStatusID.CellAttributes %>><span id="el_empStatusID">
  200. <select id="x_empStatusID" name="x_empStatusID"<%= tblEmployees.empStatusID.EditAttributes %>>
  201. <%
  202. emptywrk = True
  203. If ew_IsArrayList(tblEmployees.empStatusID.EditValue) Then
  204.     arwrk = tblEmployees.empStatusID.EditValue
  205.     For rowcntwrk As Integer = 0 To arwrk.Count - 1
  206.         If ew_SameStr(arwrk(rowcntwrk)(0), tblEmployees.empStatusID.CurrentValue) Then
  207.             selwrk = " selected=""selected"""
  208.             emptywrk = False
  209.         Else
  210.             selwrk = ""
  211.         End If
  212. %>
  213. <option value="<%= ew_HtmlEncode(arwrk(rowcntwrk)(0)) %>"<%= selwrk %>>
  214. <%= arwrk(rowcntwrk)(1) %>
  215. </option>
  216. <%
  217.     Next
  218. End If
  219. %>
  220. </select>
  221. </span><%= tblEmployees.empStatusID.CustomMsg %></td>
  222.     </tr>
  223. <% End If %>
  224. <% If tblEmployees.empStartDate.Visible Then ' empStartDate %>
  225.     <tr<%= tblEmployees.empStartDate.RowAttributes %>>
  226.         <td class="ewTableHeader">Start Date</td>
  227.         <td<%= tblEmployees.empStartDate.CellAttributes %>><span id="el_empStartDate">
  228. <input type="text" name="x_empStartDate" id="x_empStartDate" value="<%= tblEmployees.empStartDate.EditValue %>"<%= tblEmployees.empStartDate.EditAttributes %> />
  229.  <img src="images/calendar.png" id="cal_x_empStartDate" name="cal_x_empStartDate" alt="Pick a date" style="cursor:pointer;cursor:hand;" />
  230. <script type="text/javascript">
  231. Calendar.setup({
  232.     inputField : "x_empStartDate", // ID of the input field
  233.     ifFormat : "%m/%d/%Y", // the date format
  234.     button : "cal_x_empStartDate" // ID of the button
  235. });
  236. </script>
  237. </span><%= tblEmployees.empStartDate.CustomMsg %></td>
  238.     </tr>
  239. <% End If %>
  240. <% If tblEmployees.empPositionID.Visible Then ' empPositionID %>
  241.     <tr<%= tblEmployees.empPositionID.RowAttributes %>>
  242.         <td class="ewTableHeader">Position<span class="ewRequired"> *</span></td>
  243.         <td<%= tblEmployees.empPositionID.CellAttributes %>><span id="el_empPositionID">
  244. <select id="x_empPositionID" name="x_empPositionID"<%= tblEmployees.empPositionID.EditAttributes %>>
  245. <%
  246. emptywrk = True
  247. If ew_IsArrayList(tblEmployees.empPositionID.EditValue) Then
  248.     arwrk = tblEmployees.empPositionID.EditValue
  249.     For rowcntwrk As Integer = 0 To arwrk.Count - 1
  250.         If ew_SameStr(arwrk(rowcntwrk)(0), tblEmployees.empPositionID.CurrentValue) Then
  251.             selwrk = " selected=""selected"""
  252.             emptywrk = False
  253.         Else
  254.             selwrk = ""
  255.         End If
  256. %>
  257. <option value="<%= ew_HtmlEncode(arwrk(rowcntwrk)(0)) %>"<%= selwrk %>>
  258. <%= arwrk(rowcntwrk)(1) %>
  259. </option>
  260. <%
  261.     Next
  262. End If
  263. %>
  264. </select>
  265. </span><%= tblEmployees.empPositionID.CustomMsg %></td>
  266.     </tr>
  267. <% End If %>
  268. <% If tblEmployees.empRate.Visible And (Session("tfpssnet_Status_UserName") = "kirkm" Or Session("tfpssnet_Status_UserName") = "admin") Then ' empRate %>
  269.     <tr<%= tblEmployees.empRate.RowAttributes %>>
  270.         <td class="ewTableHeader">Rate</td>
  271.         <td<%= tblEmployees.empRate.CellAttributes %>><span id="el_empRate">
  272. <input type="text" name="x_empRate" id="x_empRate" size="30" value="<%= tblEmployees.empRate.EditValue %>"<%= tblEmployees.empRate.EditAttributes %> />
  273. </span><%= tblEmployees.empRate.CustomMsg %></td>
  274.     </tr>
  275. <% End If %>
  276. <% If tblEmployees.empLastRaiseDate.Visible Then ' empLastRaiseDate %>
  277.     <tr<%= tblEmployees.empLastRaiseDate.RowAttributes %>>
  278.         <td class="ewTableHeader">Last Raise Date</td>
  279.         <td<%= tblEmployees.empLastRaiseDate.CellAttributes %>><span id="el_empLastRaiseDate">
  280. <input type="text" name="x_empLastRaiseDate" id="x_empLastRaiseDate" value="<%= tblEmployees.empLastRaiseDate.EditValue %>"<%= tblEmployees.empLastRaiseDate.EditAttributes %> />
  281. </span><%= tblEmployees.empLastRaiseDate.CustomMsg %></td>
  282.     </tr>
  283. <% End If %>
  284. <% If tblEmployees.empLastRaiseAmount.Visible Then ' empLastRaiseAmount %>
  285.     <tr<%= tblEmployees.empLastRaiseAmount.RowAttributes %>>
  286.         <td class="ewTableHeader">Last Raise Amount</td>
  287.         <td<%= tblEmployees.empLastRaiseAmount.CellAttributes %>><span id="el_empLastRaiseAmount">
  288. <input type="text" name="x_empLastRaiseAmount" id="x_empLastRaiseAmount" size="30" value="<%= tblEmployees.empLastRaiseAmount.EditValue %>"<%= tblEmployees.empLastRaiseAmount.EditAttributes %> />
  289. </span><%= tblEmployees.empLastRaiseAmount.CustomMsg %></td>
  290.     </tr>
  291. <% End If %>
  292. <% If tblEmployees.empEmail.Visible Then ' empEmail %>
  293.     <tr<%= tblEmployees.empEmail.RowAttributes %>>
  294.         <td class="ewTableHeader">Email</td>
  295.         <td<%= tblEmployees.empEmail.CellAttributes %>><span id="el_empEmail">
  296. <input type="text" name="x_empEmail" id="x_empEmail" size="30" maxlength="50" value="<%= tblEmployees.empEmail.EditValue %>"<%= tblEmployees.empEmail.EditAttributes %> />
  297. </span><%= tblEmployees.empEmail.CustomMsg %></td>
  298.     </tr>
  299. <% End If %>
  300. <% If tblEmployees.empLiftCert.Visible Then ' empLiftCert %>
  301.     <tr<%= tblEmployees.empLiftCert.RowAttributes %>>
  302.         <td class="ewTableHeader">Lift Cert</td>
  303.         <td<%= tblEmployees.empLiftCert.CellAttributes %>><span id="el_empLiftCert">
  304. <%
  305. If ew_SameStr(tblEmployees.empLiftCert.CurrentValue, "1") Then
  306.     selwrk = " checked=""checked"""
  307. Else
  308.     selwrk = ""
  309. End If
  310. %>
  311. <input type="checkbox" name="x_empLiftCert" id="x_empLiftCert" value="1"<%= selwrk %><%= tblEmployees.empLiftCert.EditAttributes %> />
  312. </span><%= tblEmployees.empLiftCert.CustomMsg %></td>
  313.     </tr>
  314. <% End If %>
  315. <% If tblEmployees.empForkCert.Visible Then ' empForkCert %>
  316.     <tr<%= tblEmployees.empForkCert.RowAttributes %>>
  317.         <td class="ewTableHeader">Fork Cert</td>
  318.         <td<%= tblEmployees.empForkCert.CellAttributes %>><span id="el_empForkCert">
  319. <%
  320. If ew_SameStr(tblEmployees.empForkCert.CurrentValue, "1") Then
  321.     selwrk = " checked=""checked"""
  322. Else
  323.     selwrk = ""
  324. End If
  325. %>
  326. <input type="checkbox" name="x_empForkCert" id="x_empForkCert" value="1"<%= selwrk %><%= tblEmployees.empForkCert.EditAttributes %> />
  327. </span><%= tblEmployees.empForkCert.CustomMsg %></td>
  328.     </tr>
  329. <% End If %>
  330. <% If tblEmployees.empDriveAuth.Visible Then ' empDriveAuth %>
  331.     <tr<%= tblEmployees.empDriveAuth.RowAttributes %>>
  332.         <td class="ewTableHeader">Drive Auth</td>
  333.         <td<%= tblEmployees.empDriveAuth.CellAttributes %>><span id="el_empDriveAuth">
  334. <%
  335. If ew_SameStr(tblEmployees.empDriveAuth.CurrentValue, "1") Then
  336.     selwrk = " checked=""checked"""
  337. Else
  338.     selwrk = ""
  339. End If
  340. %>
  341. <input type="checkbox" name="x_empDriveAuth" id="x_empDriveAuth" value="1"<%= selwrk %><%= tblEmployees.empDriveAuth.EditAttributes %> />
  342. </span><%= tblEmployees.empDriveAuth.CustomMsg %></td>
  343.     </tr>
  344. <% End If %>
  345.  
  346. <%  If tblEmployees.empTimeClock.Visible Then ' empTimeClock %>
  347.     <tr<%= tblEmployees.empTimeClock.RowAttributes %>>
  348.         <td class="ewTableHeader">Export TimeClock</td>
  349.         <td<%= tblEmployees.empTimeClock.CellAttributes %>><span id="Span1">
  350. <%
  351.     If ew_SameStr(tblEmployees.empTimeClock.CurrentValue, "1") Then
  352.         selwrk = " checked=""checked"""
  353.     Else
  354.         selwrk = ""
  355.     End If
  356. %>
  357. <input type="checkbox" name="x_empTimeClock" id="x_empTimeClock" value="1"<%= selwrk %><%= tblEmployees.empTimeClock.EditAttributes %> />
  358. </span><%= tblEmployees.empTimeClock.CustomMsg%></td>
  359.     </tr>
  360. <% End If %>
  361.  
  362. <% If tblEmployees.empUserPass.Visible Then ' empUserPass %>
  363.     <tr<%= tblEmployees.empUserPass.RowAttributes %>>
  364.         <td class="ewTableHeader">Password<span class="ewRequired"> *</span></td>
  365.         <td<%= tblEmployees.empUserPass.CellAttributes %>><span id="el_empUserPass">
  366. <input type="password" name="x_empUserPass" id="x_empUserPass" size="30" maxlength="255"<%= tblEmployees.empUserPass.EditAttributes %> />
  367. </span><%= tblEmployees.empUserPass.CustomMsg %></td>
  368.     </tr>
  369. <% End If %>
  370. <% If tblEmployees.empUserLevel.Visible Then ' empUserLevel %>
  371.     <tr<%= tblEmployees.empUserLevel.RowAttributes %>>
  372.         <td class="ewTableHeader">User Level<span class="ewRequired"> *</span></td>
  373.         <td<%= tblEmployees.empUserLevel.CellAttributes %>><span id="el_empUserLevel">
  374. <% If Not Security.IsAdmin And Security.IsLoggedIn() Then ' Non system admin %>
  375. <div<%= tblEmployees.empUserLevel.ViewAttributes %>><%= tblEmployees.empUserLevel.EditValue %></div>
  376. <% Else %>
  377. <select id="x_empUserLevel" name="x_empUserLevel"<%= tblEmployees.empUserLevel.EditAttributes %>>
  378. <%
  379. emptywrk = True
  380. If ew_IsArrayList(tblEmployees.empUserLevel.EditValue) Then
  381.     arwrk = tblEmployees.empUserLevel.EditValue
  382.     For rowcntwrk As Integer = 0 To arwrk.Count - 1
  383.         If ew_SameStr(arwrk(rowcntwrk)(0), tblEmployees.empUserLevel.CurrentValue) Then
  384.             selwrk = " selected=""selected"""
  385.             emptywrk = False
  386.         Else
  387.             selwrk = ""
  388.         End If
  389. %>
  390. <option value="<%= ew_HtmlEncode(arwrk(rowcntwrk)(0)) %>"<%= selwrk %>>
  391. <%= arwrk(rowcntwrk)(1) %>
  392. </option>
  393. <%
  394.     Next
  395. End If
  396. %>
  397. </select>
  398. <% End If %>
  399. </span><%= tblEmployees.empUserLevel.CustomMsg %></td>
  400.     </tr>
  401. <% End If %>
  402. </table>
  403. </div>
  404. </td></tr></table>
  405. <p />
  406. <input type="submit" name="btnAction" id="btnAction" value="    Add    " />
  407. </form>
  408. <script language="JavaScript" type="text/javascript">
  409. <!--
  410. // Write your table-specific startup script here
  411. // document.write("page loaded");
  412. //-->
  413.     document.all('x_empPayrollNumber').focus();
  414. </script
  415. </script>
  416. </asp:Content>
  417.