m001a0102.asp | searchcode

/AC/m001a0102.asp

http://github.com/boss2009/ASP-site
ASP | 186 lines | 180 code | 6 blank | 0 comment | 14 complexity | 89f5bc9e02ceab64639daffc07adcdbc MD5 | raw file

<%@language="JAVASCRIPT"%>
<!--#include file="../inc/ASPUtility.inc" -->
<!--#include file="../Connections/cnnASP02.asp" -->
<!--#include file="../inc/ASPCheckLogin.inc" -->
<%
var MM_editAction = Request.ServerVariables("URL");
if (Request.QueryString) {
  MM_editAction += "?" + Request.QueryString;
}

if (String(Request("MM_insert")) == "true") {
	var JobDescription = String(Request.Form("JobDescription"))
	var rsEmployment = Server.CreateObject("ADODB.Recordset");
	rsEmployment.ActiveConnection = MM_cnnASP02_STRING;
	rsEmployment.Source = "{call dbo.cp_EmplyInfo2(0,"+ Request.Form("intAdult_id") + ",0,0,"+Request.Form("CompanyName")+",0,'"+Request.Form("EmploymentType")+"','"+Request.Form("EmploymentDuration")+"','"+Request.Form("StartDate")+"','"+Request.Form("EndDate")+"','"+JobDescription.replace(/'/g, "''")+"',0,'A',0)}";
	rsEmployment.CursorType = 0;
	rsEmployment.CursorLocation = 2;
	rsEmployment.LockType = 3;
//	Response.Redirect(rsEmployment.Source);
	rsEmployment.Open();
	Response.Redirect("InsertSuccessful.html");
}

var rsClient = Server.CreateObject("ADODB.Recordset");
rsClient.ActiveConnection = MM_cnnASP02_STRING;
rsClient.Source = "{call dbo.cp_Idv_Adult_Client("+Request.QueryString("intAdult_id")+")}";
rsClient.CursorType = 0;
rsClient.CursorLocation = 2;
rsClient.LockType = 3;
rsClient.Open();

var rsWorkType = Server.CreateObject("ADODB.Recordset");
rsWorkType.ActiveConnection = MM_cnnASP02_STRING;
rsWorkType.Source = "{call dbo.cp_work_type(0,'',1,0,'Q',0)}";
rsWorkType.CursorType = 0;
rsWorkType.CursorLocation = 2;
rsWorkType.LockType = 3;
rsWorkType.Open();

var rsEmploymentType = Server.CreateObject("ADODB.Recordset");
rsEmploymentType.ActiveConnection = MM_cnnASP02_STRING;
rsEmploymentType.Source = "{call dbo.cp_employ_type(0,'','',0,'Q',0)}"
rsEmploymentType.CursorType = 0;
rsEmploymentType.CursorLocation = 2;
rsEmploymentType.LockType = 3;
rsEmploymentType.Open();

var WorkType = ((String(Request.Form("WorkType"))=="undefined")?13:Request.Form("WorkType"));

var rsCompany = Server.CreateObject("ADODB.Recordset");
rsCompany.ActiveConnection = MM_cnnASP02_STRING;
rsCompany.Source = "{call dbo.cp_get_company_work_type("+WorkType+",0)}";
rsCompany.CursorType = 0;
rsCompany.CursorLocation = 2;
rsCompany.LockType = 3;
rsCompany.Open();
%>
<html>
<head>
	<title>New Employment Record for <%=(rsClient.Fields.Item("chvName").Value)%></title>
	<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
	<link rel="stylesheet" href="../css/MyStyle.css" type="text/css">
	<script language="javascript" src="../js/MyFunctions.js"></script>
	<script for="document" event="onkeyup()" language="JavaScript">
	if (window.event.ctrlKey) {
		switch (window.event.keyCode) {
			case 83 :
				//alert("S");
				Save();
			break;
		   	case 76 :
				//alert("L");
				window.close();
			break;
		}
	}
	</script>
	<script language="javascript">
	function Save(){
		if (document.frm0102.CompanyName.value <= 0) {
			alert("Select a company.");
			document.frm0102.CompanyName.focus();
			return;
		}	
		if (!CheckDate(document.frm0102.StartDate.value)){
			alert("Invalid Start Date.");
			document.frm0102.StartDate.focus();
			return ;
		}
		if (!CheckDate(document.frm0102.EndDate.value)){
			alert("Invalid End Date.");
			document.frm0102.EndDate.focus();
			return ;
		}
		document.frm0102.MM_insert.value = "true";
		document.frm0102.submit();
	}
	</script>
</head>
<body onLoad="javascript:document.frm0102.CompanyName.focus()">
<form ACTION="<%=MM_editAction%>" METHOD="POST" name="frm0102">
<h5>New Employment Record:</h5>
<hr>
<table cellpadding="1" cellspacing="1">
    <tr> 
		<td nowrap>Work Type:</td>
		<td nowrap><select name="WorkType" tabindex="1" onChange="document.frm0102.submit();" accesskey="F">
		<% 
		while (!rsWorkType.EOF) {
		%>
			<option value="<%=(rsWorkType.Fields.Item("intWork_type_id").Value)%>" <%=((rsWorkType.Fields.Item("intWork_type_id").Value==Request.Form("WorkType"))?"SELECTED":"")%>><%=(rsWorkType.Fields.Item("chvWork_type_desc").Value)%></option>
		<%
			rsWorkType.MoveNext();
		}
		%>
        </select></td>
    </tr>
    <tr> 
		<td nowrap>Company Name:</td>
		<td nowrap><select name="CompanyName" tabindex="2">
		<% 
		while (!rsCompany.EOF) {
		%>
			<option value="<%=(rsCompany.Fields.Item("intCompany_id").Value)%>" <%=((rsCompany.Fields.Item("intCompany_id").Value == Request.Form("CompanyName"))?"SELECTED":"")%>><%=(rsCompany.Fields.Item("chvOrg_Name").Value)%></option>
		<%
			rsCompany.MoveNext();
		}
		%>
        </select></td>
    </tr>
    <tr> 
		<td nowrap>Employment Type:</td>
		<td nowrap><select name="EmploymentType" tabindex="3">
		<%
		while (!rsEmploymentType.EOF) {
		%>
			<option value="<%=rsEmploymentType.Fields.Item("chrEmploy_Type").Value%>" <%=((Request.Form("EmploymentType").Value == rsEmploymentType.Fields.Item("chrEmploy_Type").Value)?"SELECTED":"")%>><%=rsEmploymentType.Fields.Item("chvEmploy_Desc").Value%>
		<%
		rsEmploymentType.MoveNext();
		}
		%>		
        </select></td>
    </tr>
    <tr> 
		<td nowrap>Duration:</td>
		<td nowrap><select name="EmploymentDuration" tabindex="4">
			<option value="">N/A
			<option value="T" <%=((Request.Form("EmploymentDuration")=="T")?"SELECTED":"")%>>Temporary 
			<option value="P" <%=((Request.Form("EmploymentDuration")=="P")?"SELECTED":"")%>>Permanent 
        </select></td>
    </tr>
    <tr> 
		<td nowrap>Start Date:</td>
		<td nowrap> 
			<input type="text" name="StartDate" size="11" maxlength="10" value="<%=Request.Form("StartDate")%>" tabindex="5" onChange="FormatDate(this)">
			<span style="font-size: 7pt">(mm/dd/yyyy)</span>
		</td>
	</tr>
    <tr> 
		<td nowrap>End Date:</td>
		<td nowrap> 
			<input type="text" name="EndDate" size="11" maxlength="10" value="<%=Request.Form("EndDate")%>" tabindex="6" onChange="FormatDate(this)">
			<span style="font-size: 7pt">(mm/dd/yyyy)</span> 
		</td>
    </tr>
    <tr> 
		<td nowrap valign="top">Job Description:</td>
		<td nowrap valign="top"><textarea name="JobDescription" rows="5" cols="65" tabindex="7" accesskey="L"><%=Request.Form("JobDescription")%></textarea></td>
    </tr>
</table>
<hr>
<table cellpadding="1" cellspacing="1">
    <tr> 
		<td><input type="button" value="Save" tabindex="8" onClick="Save();" class="btnstyle"></td>
		<td><input type="button" value="Close" tabindex="9" onClick="window.close();" class="btnstyle"></td>
	</tr>
</table>
<input type="hidden" name="MM_insert" value="false">
<input type="hidden" name="intAdult_id" value="<%=Request.QueryString("intAdult_id")%>">
</form>
</body>
</html>
<%
rsClient.Close();
rsCompany.Close();
%>